vb 不用按钮不用转移指令不用时钟指令等，怎样让一段代码一直处于运行状态

显示全部楼层 · 2012-9-13 12:14:01

DoDoEventsIf Text1.Text = Cstr(1) ThenText2.Text = Cstr(0)End IfLoop或者是创建个过程，然后回调不过这会让CPU使用率达到100%，建议还是使用Private Sub Text1_Change()'当文本框内容改变时触发If Text1.Text = Cstr(1) Then Text2.Text = Cstr(0) End IfEnd Sub 望采纳...

千问 · 2012-9-13 12:14:01

有两个方法第一个 Private Sub Text1_Change() If Text1.Text = 1 Then Text2.Text = 0 End If第二个Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then If Text1....

千问 · 2012-9-13 12:14:01

一直运行可用do..loop语句代码，他运算速度很快，一秒是几万次，dodoeventsIf Text1.Text = 1 ThenText2.Text = 0End Ifloop...