①.、利用鼠标模拟事件
SetCursorPos
mouse_event
MOUSEEVENTF_LEFTDOWN,
0,
MOUSEEVENTF_LEFTUP,
vb我不是很会,我给你说个思路吧.timer控件设定计时开始和速度,假设为一秒一下.在timer事件中调用button的单击事件,当然timer中还需要定义一个变量,用来做自增运算,一遍计算运行的时间.当变量到100后,弹出窗口提示完成,timer控件停止就行了.如果还是不明白我可以给你编个c#的代码,只要是vb的语法不是很会.
某网页按钮内容：
代码：
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1 '检测所有标签
If UCase(vDoc.All(i).tagName) = "INPUT" Then '找到input标签
Set vTag = vDoc.All(i)
If vTag.Type = "button" And vTag.Value = "最大值" Then '找到确定按钮.
vTag.Select '也可以没有这个
End If
Next i
End Sub
方法1,添加1个按钮：每当单击这个按钮,就会连续单击"下一个"按钮10次.
Private
Sub
Dim
i
As
Integer
For
=
To
Call
下一个_Click
Next
End
如果你还不认为是自动,那么就用Timer控件,每间隔一定时间,单击"下一个"按钮1次.
Timer1_Timer()
土嘎嘎的粉丝们大家好哦. 很高兴看到你的问题. 但是又很遗憾到现在还没有人回答你的问题.也可能你现在已经在别的地方找到了答案,那就得恭喜你啦. 可能是你问的问题有些专业了,没人会.或者别人没有遇到或者接触过你的问题,所以帮不了你.建议你去问题的相关论坛去求助,那里的人通常比较多,也比较热心,可能能快点帮你解决问题. good luck~！ 希望我的回答也能够帮到你！ 谢谢
VB可使用Timer控件的Timer事件实现执行按钮的Click事件来实现.
Timer 控件,通过引发 Timer 事件,Timer 控件可以有规律地隔一段时间执行一次代码.
Timer 事件,在一个 Timer 控件的预定的时间间隔过去之后发生.该间隔的频率储存于该控件的 Interval 属性中,它以千分之一秒为单位指定时间的长度.
实例代码：
Option?Explicit
Dim?i?As?Long
Private?Sub?Command1_Click()
Me.Cls
i?=?i?+?1
Me.Print?i
End?Sub
Private?Sub?Form_Load()
Timer1.Interval?=?1000
Timer1.Enabled?=?True
Private?Sub?Timer1_Timer()
Command1_Click
以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用，就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！