|
hola, pues bien si lo que necesitas es seleccionar el contenido de varios Text no se puede hacer, lo que puede hacerce es ir seleccionando el contenido de cada Text, esto lo haces colocando en el evento GotFocus del Text el siguiente codigo:
TextSelected
y luego creas la funcion
Public Sub TextSelected()
Dim i As Integer
Dim oMyTextBox As Object
Set oMyTextBox = Screen.ActiveControl
If TypeName(oMyTextBox) = "TextBox" Then
i = Len(oMyTextBox.Text)
oMyTextBox.SelStart = 0
oMyTextBox.SelLength = i
End If
End Sub
espero te sirva. suerte.. y por favor no se te olvide finalizar la pregunta..
|
