VB怎么判断用户是否选择Check1

如题所述

举报该文章

相关建议推荐于2018-04-17

Private Sub Command1_Click()If Check1.Value = 1 And Check2.Value = 1 ThenMsgBox "不允许同时选择两个Check", vbOKOnly, "错误"Check1.Value = 0If Check1.Value = 1 ThenMsgBox "已经选择", vbOKOnly, "提示"ElseMsgBox "没有选择", vbOKOnly, "提示"End IfEnd Sub此外，你也可以把代码写在下面Private Sub Check1_Click()End Sub补充：Private Sub Command1_Click()If Check1.Value = 1 And Check2.Value = 1 ThenMsgBox "不允许同时选择两个Check", vbOKOnly, "错误"Check1.Value = 0MsgBox "已经选择", vbOKOnly, "提示"ElseMsgBox "没有选择", vbOKOnly, "提示"End IfEnd Sub

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/fqsvp8fsf4pq2f82f4m.html

其他看法

第1个回答 2013-12-12

Private Sub Command1_Click()
   If (Check1.Value = 0) Then
      MsgBox "Check1已经选中", 32
   Else
      MsgBox "Check1没有选中", 32
   End If
End Sub

相似回答

大家正在搜