[VB6] Selezionare testo di una TextBox quando ha il focus (era:Piccolo aiuto...)

[Sypher]

Private Sub Text2_GotFocus()
    Text2.SelStart = 0
    Text2.SelLength = Len(Text2)
End Sub