KeyAscii = 122 '這是Z鍵
End Sub
Private Sub Form_Load()
Timer1.Interval = 10000 '這行是設置時間,只用添加壹個時間控件就可以了
Private Sub Timer1_Timer()
Form_KeyPress
註意Timer1的時間設置成10000(即10秒)