Visual Basic - Selección de texto en control TextBox

Hola!!!

¿Cómo puedo hacer para que cuando un control de tipo TextBox obtiene el foco, el texto que contiene aparezca seleccionado?

Un saludo y gracias de antemano.

'Para un control
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1)
End Sub

'Para un array
Private Sub Text1_GotFocus(Index As Integer)
Text1(Index).SelStart = 0
Text1(Index).SelLength = Len(Text1(Index))
End Sub