A veces queremos seleccionar todo el texto en el cuadro de texto cuando el control del cuadro de texto gana foco. Esto se puede lograr a través de las propiedades SelStart y SelLength. Específicamente, cuando el objeto recibe el foco, se selecciona desde el frente (SelStart = 0) y la longitud seleccionada es la longitud del texto (Len (Text1)).
Subtexto privado1_GotFocus()
Texto1.SelInicio = 0
Texto1.SelLength = Len(Texto1)
Subtítulo final
El evento GotFocus ocurre cuando un control gana foco.