vbs 脚本小结

1.先新建一个记事本
2.将后缀改为.vbs

----------------------语法---------------------
Msgbox "Hello vbs"       '输出语句


msgbox "He llo World!" , , "系统提示(弹出框标题)"


-----------------------------


& 拼接符号   * 乘


'Cbool 函数将变量转换成布尔值；
'Cbyte 函数将变量转换为0 到255 之间的整数。
'Ccur 函数、Cdbl 函数和Csng 函数将变量转换为浮点数值，前者只精确到小数点后四位，后两
'者要更加精确，数值的范围也要大的多。
'Cdate 函数将变量转换为日期值。
'Cint 函数和Clng 函数将变量转换为整数，后者的范围比前者要大的多。
'Cstr 函数将变量转换为字符串。
---------------------------------


Dim      '定义变量
const i=1   '定义常量


Dim a=Inputbox("提示内容")    '获取输入数据

Inputbox("对话框内容","对话框标题")


判断  
  if ...  then ...


if嵌套
  if   ...   then ... else  ... end if

多分支条件语句
select case 变量或表达式
  case 值1
   语句1
    case 值2
     语句2
     .
     .
end select


循环
do ... loop  循环结构


结束循环   exit do
-----------------------
do while 循环结构 
do while 条件表达式     
循环体
loop
----------------
do 
循环体
loop while   条件表达式
-----------------------------
for ... next   循环结构
例(打印10以内的数字)：
Dim i,str
for  i=1 to 10  step 1          'step 后面的参数可以为正数或负数   为正数时按递加进行循环  为负数 递减
str=str&" "&cstr(j)
next
Msgbox str


函数（有返回值）
function  函数名（参数1，参数2...）
...
exit function    //结束函数
...
end function
例：
function sj(Dim i,Dim j)
sj=i*j
end function
调用函数
Dim i=sj(i,j)


子程序（无返回值）
sub  子程序名（参数列表）

...
end sub
例：
sub hello(name)
msgbox "你好,"&name&vbCrLf&""
end sub
调用小程序
call hello("小A")

----------------------------------------------------------------
定义数组
Dim ary(10)    //定义一个名为ary的数组包含10个变量

二维数组
Dim ary(3,3)


-----------------------------------------------------------

set ws=createobject("wscript.shell") 
ws.run"iexplore.exe http://www.baidu.com"     //打开百度



Set objShell = CreateObject("Wscript.Shell")
objShell.Run "notepad" ,,true          //打开一个空白记事本  
objShell.Run "calc"             //打开一个计算器


run 函数有三个参数，第一个参数是你要执行的程序的路径，第二个程序是窗口的形式，
0 是在后台运行；1 表示正常运行；2 表示激活程序并且显示为最小化；3 表示激活程序并且显
示为最大化；一共有10 个这样的参数我只列出了4 个最常用的。第三个参数是表示这个脚本
是等待还是继续执行，如果设为了true,脚本就会等待调用的程序退出后再向后执行。
其实，run 做为函数，前面还有一个接受返回值的变量，一般来说如果返回为0，表示成功执行，
如果不为0，则这个返回值就是错误代码，可以通过这个代码找出相应的错误。


objshell.run """C:\Program Files\QQ2006\QQ.exe""" ‘注：三个引号  打开QQ  本地绝对路径