[RESOLVED] setting up color in current focussing textbox ???

hi gurus ,

how to set up color in the current (cursor locating) text box ?????

i found out tht ... we should should code in

Code:

---


    Private Sub TextFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtZone.Enter, TxtPincode.Enter, TxtName.Enter, TxtCustomerID.Enter, TxtCity.Enter, TxtArea.Enter, TxtAddress2.Enter, TxtAddress.Enter


    End Sub

---

however i donno wat to code... i tried a lot ... couldnt solve it ...


Ps can ny 1 help me ...

Code:

---

  Private Sub TextFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtZone.Enter, TxtPincode.Enter, TxtName.Enter, TxtCustomerID.Enter, TxtCity.Enter, TxtArea.Enter, TxtAddress2.Enter, TxtAddress.Enter, TxtSTNo.Enter, TxtPhone.Enter, TxtMobile.Enter, TxtFax.Enter, TxtEmail.Enter, TxtCSTNo.Enter, txtcountry.Enter, TxtContactName.Enter
        DirectCast(sender, TextBox).BackColor = Color.Aqua
    End Sub

    Private Sub TxtName_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TxtName.Leave, TxtZone.Leave, TxtSTNo.Leave, TxtPincode.Leave, TxtPhone.Leave, TxtMobile.Leave, TxtFax.Leave, TxtEmail.Leave, TxtCustomerID.Leave, TxtCSTNo.Leave, txtcountry.Leave, TxtContactName.Leave, TxtCity.Leave, TxtArea.Leave, TxtAddress2.Leave, TxtAddress.Leave
        DirectCast(sender, TextBox).BackColor = Color.White
    End Sub

---

from one of ma collegue .. Prem... [:)]