求助：一段按键代码

xnx3

本人刚学，很多不会，又无从下手...想求一段完整的按键代码：按下1键，等待10秒，按下1键...不断循环，会的写个哈，多谢了。看了那贴的代码，可总出错，特来求助

职业吹牛家

http://www.vbgamediy.com/BBSVB

Miu.C

'先在窗体上添加一个Timer，
'再将窗体代码替换如下：
Private Sub Form_Load()
    Timer1.Interval = 10000
End Sub
Private Sub Timer1_Timer()
    SendKeys "1"
End Sub

职业吹牛家

不要相信miu.c , 他初中没毕业，还是个女的

Miu.C

Overcome

jasv

喂。4楼的。。。
你管人家是啥学历。是啥性别。
你只需要说人家的代码对不对就可以了。

xnx3

太感谢3楼了，
还有个问题哈：Form_Load()是什么呢？
我按你的做的，但没开始哦，我加了个，你看下对不？

再就是延时等待1秒要怎样呢


Private Sub Command1_Click()
    SendKeys "1"
End Sub

Private Sub Form_Load()
    Timer1.Interval = 10000
End Sub
Private Sub Timer1_Timer()
    SendKeys "1"
End Sub

jasv

你连Form_Load()都不知道是什么。就算你是初学者。画20块钱买本最基础的教材里面就有了。

使命召唤

xnx3是老潘派来充门面的

Miu.C

xnx3: Re:求助：一段按键代码

太感谢3楼了，
还有个问题哈：Form_Load()是什么呢？
我按你的做的，但没开始哦，我加了个，你看下对不？...

Timer1.Interval = 1000

单位是毫秒，自己改。