我直接给你个简单的和按键一样用的自定义函数吧。
Function Delay(s)
'延时函数
Tim = Date & " " & Time()
While DateDiff("s", Tim, Date & " " & Time()) < s
DoEvents
Wend
End Function
用的时候直接调用:delay(3)
就是延时3秒
不过延时单位是秒。有误差,如果不是很介意延时的精度这个简单好用。
改vb很复杂的,需要窗体句柄和控件句柄才能正确将你需要的按键输入进去,这需要winapi和系统内核方面的知识,不是一句两句能说清的
vb可以找个延时模块,加到里面调用就可以了
百度下就能找到了
国外的牛人倒是写了一个超级长的模块,用wait调用~~自己找找看吧