[请问] 按键精灵Qui的Event出错

楼主: adamqwop (吃冰)   2014-06-21 17:55:36
刚尝试想写个Qui的简单功能
两个勾选的box01,02
当点击box01,则box01勾选,并清除box02
反之亦然
Event Form1.box01.Click
If Form1.box01.value = 1 Then
Form1.box01.value = 0
Else
Form1.box01.value = 1
Form1.box02.value = 0
End If
End Event
结果尝试点击box01却当掉了
后来多方测试,发现是event会无限的触发
换个方法测试
Dimenv ai
Event Form1.box01.Click
If Form1.box01.value = 1 Then
Form1.box01.value = 0
Else
Form1.box01.value = 1
Form1.box02.value = 0
End If
ai = ai + 1
MsgBox ai
End Event
结果点击box01后,MsgBox就开始从1往上一直加1 无法离开循环
按精算是VB架构,请问是哪边出了问题
明明只做了一次Click动作,为何Event会重复的触发?

Links booklink

Contact Us: admin [ a t ] ucptt.com