Propriedade ComboBox.SelStart (Access)

Propriedade SelStart especifica ou determina o ponto inicial do texto selecionado ou a posição do ponto de inserção se nenhum texto está selecionado. Integer de leitura/gravação.

Sintaxe

expressão. SelStart

expressão Uma variável que representa um objeto ComboBox .

Comentários

Propriedade SelStart utiliza um Integer no intervalo de 0 ao número total de caracteres na parte caixa de texto de uma caixa de combinação.

Para definir ou retornar essa propriedade para um controle, o controle deve ter o foco. Para mover o foco para um controle, use o método SetFocus.

Alteração da propriedade SelStart cancela a seleção, coloca um ponto de inserção no texto e define a propriedade SelLength como 0.

Exemplo

O exemplo a seguir utiliza dois procedimentos de evento para localizar um texto especificado pelo usuário. O texto a procurar é definido no procedimento carregar evento do formulário. O procedimento Clique no evento do botão Localizar (no qual o utilizador clica para iniciar a pesquisa) pede ao utilizador o texto a procurar e seleciona o texto na caixa de texto se a pesquisa for bem-sucedida.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.