VBScript课件第06章 VBScript重要函数分析

合集下载

脚本语言VBSPPT演示文稿

13
3.2.3 VBScript中的变量
1．变量声明声明变量的一种方式是使用Dim语句、Public语句和
Private语句在Script中显式声明变量。例如： Dim number
声明多个变量时，使用逗号分隔变量。例如： Dim Top, Bottom, Left, Right
14
1．变量声明
2
3.1 VBScript简介
VBScript英文全称是“Microsoft Visual Basic Scripting Edition”，是一种脚本语言，它是程序开发语言Visual Basic家族的一个新成员。
它将灵活的Script脚本语言应用于更广泛的领域，包括Microsoft Internet Explorer中的Web客户机Script脚本语言和Microsoft Internet Information Server中的Web服务器 Script脚本语言，可以说VBScript的产生奠定了ASP发展的基础。
Variant是一种特殊的数据类型，根据不同的使用方式，它可以包含不同类别的信息。
因为Variant是VBScript中唯一的数据类型，所以它也是 VBScript中所有函数的返回值的数据类型。
Variant中包含的数值信息类型称为子类型。
8
3.2.1 VBScript的数据类型
例如： Variable=2008，VBScript会将它当成整数对待 Variable=“2008”，VBScript会将它当成字符串对待 Variable=“网页制作”，VBScript会将它当成字符串对待 Variable=20.08，VBScript会将它当成小数对待从上面看出，VBScript会根据赋值自动确定数据变量的数

VBScript基础教程

VBScript(Microsoft Visual Basic Script Editon).，微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言. 我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成.exe, 而是直接给用户发送.vbs的源程序, 用户就能执行了.VBS的基础教程第一篇（共六篇）我知道菜鸟现在最关心的就是用什么工具来开发VBS程序了, 答案是:记事本(Notepad)，我不是开玩笑, 其实任何一种文本编辑器都可以用来开发VBS开发, 只不过记事本是由系统自带的, 比较好找而已. 尽管如此, 我还是建议你去下载一个专业的文本编辑器, 因为这些工具可以提供 "语法高亮"等功能, 更加方便开发, 用哪一个随你喜好, 我比较喜欢Edit Plus，ScriptCryptor也不错OK, 我们先来写一个VBScript程序热热身.REM 输入并回显你的名字'使用InputBox和Msgbox函数'（上面与本行可以不必写入源代码中，下面才是运行的代码）Dim name,msgmsg="请输入你的名字:"name=Inputbox(msg)Msgbox(name)把上面的程序清单输入到记事本里面, 然后保存为以.vbs为扩展名的文件（如果在文件名上没有“.***”，就打开控制面板-文件夹选项-查看-取消隐藏已知文件类型的扩展名).然后双击, 观察运行结果.注意:为了使你学得更好，推荐自己输入程序清单, 尽量不要复制->粘贴我来解释一下这个程序, 第一行和第二行的开头分别是"REM"语句和" ' ", 这两个东西的作用是相同的, 表示之后的文字是注释, 就是说符号后的什么也不干,只是用来说明这段程序的功能, 信息等等. 注释行是程序最重要的部分之一, 尽管它不是必需的, 但对于其他人阅读源代码, 以与自己分析源代码是很有好处的. 好的习惯是在必要的地方加上清晰, 简洁的注释.Dim用来声明一个变量, 在VBS中, 变量类型并不是那么重要, 就是说VBS会帮你自动识别变量类型, 而且变量在使用前不一定要先声明, 程序会动态分配变量空间. 在VBS中你不用考虑name储存的是一个整数还是一个小数(学名叫"浮点数"), 也不用考虑是不是字符串(一串字符, 比如:"Hello World"), VBS会自动帮你搞定. 所以第三行语句可以删除, 效果不会变, 但我强烈反对这么做, 一个变量的基本原则就是:先声明,后使用.变量名用字母开头,可以使用下划线,数字, 但不能使用vbs已经定义的字, 比如dim, 也不能是纯数字.下一行被称之为"赋值", "="是赋值符号, 并不是数学中的等于号, 尽管看起来一样.这是正统的理解, 你要理解成等于也没有什么不可. 赋值号的左边是一个变量, 右边是要赋给变量的值, 经过赋值以后, msg这个变量在程序中等同于"请输入你的名字:"这个字符串,但当msg被再次赋值的时候, 原值就会消失. 不光字符串, 其他任何变量都这样被赋值, 例如: a=2, b=12.222等等.再往下,Inputbox和Msgbox是VBS建的函数, 一个函数就相当于一个"黑箱", 有输入(参数)和输出(返回)值, 你可以不用了解函数是怎么运作的, 只要了解这个函数能干什么就行了, 我们也可以定义自己的函数, 不过那要等到以后再讲. 现在我们只要了解, 一个函数可以有返回值也可以没有, 可以有参数也可以没有. 例如Inputbox就是有返回值的函数, 我们用赋值号左边的变量来"接"住InputBox的返回值--就是你输入的容. 在inputbox右边的括号里是参数列表, 每个参数用","分隔开, 每个参数有不同的功效, 比如第一个参数会显示在提示里, 我们把msg这个变量作为第一个参数传给了Inputbox 函数, 而msg="请输入你的名字:", 所以我们在对话框的提示栏就会看到"请输入你的名字:" 第二个参数是对话框的标题, 我们用直接量(学名叫"常量", 这里是"字符串常量")传递给函数, 当然你也可以传递变量. Inputbox还有很多参数, 比如你在"名称"后面再加一个","然后输入随便一串字符(字符串,用双引号""包裹起来的一串字符叫做字符串)然后运行, 看看结果. 你会发现用于输入的文本框有了默认的值, 这就是第三个参数的作用.Msgbox函数是用来输出的函数, 在VBS中没有专门的输出函数(BASIC 中的print,C中的printf), 所以我们只能用对话框来观察输出结果, Msgbox的必要参数只有一个, 就是要输出的容, 在这种情况下, 我们不需要理会msgbox的返回值. 关于Msgbox和Inputbox我们以后还会在讨论, 今天只是热热身, 到此为止.要点:1) 注释(以REM或'开头)行在程序中不起作用, 但能让别人更容易读懂你的程序.2) 变量好像一个盒子, 或一个代号, 可以代表你想代表的东西. 变量赋值使用"="3) 以""包裹起来的字符称之为"字符串"4) 函数像一个"黑箱", 有参数和返回值, 用"="左边的变量可以接住返回值5) Inputbox函数弹出一个输入对话框,Msgbox则用于输出作业:1) 试验Inputbox的第三个参数2) 写一段程序输出你的年龄3) 写一段程序进行3次输入, 分别输入你和你父母的(要求显示提示), 并分3次输出第二篇（共六篇）我真没想到, 第一次的作业竟然有人不会.看来要讲的非常非常细致才行, 嗯, 今天讲各种"量"和基本运算先说常量, 这个比较简单.什么是常量呢, 常量就是其值不可变化的量.常量分为两种:第一种, 自然常量. 这叫是因为它们本身就是常量,你怎么更改21的值呢? 他永远都是21, 不可能变成46如果你在程序中使用"21=46", 这样的语句将会引发一个错误. 同样的, 字符串也是常量 (还记得字符串吗? 就是包裹在""之间的一串字符), "Hello World"就是一个例子, 如果你使用"Hello World"="Bye"这样的语句同样会引发一个错误. 你能举出自然常量的更多例子吗?第二种, 是我们自己定义的常量,这种量也使用代号, 它们也被赋值, 但和变量的不同点在于, 他们在定义的时候被赋值,以后就不能改变了,如果企图改变将会引发一个错误. 定义一个变量,我们使用"const"这个关键字(关键字的意思是系统定义了有特殊功能的字, 不能作为变量名或常量名使用)格式是:const 常量名=常量值.例如:const PI=3.1415926const NAME="记忆碎片"这样我们就定义了两个常量, PI和NAME, 一般说来, 常量名全部使用大写, 但也可以不用, 随你喜好. 将一些在程序中不需要改变的值定义为常量是个好习惯, 这样能防止不必要的意外. 另外, 使用自定义常量也可以减少你的工作量. 比如:msgbox("Hello World")msgbox("Hello World")msgbox("Hello World")msgbox("Hello World")msgbox("Hello World")这个程序输出五次Hello World, 如果你想要改变输出为Bye-Bye, 就必须修改全部程序, 当然你可以手动修改5次, 但如果你要输出1000次呢? 常量就可以替我们解决这个问题:const hw="Hello World"msgbox(hw)msgbox(hw)msgbox(hw)msgbox(hw)msgbox(hw)这样当你要修改输出的时候只要修改hw的值就行了.好了, 现在我们来看看编程的第一块重要"基石":变量. 解释变量最好的办法我觉得是"盒子", 一个变量好像一个盒子, 里面只能装一个东西, 当你要装进去别的东西的时候必须把原有的东西拿出来. 这个"盒子"是有名称的, 当你在程序中使用变量的时候, 系统会打开盒子取出里面的东西, 让这些东西参与处理, 而不是盒子. 有些语言是很依赖"盒子"里面装些什么东西, 这样才能找到合适的"盒子"(比如C语言), 但VBS给我提供的是能够自动伸缩的"魔术盒", 我们不用关心装进去的是什么东西, VBS会自动调整盒子的大小. 例如:Dim a1,a2,a3a1=14a2=12.23a3="Hello"而不用像C语言那样麻烦: 或者是VB的正规声明(VB可以声明也可以不用)那样:int a1; Dim a1 as integerfloat a2; Dim a2 as Doublechar* a3; Dim a3 as stringa1=14; a1=14a2=12.23; a2=12.23a3="Hello"; a3="Hello"嗯……扯远了……变量有什么用呢? 哇, 那用处可大了. 最简单, 你并不能确定程序运行时变量的值, 比如前一节课我们编的输入的程序, 你不能确定InputBox返回的是什么(还记得Inputbox的返回值吗? 就是你输入的容), 所以你就没有办法应对各种情况, 但我们用name这个"盒子"把用户的名字装起来, 到用的时候我们只要知道name这个盒子的名字就行了, 系统会自己打开它并把里面的容拿出来用. 再举个例子, 我们编写一个程序计算一个矩形的面积, 比如这个程序要发给小学生使用:dim a,b,sa=15b=12msgbox(s)这样就可以求出长为15,宽为12的矩形的面积了, 是不是很简单? 当然, 这个程序也可以这样写:dim ss=15*12msgbox(s)这样看起来程序短了许多, 也节约存, 但两种都不是鼓励的做法, 为什么? 请看下面.现在, 我们的程序要变得像点样子才行, 谁的程序写出来还要别人修改源代码才能用啊?所以, 我们要接受用户的输入, 还记得吗? InputBox函数.修改后程序如下:dim a,b,sa=inputbox("请输入矩形的长:")b=inputbox("请输入矩形的宽:")s=a*bmsgbox(s)ok, 这么一修改, 无论用户输入怎样的数据, 我们都能计算出矩形的面积了. 如果你用s=15*12能改吗? 当然不行.我想你已经发现了, vbs中的数学计算和真正的算术没有什么不同, +,-,*,/,(),[],{}都是一样的用法, 比如:dim ansans=12+32/4+[(23-10)*2]msgbox(ans)四则运算的法则在编程中同样生效, 你可以在编程中重新获得小学时候的乐趣(你恨数学?那就别学电脑了).在编程中有一个有趣的运算符是"mod", 这个运算符叫做"取余运算符", 就是取得一次除法的余数, 例如dim aa=16 mod 5你知道a等于几吗? Bingo! 没错, 就是1. 因为16 / 5 =3....1, 所以mod计算的结果就是1.还有一个运算符是"^"(就是键盘"6"上面的小箭头), 他表示"乘幂"(或者是"方") 比如:dim a,b,ca=2b=a^2msgbox(b)msgbox(c)则b=a*a=4, c=a*a*a=8好了，我们一次不要讲太多, 这次就讲到这里, 现在总结一下.要点:1) 常量分为自然常量和自定义常量, 常量的值不可修改2) 变量就像盒子, 我们不在乎盒子里装的是什么, 但一定要知道盒子的名字3) 四则运算在编程中没有任何不同4) MOD是取余运算作业:1) 编一个程序, 计算圆形的面积, 半径由用户给出 (使用Inputbox) PI取值3.141592) 编一个程序取得20 / 3 的余数第三篇（共六篇）首先, 我来解决一下上次课程的几个疑问第一, 那个余数问题, 16 / 5 = 3……1, 是因为我改过前面的部分, 后面的忘了改了, 不好意思.第二, 请看一下程序清单:（1）Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=a*2+b*2Msgbox(c)这个输入1、2时是6（2）Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=(a+b)*2Msgbox(c)这个输入1、2时是24为什么会不一样呢? 在数学上c=(a+b)*2 和 c=a*2+b*2是等价的, 在VBS中也是如此. 问题出在"+"上, 在VBS中, +不仅仅是加号的意思还表示把两个字符串连接起来, 例如"Hello"+"World"="HelloWorld" ，have you understood? 你还记得InoutBox函数的返回值吗? 是字符串! 这就看出问题了吧, 在编程中"1"不等于(<>)1, "1"是一个字符, 而1是一个数, 所以a,b都是字符串变量, "1"+"2"="12", 这就好像我们小时跟伙伴开玩笑问他们1+1=?一样, 我们总是笑着说"错啦,应该是11".但为什么, a可以*2却不发生错误呢? 这时VBS比较智能的一个表现, 如果这个字符串的容是一个数且对他进行数学运算, 则把字符串强制转换成数参与运算, 如果字符串代表一个数, 但不参加数学运算, 而是参加字符串运算(合并)则当作字符串处理, 所以你看到a+b=12, 这时候a+b的结果(12)是一个字符串, 当它要乘以2的时候就被强制转换成了数字12, 这样我就得到了结果24.怎么修改这个程序呢? 我们需要用到另一个建的函数:int, int函数的功能是将输入值转化成整数值, 我们这样修改:c=(int(a)+int(b))*2这个意思就是把a作为参数传递给int函数, int函数就会返回那个整数(你的输入值), 然后让返回值参与运算, 这样就得到了正确答案.所以,以后如果你用的是inputbox函数的话,最好用int语句加工一下:比如c=int(c) 'c是你自己的变量另外，还有一个函数：CDbl。

《脚本语言VBS》PPT课件

如果Function过程无任何参数，则Function语句必须包含空括号（）。
Function过程通过函数名返回一个值，这个值是在过程的语句中赋给函数名的。
Function返回值的数据类型总是Variant。
3.3.1 VBScript中的过程
3．调用过程在代码中使用Sub和Function过程具体方法分别如
3.1 VBScript脚本语言简介
大多数脚本代码包含在Sub或Function过程中，过程中的代码只有当过程被调用时才被执行。
有时VBScript代码放在过程之外、Script块之中。这类代码仅在HTML页面加载时执行一次。
这样就可以在加载Web页面时初始化数据或动态地改变页面的外观。
对VBScript有大概了解后，下面可以开始VBScript 脚本语言的学习了。
在基于0的数组中，数组元素的数目总是括号中显示的数目加1 。这种数组被称为固定大小的数组。
在数组中使用索引为数组的每个元素赋值。从0到2，将数据赋给数组的元素，如下所示：
<% Dim A(2) A(0) = 256 A(1) = 324 A(2) = 100
%>
3.3 VBScript的过程和函数
下：（1）调用Function过程时，函数名必须用在变量赋
值语句的右端或表达式中。例如： Temp = Celsius(fDegrees)
或 MsgBox “温度为“&Celsius(fDegrees) & “摄氏度。 ”
3．调用过程
（2）调用Sub过程时，只需输入过程名及所有参数值，参数值之间使用逗号分隔。不需使用Call 语句，但如果使用了此语句，则必须将所有参数包含在括号之中。

VBScript脚本语言讲义

. TypeName及VarType函数介绍，示例程序如下：可用VarType 函数来返回某个数据的Variant 子类型，如下面的代码：Dim strInput,strVarType,strTypeNamestrInput="hello world"MsgBox strInputstrVarType=VarType(strInput)MsgBox "VarType:"&strVarTypestrTypeName=TypeName(strInput)MsgBox "TypeName:"&strTypeName问题：如下三段语句，结果分别是什么？Dim VarTypeCheckVarTypeCheck = VarType(300)MsgBox VarTypeCheckVarTypeCheck = VarType(#10/19/62#)MsgBox VarTypeCheckVarTypeCheck = TypeName("VBScript")MsgBox VarTypeCheck. Option Explicit 声明，如果变量没有定义就使用要报错：Option ExplicitDim MyDateMyDate = "October 19, 1962"If IsDate(MyDate) thenMyShortDate = CDate(MyDate)End ifMsgBox MyShortDate变量的作用域与存活期：Dim strMainCall ChangeValueSub ChangeValue()Dim strSubstrMain="hello world!"MsgBox "strMain InSub:"&strMainstrSub="hello liuxiaolin"MsgBox "strSub InSub:"&strSubEnd SubMsgBox "strMain in Main:"&strMainMsgBox "strSub in Main:"&strSub数组的定义：Dim 数组名（n）实际上数据会有n+1个元素，下标从0到nDim MyArray(10),iFor i=0 To 10MyArray(i)=iMsgBox MyArray(i)NextMsgBox "min is "&LBound(MyArray) '返回数组的最小可用下标MsgBox "max is "&UBound(MyArray) '返回数组的最大可用上标利用Redim重新定义数据的大小，加上preserve关键字保存原来数组的内容：Dim MyFamily()ReDim MyFamily(1)MyFamily(0)="0"MyFamily(1)="1"ReDim MyFamily(2).'ReDim Preserve MyFamily(2)MyFamily(2)="2"Dim iFor i=0 To 2MsgBox MyFamily(i)Next在字符串中回车换行的方法：chr(13)&chr(10) / vbCr&vbLf / vbCrLf / vbNewLineDim str,str1,str2,str3,str4str="how are you fine,thank you!"str1="how are you"&chr(13)&chr(10)&"fine,thank you!"str2="how are you"&vbCr&vbLf&"fine,thank you!"str3="how are you"&vbCrLf&"fine,thank you!"str4="how are you"&vbNewLine&"fine,thank you!"MsgBox strMsgBox "str1:"&str1MsgBox "str2:"&str2MsgBox "str3:"&str3MsgBox "str4:"&str4Chr用法：Dim strstr=chr(34) & "Hello" & chr(34)MsgBox str.Const常量Const a=1a=2IF…THEN…ELSEIF…ELSE…END IF语句：Dim House,CarHouse=NullCar=nullIf IsNull(House) Or IsNull(Car) ThenMsgBox "现在我们还不成熟，还是再等等吧！"ElseMsgBox "OK,我嫁给你！"End If课堂练习：找出3个整数中的最大数并输出，三个整数存在三个变量intA，intB，intC中.Dim intA,intB,intC,maxintA=8intB=5intC=3If intA>=ntB Thenmax=intAelsemax= intBEnd IfIf max>=intC ThenMsgBox maxElseMsgBox intCEnd IfDim intA,intB,intC,tempintA=CInt(InputBox("请输入整数A:"))intB=CInt(InputBox("请输入整数B:"))intC=CInt(InputBox("请输入整数C:"))If intA>=intB Thentemp =intAelsetemp =intBEnd IfIf temp >=intC ThenMsgBox tempElseMsgBox intCEnd IfSelect…case…case else…End Select语句：Dim strstr=InputBox("请输入你要说的话！")Select Case strCase "hello"MsgBox "hello"Case "how are you"MsgBox "fine,thank you "Case ElseMsgBox "thanks"End Select.Case后接的表达式可以是任意字符，如：case 1，也可以是多个表达式，如：case 5,6,7，但是vbs中不支持给出case后的范围的格式课堂练习：输入一个字符，判断字符类型：大写、小写、数字、其他。

VBScript常用函数总结

VBScript常⽤函数总结下⾯是我总结的VBScript中常⽤的函数及其⽤法。

说明：You use the GetROProperty method to retrieve the current value of a test object property from a run-time object in your application. ⼀般来说，所有的对象都可以使⽤此⽅法得到运⾏时对象的实际值。

语法：object.GetROProperty （Property， [PropertyData]）如 ButtonName=Browser（"QA Home Page"）。

Page（"QA Home Page"）。

WebButton（"Submit"）。

GetTOProperty（"Name"）说明：Waits until the specified object property achieves the specified value or exceeds the specified timeout before continuing to the next step. 此⽅法可以解决由于等待系统进⾏处理某些操作或⽹络原因引起的测试对象同步问题。

语法：object.WaitProperty （PropertyName， PropertyValue， [TimeOut]）如 Window（"Test"）。

Static（"Status："）。

WaitProperty "text"， "Ready"， 30000 Returns the position of the first occurrence of one string within another. 可以得到⼀个字符串在另外⼀个字符串中⾸次出现的位置。

vb第六章(过程).ppt

If a<b Then
call swap(a,b)
‘过程的调用, 或swap a,b
End If
(主调过程)
Print a,b
End Sub
求组合数
Cmn
m! n!(m
n)!
'定义求阶乘的Sub子过程fac Private Sub fac(ByVal n As Integer, f As Long) ‘过程定义
End If j=j+2 Loop End Sub
‘用For循环如何实现？
四、参数的传递
参数传递：调用时把实参的值或地址传递给形参。
1. 形参和实参 2. 按值传递与按地址传递 3. 数组参数的传递
1.形参和实参（1）形参（形式参数）
出现在被调过程(定义Sub子过程或 Function函数过程)的形参表中的变量名（除定长字符串变量外）、数组名。
见求组合数 .vbp
三. Function函数过程的定义及其调用
函数过程是带有返回值的特殊过程。
1、定义
[Public|Private][Static] Function 函数名([参数列表]) [AS 类型]
局部变量或常数定义语句块函数名=表达式 [Exit Function ] 语句块函数名=表达式
Dim i As Integer f=1 For i = 1 To n
f=f*i Next i End Sub
' “=”的click事件
Private Sub Command1_Click()
Dim m As Integer, n As Integer
Dim fm As Long, fn As Long

VBS基础篇-vbscript常用函数及功能

VBS基础篇-vbscript常⽤函数及功能vbs常⽤函数函数名语法功能Abs Abs(number)返回⼀个数的绝对值Sqr Sqr(number)返回⼀个数的平⽅根Sin Sin(number)返回⾓度的正⽞值Cos Cos(number)返回⾓度的余⽞值Tan Tan(number)返回⾓度的正切值Atn Atn(number)返回⾓度的反正切值Log Log(number)返回⼀个数的⾃然对数Int Int(number)取整函数，返回⼀个⼩于number的第⼀整数FormatNumber FormatNumber(number， numdigitsafterdecimal)转化为指定⼩数位数(numdigitsafterdecimal)的数字Rnd Rnd()返回⼀个从0到1的随机数Ubound Ubound(数组名，维数)返回该数组的最⼤下标Lbound Lbound(数组名，维数)返回最⼩下标数注释：Rnd 函数语法：Rnd[(number)]返回⼀随机数。

参数 number 可以是任何的数值表达式。

注解:Rnd 函数返回的随机数介于 0 和 1 之间，可等于 0，但不等于 1。

number 的值会影响 Rnd 返回的随机数：Number的取值返回值⼩于0每次都是使⽤numbe当做随机结果。

⼤于0随机序列中的下⼀个随机数。

等于0最近⼀次产⽣过的随机数。

省略随机序列中的下⼀个随机数。

各种转换函数及功能函数功能CStr(variant)将变量variant转化为字符串类型CDate(variant)将变量variant转化为⽇期类型CInt(variant)将变量variant转化为整数类型CLng(variant)将变量variant转化为长整数类型CSng(variant)将变量variant转化为single类型CDbl(variant)将变量variant转化为double类型CBool(variant)将变量variant转化为布尔类型注释：1整型2、长整型Long(长整型) ，其范围从 -2,147,483,648 到 2,147,483,647。

《VBS基础教程》课件

《VBS基础教程》PPT课件
# VBS基础教程PPT课件大纲
第一部分：VBS概述
什么是VBS?
VBS是一种脚本语言，用于Windows平台的系统管理和任务自动化。
VBS的应用领域
VBS广泛应用于系统维护、网络管理、办公自动化等领域。
VBS与VB的关系
VBS是VBScript的简称，是VB的一种方言，但只用于脚本编程。
第二部分：VBS语法基础
1
声明变量
ቤተ መጻሕፍቲ ባይዱ
使用Dim关键字声明变量，例如：
数据类型
2
Dim x。
VBS支持多种数据类型，如字符串、
整数、浮点数等。
3
运算符和表达式
VBS拥有丰富的运算符和表达式，用
控制语句
4
于数学计算和逻辑判断。
VBS提供了多种控制语句，包括条件
语句和循环语句。
5
过程和函数
通过定义过程和函数，可以使代码更有组织性和可复用性。

VBS常用函数

WinCC VBscript常用标准函数总结在WinCC软件中使用VBS进行编程的时候常常使用的标准函数整理如下：数值型函数：abs(num): 返回绝对值sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负hex(num): 返回十六进制值直接表示：&Hxx 最大8位oct(num): 返回八进制值直接表示：&Oxx 最大8位sqr(num): 返回平方根 num>0int(num): 取整 int(99.8)=99; int(-99.2)=100fix(num): 取整 fix(99.8)=99; fix(-99.2)=99round(num,n): 四舍五入取小数位 round(3.14159,3)=3.142 中点数值四舍五入为近偶取整round(3.25,1)=3.2log(num): 取以e为底的对数 num>0exp(n): 取e的n次幂通常用 num^nsin(num): 三角函数，以弧度为值计算(角度*Pai)/180=弧度con(num); tan(num); atn(num)2.字符串函数：len(str)：计算字符串长度中文字符长度也计为一！mid(str,起始字符,[读取长度])：截取字符串中间子字符串left(str,nlen)：从左边起截取nlen长度子字符串right(str,nlen)：从右边起截取nlen长度子字符串Lcase(str)：字符串转成小写Ucase(str)：字符串转成大写trim(str)：去除字符串两端空格Ltrim(str)：去除字符串左侧空格Rtrim(str)：去除字符串右侧空格replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串注：默认值：起始字符 1；替代次数不限；比较方法区分大小写（0）。

第3章--VBScript编程基础ppt课件(全)

Dim lngSum (19)
• 3.2.3 变量的赋值
变量的赋值比较简单。一般情况下，编制表达式的左边，要赋的值在表达式的右边。变量的赋值方式可以采用以下方式： • “=”号赋值。例如给变量count赋值100，如下：
count = 100 • 直接使用函数返回值。例如：
A=GetValue(b,c) • 复制对象的赋值。该赋值方式需要使用Set，例如：
Байду номын сангаас
3.5 VBScript中常量的定义
常量就是拥有固定数值的名称，常量可以代表字符串、数字等常数。常量一经声明，在程序执行期间，其值不会发生改变。
声明常量后可以在程序的任何部分使用该常量来代表特定的数值，从而方便程序的编写。例如，在计算程序中常用PI来表示π的近似值3.141 592 6，这样即不容易出错，程序也更加简洁明了。这样，在程序的其他地方就可以使用PI来表示π的近似值了。例如：
<% Const PI=3.1415926 S=PI*R^2
%>
'指定PI为常量，其值为3.141 592 6 '求半径为R的圆的面积，并将值赋给S
3.6 赋值语句
与其他编程语言一样，VBScript中也包含一些基本的语句。这些语句主要可分为赋值语句、条件语句与循环语句3类。其中条件语句与循环语句能够在程序中控制程序的流程，而赋值语句的作用是将一个数据赋给一个变量。在VBScript中，赋值语句就是一条赋值表达式，其一般形式为：
变量 = 表达式
其中，变量可用是数值变量，也可以是字符串变量。同样，表达式可以是数值型表达式或字符串表达式。变量的类型应与表达式的类型一致。例如以下代码声明一个变量，并给变量count赋值10。

VBScript

3、数组大小的更改格式1：redim [preserve] 数组名(10) 重新定义一个数组的大小说明：如果带有preserve则数组原来的值将不会丢失例： dim arrA() redim arrA(2) arrA(0)=23 arrA(1)=45 arrA(2)=29 redim arrA(10) alert(arr上，VBScript主要适用于微软的IE浏览器及微软的 Internet Information Server中，在其它系统中使用VBScript可能并不受支持。
1、在 HTML静态页面中添加 VBScript 代码(浏览器客户端代码) 格式：VBScript中每行不需要结束符。第一个Hello world程序例1：<SCRIPT LANGUAGE="VBScript"> msgbox "Hello World! " </SCRIPT> 例2： <SCRIPT FOR="Button1" EVENT="onClick" LANGUAGE="VBScript“ defer> msgbox “按钮被单击! " </SCRIPT> <INPUT TYPE="Button" NAME="Button1" VALUE="单击"> 例3： <SCRIPT LANGUAGE=“VBScript“ src=“文件名.vbs”></SCRIPT>
1、什么是常量常量是指在程序中声明时必须赋值，一旦声明之后就不能更改的量。 2、声明常量格式：const 常量名称=值例： const A=100 const MyString=“我的网站标题” const ToDay1=#2006-4-10# const PI=3.14159 alert(pi) 3、VBScript的内置常量 1)、Empty 2)、true 3)、false 4)、vbCrLf 5)、vbTab 6)、vbRed 空对象逻辑真逻辑假回车换行符制表符红色

《VBScript脚本语言》PPT课件

《ASP程序设计》
4
泉州师范学院计算机科学与技术
3.1.2
VBScript与JavaScript
ASP中的缺省语言是VBScript。
脚本语言的设置方法主要有：在IIS中设定。在网页中指定脚本语言 <% @LANGUAGE=VBScript%>或 <% @LANGUAGE=VBScript%> 利用<Script>设定脚本语言，例如： <Script language="Vbscript">
静态网页的功能有很大的局限性，因此具有强大的交互能力的动态网页得到了广泛的流行。 VBScript是目前进行动态网页开发中必不可少的一种脚本语言。
《ASP程序设计》
3
泉州师范学院计算机科学与技术
3.1.1
VBScript概述
HTML语言编写的网页是一种静态文档。脚本语言和HTML标记一起编写动态网页，这种网页可以被服务器执行。脚本语言是介于HTML和Java、Visual Basic等编程语言之间的语言，可使用任何文本编辑器编写，保存为纯ASCII文本文件。目前比较流行的脚本语言主要有两种，即 VBScript和JavaScript。
FOR：指定与事件相关联的对象
《ASP程序设计》
6
泉州师范学院计算机科学与技术
3.1.3
VBScrip端脚本 LANGUAGE=VBScript 在 Web 服务器上执行， RUNAT=server> 由服务器根据脚本的 <!— 执行结果生成相应的脚本代码 HTML 页面并发送到客 --> 户端浏览器中并显示 , </SCRIPT> 不受浏览器的限制。 <% VBScript 脚本程序片段 %>

VBS入门PPT课件

自定义常量
定义常量使用Const语句。例： Const a=“这里是一个字符串常量” Const b=1627’这是一个数值型常量
与C语言中的#define 宏的作用类似
内部常量
在使用之前不需要定义，是VBS脚本系统中自带的缺省常量值。
下面列举一些常用的内部常量:
日期和时间常量
常量 vbSunday vbMonday vbTuesday vbWendseday vbThursday vbFriday vbSaturday vbUsesystem
A = 123 B = “这是一个字符串变量”
变量声明
VBS中声明变量使用Dim语句。如：Dim world Dim a，b，c
命名规则：VBS中的变量命名规则和c中是一样的。必须以字母开头，可以包含字母、数字和下划线，长度不超过255个字符，在被声明的作用域内必须唯一。
常量
常量分为内部常量和自定义常量两种。
Dim a(1,2) a(0,0)=1 a(0,1)=2 a(0,2)=3 a(1,0)=4 a(1,1)=5 a(1,2)=6
c语言：int a[6]; a[0]=1; a[1]=2; …..
动态数组
• 在声明数组时未给出数组的大小
Dim Larray( )
在使用动态数组时，用ReDim语句指出该
数值 1 2 3 4 5 6 7 0
描述星期日星期一星期二星期三星期四星期五星期六使用计算机区域设置中的日期格式
C语言： #define vbSunday 1
字符串常量
常量 vbCr vbCrLf vbFormFeed vbLf vbnewline
vbNullChar vbTab