Private Sub Timer1_Timer()
if (SendKeys "a") then
Timer1.Enabled = False
End Sub
提示错误,怎样修改啊?
Private Sub Timer1_Timer()
if (SendKeys "a") then
Timer1.Enabled = False
End Sub
提示错误,怎样修改啊?
看是在那里按了 简单的 比如在TEXT中按
在text的KEYPRESS事件中写
if keycode=asc("a") then timer1.enabled=false
全局的就不好弄了 没用过
一般的控件都有KeyPress事件,在KeyPress事件里写
If KeyAscii = 65 Or KeyAscii = 97 Then timer1.Enabled = False End If
就ok了