作者Daddario (铁牛运功散)
看板Visual_Basic
标题[VB6 ] 简单的键盘事件 (初学)
时间Sun Mar 5 23:36:25 2006
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Do Until KeyCode = vbKeyEscape
MsgBox ("5")
Loop
End
End Sub
-------------------------------
我希望写一个程式
可以一直出现5这个msgbox
除非 按下Esc键
以上写法执行之後会一直在回圈里面
是错在哪呢?
麻烦了 ><~
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 203.71.94.30
1F：推 BearWu:少判断式吧 03/06 01:01
2F：推 fumizuki:do 改成if 03/06 07:01
3F：→ fumizuki:你没搞清楚事件驱动程式的意义唷 03/06 07:02