如何在VB6中选择ComboBox

Question

如何在vb6中选择ComboBox 如果未选择ComboBox，则显示消息“您尚未选择菜单”

Answer 1

标记您的ComboBox，在属性集combo1中将其命名为CausesValidation至true。

转到代码（F7）并添加验证子程序：

Private Sub combo1_Validate(Cancel As Boolean)
  If combo1.ListIndex < 0 Then
    ' Mark somewhere that nothing is selected, like setting a boolean
  End If
End Sub

在“确定”按钮中，只需检查是否已设置标记。你可以在OK按钮中检查listindex，但这看起来更干净;）MsgBox用于Messageboxes;）

Answer 2

你可以简单地做

If Combo1.Text = "" Then
MsgBox "You have not selected a menu!"
End If

它还取决于什么类型的组合框，如果它是一个简单的组合框，那么代码将代替

If Combo1.Text = "" Then

这将是您填写文本字段的内容

所以在图片中我上传的文字是Combo1所以我会使用代码

If Combo1.Text = "Combo1" Then

因为如果它与您加载表单时的文本相同，它会说＆＃34; Combo1＆＃34;，您必须将其修改为您案例中的任何文本。