Propiedad ComboBox.SelText (Access)

La propiedad SelText devuelve una cadena que contiene el texto seleccionado. String de lectura y escritura.

Sintaxis

expresión. SelText

Expresión Variable que representa un objeto ComboBox .

Comentarios

Si no hay texto seleccionado, la propiedad SelText contiene un valor nulo.

La propiedad SelText utiliza una expresión de cadena que contiene el texto seleccionado en el control. Si el control contiene texto seleccionado cuando se establece esta propiedad, el texto seleccionado se reemplaza por el nuevo valor de SelText.

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.

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.

Sub Form_Load() 
 Dim ctlTextToSearch As Control 
 Set ctlTextToSearch = Forms!Form1!TextBox1 
 ctlTextToSearch.SetFocus ' SetFocus to text box. 
 ctlTextToSearch.SelText = "This company places large orders " _ 
 & "twice a year for garlic, oregano, chilies and cumin." 
End Sub 
 
Sub Find_Click() 
 Dim strSearch As String, 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.