首页 > 代码库 > VBS基本语法
VBS基本语法
一、初识VBS
Vbs 是一种变量无关、解释性执行的脚本语言。vbs语言中不区分大小写。语句以换行结束。
dim 声明变量;批量名称声明,多个变量之间用逗号分隔:
set 赋值;
rem 注释,同 ‘
msgbox prompt,buttons,title,helpfile,context 输出 msgbox(s) 把两个不同的内容一起输出时用“+”连接
prompt 显示的字符串,最大为1024字符,如果换行用回车换行符组合 chr(13)&chr(10) buttons 默认值为0,为显示按钮值的参数
title标题,如果省略则交应用程序的名称显示在标题栏中;
helpfile字符串表达式,用于标识为对话框提供上下文相关帮助文件,如果提供了helpfile,则必须提供context
context 数值表达式,用于标识某个帮助文件的编号,必须与helpfile一起使用;
inputbox(msg,"title","傻逼") ‘第一参数为显示语句,最大长度为1024;第二为框体名称,第三为默认输入内容
msgbox的返回值有1-7七个数,依次来自:确定、取消、放弃、重试、忽略、是、否;
二、数据类型
在vbs中只有一个基本数据数据类型 Variant,variant中包含integer等子类型,用VarType()函数可返回数据的子类型的对应值;使用typename(对象)也可返回子类型;
子类型有:
byte,integer,long,single,duble,currency(货币值),decimal,date,string,boolean,empty(未初始化),null(无有效数据),object(一般对象),unknown,nothing(还未引用对象实例的对象变量),error
const 声明常量;也可用Private或者Public来改变变量的公有和私有属性;
dim A(10) 11元素数组,赋值A(2)=1,二维数组:B(2,2) 单点赋值B(1)(2)‘数组最高可为60维
变量的命名规则:
1、第一个字符必须是字母;
2、不能包含嵌入句点的语句;
3、长度不能超过255个字符;
4、在被声明的作用域内必须唯一;
三、运算符
1、算术运算符
+ 加
- 减
* 乘
/ 除
\ 整除
mod 取余(%)
^ 幂
& 字符串连接,字符串即用“”包围的内容
2、比较运算符
= 等于
<> 不等于
< 小于
> 大于
<= 小于等于
>= 大于等于
Is 对象引用比较
3、逻辑运算符
not 非
and 与
or 或
xor 异或
eqv 等价
imp 隐含
四、控制结构:
1、条件语句:
if...then
...else
if...then
...else
...
end if
select case
..
case
.. ...
case
.. ...
case else
...
end select
2、循环:
(1)、do...loop ‘重复执行do和loop之间的语句,直到exit do
exit do
(2)、while...wend
(3)、for...next.
(4)、for each ... next
五、函数
1、格式:
sub Name()
...
end sub
function xx()
...
end function
sub无返回值,function有返回值
2、常用函数:
asc(s) 返回s内第一个字母对应的ASCII码
chr(51) 将数字返回对应的字符
cbool() 返回表达式的boolean值
cByte() 将表达式转换为byte子类型的variant
cCur() 将表达式转换为currency
cdate() 将表达式转换为date
cdble() 将表达式转换为double类型
cint() 转换为integer
cLng() 转换为long
csng() 转换为single
cstr() 转换为string
isArray() 判断是否为数组,返回bool值;
isDate() 判断是否为日期,返回bool值;
isEmpty()判断是否已初始化,返回bool值;
isNumeric() 判断是否为数字,返回bool值;
isNull() 判断是否不包含有效数据,返回bool值;
isObject() 判断是否引用了有效对象,返回bool值;
len(() 返回字符串内的字符数或存储一变量所需要的字节数;
left(string,length) 返回从字符串左边算起的指定数目的字符;
mid(string,start,length) 从字符串中返回指定数目的字符;
right(string,length)从字符串中返回字符,从右边开始
InStr(start,str1,str2) 返回str2在str1中第一次出现的位置,start表示开始搜索位置,为可选;
Lcase(str) 返回字符串的小写形式;
UCase(str) 返回字符串的大写形式;
split(separator)分割字符串;
Date 返回当前日期;
Time 返回当前时间;
Now 返回日期和时间;
day(date) 返回日;
month(date) 返回月;
year(date) 返回年;
hour(time) 返回小时;
minute(time)返回分钟;
second(time)返回秒;
formatDateTime(date[,namedFormat]) 返回已格式化的时间
namedformat可选参数有:
vbGeneralDate (0)
vbLongDate (1)
vbShortDate (2)
vbLongTime (3)
vbShortTime (4)
六、异常处理
格式:
on error resume next
...
err.Clear
err.raise 6
对常见文件和数据库的访问:
set myobj = CreateObject("Scripting.fileSystemObject") 打开文本文件;
set myobj = CreateObject("Excel.Application")访问Excel
Set myobj = CreateObject("Microsoft.XMLDOM") XML文件访问;
set myobj = CreateObject("ADODB.Recordset") acess数据库访问;
set myobj = CreateObject("ADODB.Connection") SQLServer数据库访问;
日期文字和时间文字包含在两个#之间,如:#6-1-99#
scripting.filesystemobject 提供一整套文件系统操作函数
scripting.dictionary返回存放键值对的字典对象
wscript.shell提供一套读取系统信息的函数
wscript.network提供网络连接和远程打印机管理的函数
VBS基本语法