Hola
Para que el contenido de un textbox quede seleccionado, en el evento GotFocus tienes que poner lo siguiente:
Código:
Text2.SelStart = 0
Text2.SelLength = Len(Text2.Text)
Para dar el foco a un control existe la propiedad SetFocus, para darselo al text1 simplemente sería:
--Saludos--