关于vb的CheckPrivate Sub Check1_Click()If Check1.Value = 0 ThenCheck1.Value = 1ElseCheck1.Value = 0End IfEnd Sub以上是我的代码 可是一打勾就会出现益处堆栈?请问怎么解决?

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/29 01:57:55
关于vb的CheckPrivateSubCheck1_Click()IfCheck1.Value=0ThenCheck1.Value=1ElseCheck1.Value=0EndIfEndSub以上是

关于vb的CheckPrivate Sub Check1_Click()If Check1.Value = 0 ThenCheck1.Value = 1ElseCheck1.Value = 0End IfEnd Sub以上是我的代码 可是一打勾就会出现益处堆栈?请问怎么解决?
关于vb的Check
Private Sub Check1_Click()
If Check1.Value = 0 Then
Check1.Value = 1
Else
Check1.Value = 0
End If
End Sub
以上是我的代码 可是一打勾就会出现益处堆栈?
请问怎么解决?

关于vb的CheckPrivate Sub Check1_Click()If Check1.Value = 0 ThenCheck1.Value = 1ElseCheck1.Value = 0End IfEnd Sub以上是我的代码 可是一打勾就会出现益处堆栈?请问怎么解决?
这不是明显的死循环么,Check1.Value 不等于0则 附值为0,然后Check1.Value 如果等于0又附值为1

我觉得你的逻辑错了吧