Exemplo da propriedade Style

O exemplo a seguir usa a propriedade Style para alterar o efeito da digitação na área de texto de um ComboBox.

O usuário escolhe um estilo selecionando um controle OptionButton e, em seguida, digita no ComboBox para selecionar um item. Quando Style é fmStyleDropDownList, o usuário deve escolher um item na lista suspensa. Quando Style é fmStyleDropDownCombo, o usuário pode digitar na área de texto para especificar um item na lista suspensa.

Para usar este exemplo, copie esta amostra de código para a parte Declarações de um formulário. Verifique se o formulário contém:

• Dois controles OptionButton denominados OptionButton1 e OptionButton2.
• Uma ComboBox denominada ComboBox1.

Private Sub OptionButton1_Click() 
 ComboBox1.Style = fmStyleDropDownCombo 
End Sub 
 
Private Sub OptionButton2_Click() 
 ComboBox1.Style = fmStyleDropDownList 
End Sub 
 
Private Sub UserForm_Initialize() 
 Dim i As Integer 
 
 For i = 1 To 10 
 ComboBox1.AddItem "Choice " & i 
 Next i 
 
 OptionButton1.Caption = "Select like ComboBox" 
 OptionButton1.Value = True 
 ComboBox1.Style = fmStyleDropDownCombo 
 
 OptionButton2.Caption = "Select like ListBox" 
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.