Поделиться через


Пример использования свойства MatchEntry и элемента управления OptionButton

В следующем примере свойство MatchEntry используется для демонстрации сопоставления символов, доступных для ComboBox и ListBox.

В этом примере пользователь может задать тип сопоставления с элементами управления OptionButton , а затем ввести в поле ComboBox , чтобы указать элемент из списка.

Чтобы воспользоваться этим примером, скопируйте данный пример кода в раздел описаний формы. Убедитесь, что эта форма содержит:

  • Три элемента управления OptionButton с именами от OptionButton1 до OptionButton3.
  • Элемент ComboBox с именем ComboBox1.
Private Sub OptionButton1_Click() 
 ComboBox1.MatchEntry = fmMatchEntryNone 
End Sub 
 
Private Sub OptionButton2_Click() 
 ComboBox1.MatchEntry = fmMatchEntryFirstLetter 
End Sub 
 
Private Sub OptionButton3_Click() 
 ComboBox1.MatchEntry = fmMatchEntryComplete 
End Sub 
 
Private Sub UserForm_Initialize() 
 Dim i As Integer 
 
 For i = 1 To 9 
 ComboBox1.AddItem "Choice " & i 
 Next i 
 ComboBox1.AddItem "Chocoholic" 
 
 
 OptionButton1.Caption = "No matching" 
 OptionButton1.Value = True 
 
 OptionButton2.Caption = "Basic matching" 
 OptionButton3.Caption = "Extended matching" 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.