Propiedad TextBox.SelLength (Access)

La propiedad SelLength especifica o determina el número de caracteres seleccionados en un cuadro de texto. Integer de lectura y escritura.

Sintaxis

expresión. Sellength

Expresión Variable que representa un objeto TextBox .

Comentarios

La propiedad SelLength utiliza un número entero en el intervalo entre 0 y el número total de caracteres en un cuadro de texto o la parte de cuadro de texto de un cuadro combinado.

Para establecer o devolver esta propiedad para un control, el control debe tener el foco. Para mover el enfoque a un control, use el método SetFocus.

Si se establece la propiedad SelLength en un número menor que 0 genera un error en tiempo de ejecución.

Ejemplo:

En el siguiente ejemplo, se utilizan dos procedimientos de evento para buscar el texto especificado por un usuario. El texto que se va a buscar se establece en el procedimiento de evento Load del formulario. El procedimiento de evento Click del botón Buscar (en el que el usuario hace clic para iniciar la búsqueda) solicita al usuario el texto que se va a buscar y selecciona el texto en el cuadro de texto si la búsqueda se realiza correctamente.

Private Sub Form_Load() 
 
 Dim ctlTextToSearch As Control 
 Set ctlTextToSearch = Forms!Form1!Textbox1 
 
 ' SetFocus to text box. 
 ctlTextToSearch.SetFocus 
 ctlTextToSearch.Text = "This company places large orders twice " & _ 
 "a year for garlic, oregano, chilies and cumin." 
 Set ctlTextToSearch = Nothing 
 
End Sub 
 
Public Sub Find_Click() 
 
 Dim strSearch As String 
 Dim intWhere As Integer 
 Dim ctlTextToSearch As Control 
 
 ' Get search string from user. 
 With Me!Textbox1 
 strSearch = InputBox("Enter text to find:") 
 
 ' Find string in text. 
 intWhere = InStr(.Value, strSearch) 
 If intWhere Then 
 ' If found. 
 .SetFocus 
 .SelStart = intWhere - 1 
 .SelLength = Len(strSearch) 
 Else 
 ' Notify user. 
 MsgBox "String not found." 
 End If 
 End With 
 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.