'* This routine handle all of the "custom check boxes" Private Sub imbMain_Click(ByVal sender As System.Object, _ ByVal e As System.Web.UI.ImageClickEventArgs) _ Handles imbMain1.Click, imbMain2.Click, imbMain3.Click ' Variables Dim oImgBtn As System.Web.UI.WebControls.ImageButton ' Assign Reference oImgBtn = sender ' Swap Image With oImgBtn .ImageUrl = IIf(.ImageUrl = "checked.gif", "unchecked.gif", "checked.gif") End With End SubI am going to e-mail the check images now.