VB中如何用按钮来执行Check多选

来源:百度知道 编辑:UC知道 时间:2024/05/26 23:30:59
也就是说:选中check框,先不执行,按下按钮后再执行。我很菜,能不能给个例子,急用啊,没时间从头学了。

Private Sub Command1_Click()
if check1.value=-1 then
选中时的代码
else
没选中的代码
end if
end sub

Private Sub Command1_Click()
If Check1.Value = 0 Then
Call MsgBox("Check1 没有被选中", , "提示")
ElseIf Check1.Value = 1 Then
Call MsgBox("Check1 已经被选中", , "提示")
ElseIf Check1.Value = 2 Then
Call MsgBox("Check1 为不可选", , "提示")
End If
End Sub