在VBA中使用AUTOIT

需求:我想实现的目的是,能够写一个程序(不知道用VBA能否实现,如果VBA不行,需要哪种其它的语言?),实现自动反复用鼠标在屏幕上点击一个(或者交替点击两个)指定的按钮的功能。我这个问题来自于证券帐户的提前委托下单的需要。比如我想在第二天买入一个股票,这个股票非常不好买,我必须保证委托号排在第一个,如果手工操作,我就要在前一天交割结束前反复下单(交割结束前是不能成功的),直到正好赶上交割结束时的时刻,我的下单操作正好成功。这样就能保证我在最早的时间上成功下单。但是手工反复操作太费力,可能要连续用鼠标按上千次。我想能否用一个程序来实现这个自动操作?在VBA中使用AUTOIT关于AUTOIT 介绍,请看这个帖子,这里不再重复http://club.excelhome.net/viewth ... 0224&highlight=本文主要介绍  AUTOIT 在  EXCEL vba 应用请先自行安装AUTOIT,再看下面简单例子Sub autoit()Set x = CreateObject("AutoItX3.Control")x.Run ("notepad.exe")End SubSub bb()Set autoit = CreateObject("AutoItX3.Control")autoit.Run ("notepad.exe")autoit.WinWaitActive ("无标题")x = autoit.WinGetCaretPosX()y = autoit.WinGetCaretPosY()Call autoit.MouseClick("right", x, y)autoit.Send ("abcde1234")autoit.Send ("{ENTER}")End SubSub bb()Set autoit = CreateObject("AutoItX3.Control")For I = 100 To 800Call autoit.MouseMove(I, I)NextEnd SubSub bb()Set autoit = CreateObject("AutoItX3.Control")Call autoit.ToolTip("hi★★欢迎使用我的软件★★★★")End Sub

(0)

相关推荐