Highlighting text on entering into the text box

It may be handy sometimes if we highlight the content of a text box when the focus comes to it. This will ease the data entry work when you make modification in each text boxes.

To highlight the text just write the following code in the GotFocus event:

Text1.selstart = 0
Text1.sellength = Len(Text1.text)