wpzy.net
当前位置:首页 >> VBS loop语句缺少Do >>

VBS loop语句缺少Do

源代码中有若干处单词拼写错误,还有最后丢了个end if,已经正确调试, On Error Resume Next dim a,b,s,u do while 1 u=inputbox("加1,减2,乘3,除4","算什么?") if u=0 then WScript.quit else if u=1 then a=inputbox("请输入一个数","加法算...

我运行没问题。。。。 Set file=CreateObject("scripting.filesystemobject").OpenTextFile("d:\wo.txt") Do While Not file.AtEndOfStream msg=file.ReadLine a=split(msg) Loop

第一个从语法讲:if **1** then **2** 得到if a=int(3) then exit do 第二个从连接符讲:if **1** then **2**:**3** 得到if b=a then msgbox("ok"):exit do :表示连接两条命令的。连接**2**跟**3**即:msgbox("ok")跟exit do 麻烦采纳,谢谢!

Visual Basic Scripting Edition Do...Loop 语句 请参阅 Exit 语句 | For...Next 语句 | While...Wend 语句 要求 版本 1 当条件为 True 时或条件变为 True 之前重复执行某语句块。 Do [{While | Until} condition] [statements] [Exit Do] [stat...

if true then ....else .... ------------------------------ if not true then ....else.... --------------------------------- if true then .... elseif true then .... elseif not then .... else .... end if ---------------------------...

用记事本打开vbs文件,一定是某处有do 或do while,在它的下一行写入loop保存就行了

VBA 中Do while Loop用法如下:VBA中如果不知道重复多少次,使用 Do...Loop 语句。Do...Loop 语句重复执行某段代码直到条件是 true 或条件变成 true。重复执行代码直到条件是 true使用 While 关键字来检查 Do... Loop 语句的条件。 Do While i>1...

但凡涉及if后面都要加上end if 语法: if XXXX then …… else(可要可不要) …… end if 目测是不缺do的,缺的是loop,语法与上面的类似,每个do loop都要配套使用 在你的程序里目测应该这样加: msgbox("关机程序已启动!") wscript.sleep 1000 s...

循环次数结束后自己会关的吧! 比如这个Set WshShell= WScript.CreateObject("WScript.Shell") WshShell.AppActivate" " for i=1 to 5 ' WScript.Sleep 500 WshShell.SendKeys"^v" WshShell.SendKeys i WshShell.SendKeys"%s" Next

第1个那里是1条语句,不用语句分割。第2个那里1行上是两条语句,必须用语句分割符。

网站首页 | 网站地图
All rights reserved Powered by www.wpzy.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com