Visual Basic - auto sombrear textbox

buen dia, disculpen lapregunta necesito que al seleccionar un textbox (click) se sombreee el contenido del mismo, como se hace eso?
gracias

Asi lo haces:

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

Suerte!