Question

请问如何在VB下实现定时键盘模拟输入

例如每隔一分钟按1次F5，最好提供个代码谢谢

Answer 1

在窗体中创建个timer控件然后复制下面代码就行
Private Sub Form_Load()
Timer1.Interval = 60000 'Timer1.Interval = 1000 等于1S
End Sub
Private Sub Timer1_Timer()
SendKeys "{F5}"
End Sub
'F5刷新键效果不怎么明显 你改成F2 在把上面的时间调个几秒看下效果 运行了点个文件就行看时间到文件是不是重命名状态。

Answer 2

在窗体上加入控件timer1，设置innerval=60000
然后复制下面代码，运行即可

Private Sub Timer1_Timer()
SendKeys "{F5}"
End Sub

Answer 3

前面的，timer实现不了1分钟的延时，不信自己去试试

首先在最上面定义（dim n as integer）全局变量

在form_load中输入
Private Sub Form_Load()
'Timer1.Interval = 6000
n=0
end sub

再双击时间控件进入
Private Sub Timer1_Timer()
n=n+1
if n>=10 then
n=0
SendKeys "{F5}"
end if
End Sub

Answer 4

我也等着看答案