vb 做了几个combobox,想按按钮的时候,判断这几个combobox是否已经选择完毕
想按按钮的时候,判断这几个combobox是不是有漏选的,如果有box没有选择,漏选了,提示一个msgbox,这个怎样实现啊?》...
想按按钮的时候,判断这几个combobox是不是有漏选的,如果有box没有选择,漏选了,提示一个msgbox,这个怎样实现啊?》
展开
4个回答
展开全部
假设你的组合框名称为 combo 1-12。
设计的时候先把组合框的文字清空。
’-------------------------------------漏一个提示一个
For i = 1 To 12
If Controls("combo" & i).Text = "" Then
MsgBox "第 " & i & "个组合框未选择"
End If
Next
‘--------------------------------------提示第一个
For i = 1 To 12
If Controls("combo" & i).Text = "" Then
EXIT FOR
End If
Next
IF I<=12 THEN MsgBox "第 " & i & "个组合框未选择"
设计的时候先把组合框的文字清空。
’-------------------------------------漏一个提示一个
For i = 1 To 12
If Controls("combo" & i).Text = "" Then
MsgBox "第 " & i & "个组合框未选择"
End If
Next
‘--------------------------------------提示第一个
For i = 1 To 12
If Controls("combo" & i).Text = "" Then
EXIT FOR
End If
Next
IF I<=12 THEN MsgBox "第 " & i & "个组合框未选择"
展开全部
对combo1用 if combo1.listindex<0 then
msgbox "combo1没有被选择"
elseif combo2.listindex<0 then
msgbox "combo没有被选择"
…………………………
elseif comboN.listindex<0 then
msgbox "comboN没有被选择"
endif
msgbox "combo1没有被选择"
elseif combo2.listindex<0 then
msgbox "combo没有被选择"
…………………………
elseif comboN.listindex<0 then
msgbox "comboN没有被选择"
endif
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
For Each Cbox In Me.Controls
If TypeName(Cbox) = "ComboBox" Then
If Len(Cbox.Value) = 0 Then MsgBox Cbox.Name & "未选择"
End If
Next Cbox
If TypeName(Cbox) = "ComboBox" Then
If Len(Cbox.Value) = 0 Then MsgBox Cbox.Name & "未选择"
End If
Next Cbox
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
判断combobox.text属性就可以了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询