Tab index to get to next item

I have set up the tabindex on my form to go to the correct place when the tab button is pressed. I need it to select the text in the text box when the tab button is pressed. Right now it goes to the begining of the text box but does not select the information in the text box. Any ideas would be appreciated.

In the got focus event of the textbox put this

Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)

that will highlight all the text in a textbox whenever the textbox gets focus

Thanks that worked great