vbs (三)

简介: vbs (三)

导航


1.开头REM语句和’都可以注释

2.inputbox

3.常量及变量

4.select

5.写一个简易的输入密码

6.数组

7.function 创建及调用 sub 关键字 及调用 call sub

———————————————————————————————————


1.开头REM语句和’都可以注释


例子:

REM 注释

’ 注释


2.inputbox(“框子中提示信息”,“框子标题信息”,“默认输入光标里”)


3.常量及变量


常量 const 名称

变量dim 名称

int a = dim a as integer

float a = dim a as double

char *a = dim a as string


4.select


select case 变量名

case 值

语句

case 值

语句

end select


5.写一个简易的输入密码


REM 判断密码
const password = "123456"
dim a,num
num = 0
do
'判断次数
if num<3 then
a = inputbox("请你输入密码:","验证信息")
else
msgbox "您输入的次数过多,禁止输入"
exit do    '结束循环
end if
'判断密码是否正确
if a = password then
msgbox "输入密码成功"
exit do 
else
num = num+1
end if
loop


也可以用

do while

loop

———————————————————————————————————


6.数组


一维数组:arr(3) :arr(0),arr(1),arr(2),arr(3)

二维数组:arr(1)(2) 有2*3的数据 // 如arr(0)(0),arr(0)(1)


——————————————-—————————————————————


7.function 创建及调用


REM 函数找到最大值
dim a,b,max
a = 5
b = 10
function compae(a,b)
if a>b then
max = a
else
max = b
end if
end function
compae a,b    '调用function 直接将其中的参数写在后面即可
msgbox "最大值为"&max


sub 关键字 及调用 call sub


REM 调用sub练习
sub abc
msgbox "调用abc"
end sub
call abc  '进行调用


结束的话有exit function 或者 exit sub

———————————————————————————————————

相关文章
|
XML 数据安全/隐私保护 数据格式
vbs和qtp一些脚本
********************************************************************************************** 用vbs调qtp '编写自动执行指定的QTP脚本的VBS:'利用QTP本身的Quicktest.
1100 0
VBS脚本实例
一、一键升级哨位台核心板程序脚本。 ############################################################ Set ws=WScript.CreateObject("wscript.
822 0