[VB] fuoco e testo selezionato

[dops]

ciao.. una curiosità.. la proprietà setfocus seleziona l'elemento desiderato.. ok.. ma ad es in una textBox che contiene del testo come si fà a dare un fuoco che mi selezioni questo testo?
cioè con text.setFocus dò il fuoco a text ma appare semplicemente il cursore nella textbox senza selezionare il testo.. come posso fare a selezionare il testo?
spero di essermi spiegato

[chipdb]

Private Sub Text1_GotFocus()
    Text1.SelStart = 0
    Text1.SelLength = Len(Text1)
End Sub

Ciao

[dops]

grazie