论坛 › 已解决问题区 › 问下这段代码的意思！~`

idic754 发表于 2009-6-23 15:40:02

问下这段代码的意思！~`

本帖最后由 idic754 于 2009-6-26 20:50 编辑

Dim $ver

$ver = 1

Do



      If WinExists("VNC Viewer: 警告") Then ;判断是否有指定窗口

                WinActivate("VNC Viewer: 警告");激活指定窗口

                Send("{TAB}");TAB切换

                Send("{enter}");回车

      EndIf





      If WinExists("VNC 验证: 192.168.1.252 ") Then

                WinActivate("VNC 验证: 192.168.1.252 ");激活指定窗口

                Send("123456")

                Send("{enter}");回车



                WinWait("NEWYEAR-08");程序暂停到指定窗口为止

                WinActivate("NEWYEAR-08");激活指定窗口

                Send("123456")

                Send("{enter}");回车

                $ver = 2

      EndIf



Until $ver = 2


----------------------------
能不能详细说下这几个命令！~`谢谢！~

Dim $ver

$ver = 1

Do

Until $ver = 2

lynfr8 发表于 2009-6-23 17:11:29

Dim $ver ;自定义一个变量
$ver = 1;赋值$ver = 1
Do Until ;循环语句：执行代码直至某条件成立停止，帮助文件有例子

idic754 发表于 2009-6-26 20:49:54

哦！谢谢了！~``

skycn540 发表于 2009-6-27 09:04:53

不懂..帮你顶上去！！

menfan1 发表于 2009-6-27 09:13:05

本帖最后由 menfan1 于 2009-6-27 09:14 编辑

这是利用vnc viewer客户端远程地址192.168.1.252 ，密码123456的自动化操作吧，呵呵：）

m511324 发表于 2009-9-1 18:42:14

学习了
:face (27):

查看完整版本: 问下这段代码的意思！~`