QTP中常用的VB函数
VB常用函数介绍
VB常用函数介绍一、常用内部函数在VB内部提供了大量函数。
在这些函数中，有些是通用的。
有些则与某种操作有关的。
大体分成五类，分别是：转换函数、数学函数、日期函数、时间函数和随机函数。
（1）转换函数函数名功能Int(x) 返回不大于自变量的最大整数。
Fix(x) 去掉一个浮点数的小数部分,保留其整数部分。
Hex(x) 把一个十进制数转换成为十六进制数。
Oct(x) 把一个十进制数转换成为八进制数。
Asc(x) 返回字符串中第一个字符的ASCII码。
Chr(x) 把值转换为相应的ASCII字符。
Str(x) 把值转换为一个字符串Cint(x) 把小数部分四舍五入，转换为整数。
Ccur(x) 把值转换为货币类型，小数部分最多保留4位。
CDbl(x) 把值转换为双精度数值。
CLng(x) 把值小数部分四舍五入转换为长整型数值。
CSng(x) 把值转换为单精度数值。
CVar(x) 把值转换为变体类型值。
（2）数学函数函数名功能Sin(x) 返回正弦值。
Cos(x) 返回余弦值。
Tan(x) 返回正切值。
Atn(x) 返回反正切值。
Abs(x) 返回绝对值。
Sgn(x) 返回自变量的符号。
即：值为负数时，函数返回-1值为0时，函数返回0值为正数时，函数返回1Sqr(x) 返回自变量x的平方根，自变量必须大于或等于0。
Exp(x) 返回以e为底数，以x为指数的值，即求e的x 次方。
（3）日期函数函数名功能Day(Now) 返回当前的日期。
WeekDay(Now) 返回当前的星期。
Month(Now) 返回当前的月份。
Year(Now) 返回当前的年份。
（4）时间函数函数名功能Hour(Now) 返回小时（0~23）。
Minute(Now) 返回分钟（0~59）。
Second(Now) 返回秒（0~59）。
（5）随机函数Rnd(x) 产生一个0~1之间的单精度随机数Rnd函数可以产生随机数，当一个应用程序不断地重复使用随机数时，同一序列的随机数会反复出现，用Randomize语句可以消除这种情况。
VB常用函数(很全)
Abs 函数返回数的绝对值。
And 运算符执行两个表达式的逻辑连接。
Array 函数返回含一数组的变体。
Asc 函数返回字符串首字母的ANSI 字符代码。
赋值运算符(=) 给变量或属性赋值。
Atn 函数返回数的反正切值。
调用语句将控制移交Sub 或Function 过程。
CBool 函数返回已被转换为Boolean 子类型的变体的表达式。
CByte 函数返回已被转换为字节子类型的变体的表达式。
CCur 函数返回已被转换为货币子类型的变体的表达式。
CDate 函数返回已被转换为日期子类型的变体的表达式。
CDbl 函数返回已被转换为双精度子类型的变体的表达式。
Chr 函数返回指定ANSI 字符码的字符。
CInt 函数返回已被转换为整数子类型的变体的表达式。
Class 对象提供对已创建的类的事件的访问。
Class 语句声明类名Clear 方法清除Err 对象的所有属性设置。
CLng 函数返回已被转换为Long 子类型的变体的表达式。
颜色常数颜色常数列表。
比较常数用于比较运算的常数列表。
连接运算符(&) 强制两个表达式的字符串连接。
Const 语句声明用于字母值的常数。
Cos 函数返回角度的余弦值。
CreateObject 函数创建并返回对“自动”对象的引用。
CSng 函数返回已被转换为单精度子类型的变体的表达式。
CStr 函数返回已被转换为字符串子类型的变体的表达式。
日期和时间常数在日期和时间运算中用来定义星期几和其他常数的常数列表。
日期格式常数用于日期和时间格式的常数列表。
Date 函数返回当前系统日期。
DateAdd 函数返回加上了指定的时间间隔的日期。
DateDiff 函数返回两个日期之间的间隔。
DatePart 函数返回给定日期的指定部分。
DateSerial 函数返回指定年月日的日期子类型的变体。
DateValue 函数返回日期子类型的变体。
Day 函数返回日期，取值范围为1 至31。
QTP常用的VBS脚本
1)生产随机数列第一种方法randomize'更新反回的数据funcation rand(k,n)n="int((k-1)*rnd+1) rand=nend funcation第二种方法n="randomnumber.value(1,255)2)wintreeview一些操作选择一个条目:wintreeview.select(item)'根是0根的名称：wintreeview.getitem(0)3)QTP中用代码连接数据库Set Conn = CreateObject("ADODB.Connection" )str="DRIVER=Oracle in OraHome92;SERVER=192.168.0.1;DBQ=testdb;user id=test; password=test"Conn.open strSet Rs = CreateObject ("ADODB.Recordset" )sql= "select * from user_table t where table_name = 'XXX' "Rs.open sql,conn',1,34)QTP如何测试鼠标右键菜单以QTP附带的订票网站sample为例，edit控件username鼠标右键，点击paste（第4个菜单项）cur_replay_type = Setting.WebPackage("ReplayType")'Run mouse operations using the mouse, if 1 using browser eventsSetting.WebPackage("ReplayType") = 2Browser("Browser").Page("Welcome:Mercury Tours").WebEdit("userName").Click micRightBtnSetting.WebPackage("ReplayType") = cur_replay_typeindex=4Set WshShell = CreateObject("Wscrīpt.Sh ell")For i = 1 To indexWshShell.sendKeys "{DOWN}"NextWshShell.sendKeys "{ENTER}"Set WshShell = nothing5)QTP测试页面字体颜色的办法set ōbj = Browser().Page().WebElement().Object' Get the objectset iStyle= obj.currentstyle' Get the attributesColor = iStyle.color6)从QC自动启动qtp如何自动加载插件'此函数用于加载指定Test所有的插件，若要运行Test可自己加个qtApp.Test.Run Function Load_Addins(testPath)Dim qtApp 'As QuickTest.ApplicationDim blnNeedChangeAddinsDim arrTestAddinsSet qtApp = CreateObject("QuickTest.Application")arrTestAddins = qtApp.GetAssociatedAddinsForTest(testPath)blnNeedChangeAddins = FalseFor Each testAddin In arrTestAddinsIf qtApp.Addins(testAddin).Status <> "Active" ThenblnNeedChangeAddins = TrueExit ForEnd IfNextIf unched And blnNeedChangeAddins ThenqtApp.QuitEnd IfIf blnNeedChangeAddins ThenDim blnActivateOKblnActivateOK = qtApp.SetActiveAddins(arrTestAddins, errorDescrīption) If Not blnActivateOK ThenCall ErrorLog(errorDescrīption) '这里是调用自己的日志函数，可替换为自己的或注释掉Wscrīpt.QuitEnd IfEnd IfIf Not unched ThenunchEnd IfqtApp.Visible = TrueqtApp.Open testPath'可在此加入qtApp.Test.Run来运行TestSet qtApp = NothingEnd Function7)换行符vbcr----chr(13)回车符vblf----chr(10)换行符vbcrlf----chr(13)+chr(10)结合type(chr(13)就相当于按了一上键盘上的enter8)防程序中断方法On error resume nextOn error goto 09)"is+*"类型functionisarray '是否是数组isconnected '判断QTP是否连接到TDisdate '是否是合法的日期类型isempty '判断是否初始化isNull '判断是否为空值isNumeric '判断是否是数字型isobject '判断是否一个功能对象isready '判断设备是否准备就绪isRootFolder '是否是根目录10)WScript.Shell的一些应用set WshShell = CreateObject("WScript.Shell")WshShell.SendKeys "{ENTER}" '模拟键盘进行操作WshShell.AppActivate "Calculator" '启动应用程序' 利用粘贴板，实现中文输入strCopy = "软件测试."Set bjIE = CreateObject("InternetExplorer.Application")objIE.Navigate("about:blank")objIE.document.parentwindow.clipboardData.SetData "text", strCopyobjIE.Quitwait 1Setting.WebPackage("ReplayType")=2Set bj=createobject("wscrīpt.shell")obj.sendkeys "{TAB}"wait 2obj.sendkeys "^v"wait 1Setting.WebPackage( "ReplayType")=111)childobjects的应用childobject可以返回界面上满足条件的对象集合，而且与对象库里是否有这些对象无关，这就可以简化对象库；返回的对象集合的count方法可以返回对象个数，这就可以通过下标对单个对象进行操作；在出现index标识对象时可以进行运用.如:' Find All WebEdit Objects on a Web Page and Set a Value for a Specific One Sub ChildObjects_Example()Dim EditToSearch, ValueToSet, NumberOfEditsEditToSearch = "credit_card_number"ValueToSet = "3558986773230578"Set Desc = Description.Create()oDesc("micclass").Value = "WebEdit"oDesc("name").Value = "credit_card_number"Set EditCollection = Browser("Book a Flight: Mercury").Page("Book a Flight: Mercury").ChildObjects(oDesc)NumberOfEdits = EditCollection.CountFor i = 0 To NumberOfEdits - 1If EditCollection(i).GetROProperty("name") = EditToSearch ThenEditCollection(i).Set ValueToSetEnd IfNextEnd Sub12)关闭所有IESystemUtil.CloseProcessByName("iexplore.exe")13)启动IE的语句：SystemUtil.Run "iexplore.exe", "http://www.***.com/"关闭IE或其他程序的语句：SystemUtil.CloseProcessByName "app.exe"SystemUtil.CloseProcessByWndTitle "Some Title"14)引用自定义环境变量Environment.LoadFromFile "D:\询价\case\环境\huiyuan.xml"15)环境变量有2种，一种是QTP的内置变量，一种是用户自定义的变量。
qtp第二章vbs部分
煤炭科学研究总院软件所测试组
2、VBS的数组与类
所谓数组，就是相同数据类型的元素按一定顺序排列的集合。 数组的定义 Dim a(3)
a(0)=0:a(1)=1:a(2)=2:a(3)=3 „同一行赋值有冒号分开
msgbox (a(0)&“,”&a(1)&“,”&a(2)&“,”&a(3)) „&连接字符串 改变数组长度 ReDim [Preserve] a(2) „Preserve可省,添加可保留之前的值 Lbound（数组名）和Ubound（数组名）可获取数组的最小下 标和最大下标 Dim a(2) msgbox ("L:"&Lbound(a)&",U:"&Ubound(a))
煤炭科学研究总院软件所测试组
1、VBS的变量、常量与数据类型
Variant 子类型（可利用函数相互转换）
Empty Null Boolean Byte Integer Long 未初始化的 Variant。对于数值变量，值为 0；对于字符串变量，值为零长度字符串 ("")。 不包含任何有效数据的 Variant。 包含 True 或 False。 包含 0 到 255 之间的整数。 包含 -32,768 到 32,767 之间的整数。 包含 -2,147,483,648 到 2,147,483,647 之间的整数。
煤炭科学研究总院软件所测试组
4、VBS的条件语句与循环语句
Do… loop while Dim counter, myNum counter = 0:myNum = 20 Do myNum = myNum – 1:counter = counter + 1 Loop While myNum > 10 MsgBox "循环重复了 " & counter & " 次。"
VB中常用的表达式、函数、运算符
VB中常用的表达式、函数、运算符1、VB中的表达式类型有:(1)算术表达式(2)字符串表达式(3)关系表达式(4)逻辑表达式（1）算术运算符（＋、－、*、／、\、MOD、^）例:62MOD9＋2^3=16（2）VB中常用的字符串运算符有”&”和”+”（连接）功能:把参加运算的字符串按原来的顺序首尾相接,组成新的字符串。
“I am a ” & “teacher”=“I am a teacher”（3）关系表达式的值为布尔型的值True 或False关系表达式的运算顺序是：先进行算术运算或字符串运算，然后再进行比较运算。
其运算结果是一个逻辑值，即True(真)或False(假)。
如果条件成立，则关系表达式取True；如果条件不成立，则关系表达式的值为False。
如果关系运算符的两边表达式的运算结果是数值，则按其大小比较。
例如：a<b(a=3,b=4) 其值为Truex+y>5(x=3,y= -2) 其值为False（4）逻辑表达式的值也是布尔型的值True 或False逻辑运算符：not、and、or 3种2、在VB中,几种不同性质的运算符的优先级别如下:算术运算符>字符运算符>关系运算>逻辑运算3、Vb函数的含义及使用方法函数名称函数功能Cbool(string) 转换为布尔值Cbyte(string) 转换为字节类型的值Ccur(string) 转换为货币类值Cdate(string) 转换为日前类型的值Cdbl(string) 转换为双精度值Cint(string) 转换为整数值Clng(string) 转换为长整型的值Csng(string) 转换为单精度的值Cstr(var) 转换为字符串值Str(var) 数值转换为字符串Val(string) 字符串转换为数值****** ************ ******Abs(nmb) 返回数子的绝对值Atn(nmb) 返回一个数的反正切Cos(nmb) 返回一个角度的余炫值Exp(nmb) 返回自然指数的次方值Int(nmb) 返回数字的整形（进位）部份Fix(nmb) 返回数字的整形（舍去）部份Formatpercent(表达式) 返回百分比Hex(nmb) 返回数据的16进制数Log(nmb) 返回自然对数Oct(nmb) 返回数字的8进制数Rnd 返回大于“0”而小于“1”的随机数Sgn(nmb) 判断一个数字的正负号Sin(nmb) 返回角度的正铉值Sqr(nmb) 返回数字的二次方根Tan(nmb) 返回一个数的正切值Asc(string) 返回ASCII字符串Chr(charcode) 根据字符代码返回字符Instr(string,searchstr) 返回被搜索字符串的第一个字符位置，string是字符串，searchstr是被搜索的字符串InstrRev(string,searchstr) 同上，只是从右面开始搜索Lcase(var) 把字符串变为小写Left(string,nmb) 从string中返回从左面开始的nmb个字符串Len(string) 返回字符串的长度Ltrim(string) 截去字符串左边的空格Filter(inputstrings,value) 返回字符串数组的字集，Inputstrings是字符串组，value是在数组中寻找的字符Rtrim(string) 截去字符串右边的空格Trim(string) 截去字符串前后空格Mid(string,start,len) 在string中返回从start位置开始的len个字符Replace(string,find,withstr) 在字符串string中，用withstr来替换find字符串Right(string,nmb) 从string中返回从右面开始的nmb个字符串Space(nmb) 返回指定空格的字符串StrComp(string1,string2) 比较两个字符串Ucase(string) 把字符串变为大写****** ************ ******Date() 返回当前系统日期DateAdd(interval,nmb,date) 用一个基础时间返回指定增加了时间间隔的日期，interval是间隔类型，yyyy－年，m－月，d－日，h－小时，n－分。
VB常用函数大全(数学函数)
P=Replace(X,S,R)
[说明]：将字符串X中的字符串S替换为字符串R，然后返回。
[范例]：
X=”VB is very good”
P=Replace(X,good,nice)
输出结果为：P=”VB is very nice”
5. StrReverse：反转字符串
现在的编程软件像VB，C++等，大多自带功能很强的函数库，可以很省力得完成各种功能。很多时候，想不起来实现某个功能的函数或函数格式，导致编程大费周折。作为一个编程人员，我对此深有体会。因此，特地准备了几期VB常用函数的介绍，供大家学习或参考。有说的不当之处，也欢迎在本网站的论坛中提出，大家学习。
（2） 若日期D大于当月的日数，则日期从当月的日数起，向后推算D-当月日数；若小于1，则日期从1日起向前推算1-D日。
[范例]：
P=DateSerial(2000,02,02)
则结果为P=2000/02/02
4．TimeSerial函数：合并时，分，秒成为时间
[格式]：P=TimeSerial(H,M,S)
9. Tan(N) 正切函数
例：Tan(0) 结果：0
10.Atn(N) 反切函数
例：Atn(0) 结果：0
[注意]：在三角函数中，以弧度表示。
(一)字符串类函数：
1. ASC(X)，Chr(X)：转换字符字符码
[格式]：
P=Asc(X) 返回字符串X的第一个字符的字符码
2. Int(X),Fix(X)：取X的整数值
[格式]：
P=Int(X) ' 取<=X的最大整数值
P=Fix(X) ' 取X的整数部分，直接去掉小数
VB函数说明及使用方法
VB函数说明及使用方法VB（Visual Basic）是一种基于事件驱动的编程语言，由微软公司开发。
它具有易学、易用的特点，是一种适用于Windows操作系统的高级编程语言。
VB函数是VB语言中常用的一种函数，用于进行数据处理和逻辑控制等操作。
VB函数的语法形式为：```[访问类型] Function 函数名(参数列表) As 返回值类型函数体[Exit Function]函数名=返回值[End Function]```其中- 访问类型：指定函数在程序中的可见性，可以包括Public（公共的）、Private（私有的）、Protected（受保护的）等。
-函数名：为函数定义的标识符，用于调用函数。
-参数列表：函数的输入参数，在括号内列出各个参数的名称和数据类型。
-返回值类型：函数的返回值类型，用于指定函数返回的数据类型。
-函数体：函数的具体实现逻辑。
- Exit Function：可选项，用于提前退出函数。
-返回值：函数的返回结果。
下面是一个示例函数的定义：```Public Function AddNumbers(ByVal num1 As Double, ByVal num2 As Double) As DoubleDim sum As Doublesum = num1 + num2AddNumbers = sumEnd Function```这个函数名为AddNumbers，接受两个Double类型的参数，返回值也是Double类型。
函数体中将两个参数相加，并将结果赋值给变量sum，最后将sum作为返回值。
使用VB函数的方法包括以下几个步骤：1.引入函数所在的模块或类库。
如果函数不是在当前模块或类库中定义的，需要通过引入来告知编译器。
2.调用函数。
在程序中通过函数名加括号的形式来调用函数，并传递相应的参数。
函数可以在赋值语句、逻辑判断语句、循环语句等各种场景下进行调用。
3.使用函数的返回值。
VB常用函数
3.3VB的公共函数
1.数学函数
VB中常用的数学函数
2.字符函数
（1）字符串编码
在Windows采用的DBCS（Double B yte Character Set）编码方案中，一个汉字在计算机内存中占2个字节，一个西文字符（ASCII码）占1个字节，但在VB 中采用的是Unicode（ISO字符标准）来存储字符的，所有字符都占2个字节。
为方便使用，可以用StrConv函数来对Unicode 与DBCS进行转换，可以用函数Len（）函数求字符串的字符数，用LenB（）函数求字符串的字节数。
（2）常用的字符串函数
3.日期与时间函数
常用的日期与时间函数
增减日期函数：DateAdd（要增减日期形式，增减量，要增减的日期变量）例：计算期末考试日期：DateAdd("ww",15,#2002/3/19#)求日期之差函数：DateDiff（要间隔日期形式，日期一，日期二）例：计算距毕业天数：DateDiff("d", Now, #2005/6/30#)日期形式
4.转换函数。
VB常用函数
Rtrim(x) 去掉X右边的所有字符。
字符与字符间的空格不会被去掉。
X=Ltrim(“ This is good “)
结果：X=“This is good “
X=Trim(“ This si good “)
结果:X=”This is good”
Response.Writபைடு நூலகம் Fix(-54.6)
结果: -54
8. Asc(X) :返回字符串的第一个字符的字符码。
9. Chr(X): 返回字符码X的字符.
P=Asc(“A”) p=65
P=Chr(65) p=A
10．Filter : 查找字符串数组的特定字符串。
P=Ucase(X) 将字符串X的小写字母转为大写。
只有英文字母才会受影响。
P(0)=”a”,p(1)=”b”,p(2)=”c”
20.StrReverse:反转字符串。
PstrReverse(X)
返回X参数反转以后的字符串。
P=StrReverse(“ABC”)
P=”CBA”
21. Ucase(X),Lcase(X): 转换英文字母的大小写。
P=Lcase(X) 将字符串X的大写字母转为小写。
16.Mid(X,n):由X的第N个字符起，读取后面的所有字符。
Mid(X,n,m):由X的第n个字符起，读起m个字符。
若n>Len(X),则返回空字符串，若第n个字符以后不足m个字符，则返回后面的所有字符。
17.Ltrim(X),Rtrim(X),Trim(X) :去掉空字符。
Ltrim(x) 去掉X左边的所有字符。
VB常用函数(很全)
Abs 函数返回数的绝对值。
And 运算符执行两个表达式的逻辑连接。
Array 函数返回含一数组的变体。
Asc 函数返回字符串首字母的ANSI 字符代码。
赋值运算符(=) 给变量或属性赋值。
Atn 函数返回数的反正切值。
调用语句将控制移交Sub 或Function 过程。
CBool 函数返回已被转换为Boolean 子类型的变体的表达式。
CByte 函数返回已被转换为字节子类型的变体的表达式。
CCur 函数返回已被转换为货币子类型的变体的表达式。
CDate 函数返回已被转换为日期子类型的变体的表达式。
CDbl 函数返回已被转换为双精度子类型的变体的表达式。
Chr 函数返回指定ANSI 字符码的字符。
CInt 函数返回已被转换为整数子类型的变体的表达式。
Class 对象提供对已创建的类的事件的访问。
Class 语句声明类名Clear 方法清除Err 对象的所有属性设置。
CLng 函数返回已被转换为Long 子类型的变体的表达式。
颜色常数颜色常数列表。
比较常数用于比较运算的常数列表。
连接运算符(&) 强制两个表达式的字符串连接。
Const 语句声明用于字母值的常数。
Cos 函数返回角度的余弦值。
CreateObject 函数创建并返回对“自动”对象的引用。
CSng 函数返回已被转换为单精度子类型的变体的表达式。
CStr 函数返回已被转换为字符串子类型的变体的表达式。
日期和时间常数在日期和时间运算中用来定义星期几和其他常数的常数列表。
日期格式常数用于日期和时间格式的常数列表。
Date 函数返回当前系统日期。
DateAdd 函数返回加上了指定的时间间隔的日期。
DateDiff 函数返回两个日期之间的间隔。
DatePart 函数返回给定日期的指定部分。
DateSerial 函数返回指定年月日的日期子类型的变体。
DateValue 函数返回日期子类型的变体。
Day 函数返回日期，取值范围为1 至31。
VB常用函数大全
（一）类型转换类函数1. CType(X)[格式]：P=CBool(X) ' 将X转换为“布尔”（Boolean）类型P=CByte(X) ' 将X转换为“字节”（Byte）类型P=CCur(X) ' 将X转换为“金额”（Currency）类型P=CDate(X) ' 将X转换为“日期”（Date）类型P=CDbl(X) ' 将X转换为“双精度”（Double）类型P=CInt(X) ' 将X转换为“整型”（Integer）类型P=CLng(X) ' 将X转换为“长整型”（Long）类型P=CSng(X) ' 将X转换为“单精度”（Single）类型P=CStr(X) ' 将X转换为“字符串”（String）类型P=Cvar(X) ' 将X转换为“变体型”（Variant）类型P=CVErr(X) ' 将X转换为Error值[ 范例]：(1). CStr(13)+CStr(23)' 数值转换成字符串后，用"+"号连接，结果：1323(2). CInt("12")+12' 字符串转换成整型后与12相加，结果：24(3). P=CInt(True)' 输出结果为-1' 布尔值与数值的转换时要注意，布尔值只有True和False，其中True在内存中为-1,False 存为0(4). CBool(-0.001)' 输出结果为True' 将数值转换为布尔型时，等于0的数值将得到False，不等于0的数值得到True.2. Int(X),Fix(X)：取X的整数值[格式]：P=Int(X) ' 取<=X的最大整数值P=Fix(X) ' 取X的整数部分，直接去掉小数[范例]：(1) Int(-54.6) ' 结果为-55，取<=-54.6的最大整数(2) Fix(54.6) ' 结果为54，取整数并直接去掉小数（二）常用数学函数[格式]：1. Abs(N) 取绝对值例：Abs(-3.5) 结果：3.52. Cos(N) 余弦函数例：Cos(0) 结果：13. Exp(N) e为底的指数函数例：Exp(3) 结果：20.0684. Log(N) 以e为底的自然对数例：Log(10) 结果：2.35. Rnd[(N)] 产生随机数例：Rnd 结果：0--1之间的数6. Sin(N) 正弦函数例：Sin(0) 结果：07. Sgn(N) 符号函数' 说明：取正负号。
vb常用函数大全和公式
vb常用函数大全和公式以下是一些VBA常用的函数和公式:## 函数### 整型函数- Asc() - 将一个整数转换为字符长整数- Chr() - 将一个字符长整数转换为字符整数- Conv() - 将一个浮点数转换为字符长整数- Dis() - 将一个字符串分解成子字符串- Len() - 返回一个字符串的长度- Num() - 返回一个整数值### 浮点型函数- Asc() - 将一个浮点数转换为字符长整数- Chr() - 将一个浮点数转换为字符整数- Conv() - 将一个浮点数转换为字符长整数- Dis() - 将一个浮点数转换为字符串- Len() - 返回一个浮点数字符串的长度- Num() - 返回一个浮点数的数值### 布尔型函数- IsTrue() - 返回一个布尔值的真假- IsFalse() - 返回一个布尔值的真假- And() - 将两个布尔值合并为一个新的布尔值- Or() - 将两个布尔值合并为一个新的布尔值,如果它们均为假则返回False- Not() - 返回一个布尔值的真假## 公式### 代数公式- + 表示两个数相加- - 表示两个数相减- * 表示两个数相乘- / 表示两个数相除- % 表示两个数的取模### 几何公式- + 表示两个向量相加- - 表示两个向量相减- * 表示两个向量相乘- / 表示两个向量相除- *x 表示向量x乘以另一个向量x- /x 表示向量x除以另一个向量x- sin(angle) 表示向量x在坐标系中沿着方向angle的sin函数值- cos(angle) 表示向量x在坐标系中沿着方向angle的cos函数值- tan(angle) 表示向量x在坐标系中沿着方向angle的tan函数值### 三角函数公式- sin(angle) 表示向量x在坐标系中沿着方向angle的sin函数值- cos(angle) 表示向量x在坐标系中沿着方向angle的cos函数值- tan(angle) 表示向量x在坐标系中沿着方向angle的tan函数值- asin(x) 表示x在实数范围内取sin函数值- acos(x) 表示x在实数范围内取cos函数值- ceil(x) - 向上取整,返回x的最小值-floor(x) - 向下取整,返回x的最大值- log10(x) 表示将x乘以10的指数幂,返回其百分数### 统计学公式- 方差(Standard Deviation) 表示一组数值的平均平方和与标准差的差值- 标准差(Standard Error) 表示一组数值的标准差。
QTP中常用的VB函数
Left函数返回Variant (String),其中包含字符串中从左边算起指定数虽的字符。
语法Left(strjnj, /ength)Left函数的语法有下面的命名参数：说明欲知string的字符数，使用Len函数。
注意LeftB函数作用于包含在字符串中的字节数据。
所以length指定的是字节数，而不是要返回的字符数。
Mid函数从字符串中返回指定数目的字符。
Mid(string, start[, length])参数string字符串表达式，从中返回字符。
如果string包含Null,则返回NulLStartstring中被提取的字符部分的开始位置。
如果start超过了string中字符的数目，Mid将返回零长度字符串r)=Length要返回的字符数。
如果省略或length超过文本的字符数(包括start处的字符)，将返回字符申中从start到字符串结束的所有字符。
说明要判断string中字符的数目，可使用Len函数。
下而的示例利用Mid函数返回字符串中从第四个字符开始的六个字符：Dim MyVarMyVar = Mid(u VB 脚本is fun!”，4, 6) 'MyVar 包含“Script：注意MidB函数与包含在字符串中的字节数据•起使用。
其参数不是指定字符数，而是字节数。
Len函数返回字符串内字符的数目，或是存储•变置所需的字节数。
Len(string | varname)参数string任意有效的字符串表达式。
如果string参数包含Null,则返回NulLVarname任意有效的变宣名。
如果varname参数包含Null,则返回NulL说明下而的示例利用Len函数返回字符串中的字符数目：Dim MyStringMyString = Len(”VBSCRIPT”)'MyString 包含8。
注意LenB函数与包含在字符串中的字节数据•起使用。
LenB不是返回字符串中的字符数, 而是返回用于代表字符串的字节数。
VB常用函数大全
Do While Timer < Strat + 5
DoEvents
Loop
程序用来暂停5秒
3．目录和文件函数
函数
说明
例子
ChDir
改变当前目录
Chdir “c:\windows”
ChDrive
改变当前驱动器
CurDir
返回当前目录
MkDir
创建目录
MkDir “c:\my documents\vb6”
RGB(255,255,0)
7．字符串函数
函数
说明
例子
Len
返回字符串长度
Len(“Hello”)=5
Lcase
字符串所有字母变小写
Lcase(“Hello”)=hello
Ucase
字符串所有字母变大写
Lcase(“hello”)=HELLO
StrReverse
字符串反向
StrReverse(“hello”)=”olleh”
例：Myhour=Hour(“pm 09:30:00”)值为21
Minute
从时间中提取分钟数
同上
Second
从时间中提取秒数
同上
Formatdatetime
对日期和时间格式化
MonthName
返回月份的名称
例：Mymonthname=monthname(10)值为”十月”
WeekdayName
返回星期数的名称
Sin,Cos,Tan,Atn
计算对应参数的值
Rnd
产生一个0~1间随机数
下面产生a~b之间的随机数
Int (Rnd * (1)) + a
QTP学习3 VBScript Function
格式： Sub NameoftheSub(byval /byref parameter1,byval/byref parameter2…) … End Sub Byval 传递参数副本 Byref 传递参数引用（本身值将被修改)
Call FunctionorSubname(Para1,…,paran) FunctionorSubname Para1,…,paran varibaleA=FunctionName(Para1,byref para2…) 总结： 参数间必须使用逗号分隔 使用Call或在赋值语句中必须使用括号 直接书写函数名调用时不用括号，函数名与参数间使用 空格分开 要修改原值时须添加Byref加空格关键字在参数值前
QTP唯一支持的脚本语言 可以运行在IE浏览器中 可以运行在Windows宿主脚本
环境上(Windows内置)
变量定义和使用
函数调用 函数库关联和执行
VBScript使用弱类型变量定义(申明时无需指定类型) 例：Dim virableA，variableB (申明可以省去) virableA=5 variableB=4 可以在赋值语句中改变类型 virableA=“33” 其类型以最后一次赋值操作为准 例: virableC=virableA+variableB (报类型错误) 修改： virableC=Cint(virableA)+variableB
1. 2.
将函数写入外部文件.vbs或.qfl中并 在QTP脚本中插入语句ExecuteFile 执行该脚本 文件
缺点： 不运行时不加载，错误须在运行时发现 无法跳转查看 不可以时时调试查看函数进度
VB常用函数大全
VB常用函数解释及语法IsNumeric 函数返回Boolean 值，指出表达式的运算结果是否为数。
语法IsNumeric(expression)必要的 expression 参数是一个 Variant，包含数值表达式或字符串表达式。
说明如果整个expression的运算结果为数字，那么IsNumeric 返回True；否那么返回False。
如果expression是日期表达式，那么IsNumeric 返回False。
IsObject 函数返回Boolean 值，指出标识符是否表示对象变量。
语法IsObject(identifier)必要的identifier 参数是一个变量名。
说明IsObject 只用于确定 Variant 是否属于VarType vbObject。
如果Variant 实际引用〔或曾经引用过〕一个对象，或者如果Variant 包含Nothing，那么可能出现这种情况。
如果identifier 是 Object类型或任何有效的类类型，或者，如果identifier是VarType vbObject 的Variant 或用户自定义的对象，那么IsObject 返回True；否那么返回False。
即使变量已设置成Nothing，IsObject 也仍返回True。
使用错误捕获方法可以确认对象引用是否有效。
Chr 函数返回 String，其中包含有与指定的字符代码相关的字符。
语法Chr(charcode)必要的charcode参数是一个用来识别某字符的Long。
说明0 到 31 之间的数字与标准的非打印 ASCII 代码相同。
例如，Chr(10)可以返回换行字符。
charcode 的正常范围为0 –255。
然而，在DBCS 系统，charcode 的实际范围为-32768 到65535。
注意ChrB函数作用于包含在String 中的字节数据。
ChrB 总是返回一个单字节，而不是返回一个字符，一个字符可能是一个或两个字节。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Left 函数返回Variant (String)，其中包含字符串中从左边算起指定数量的字符。
语法Left(string, length)Left函数的语法有下面的命名参数：说明欲知string 的字符数，使用Len函数。
注意LeftB函数作用于包含在字符串中的字节数据。
所以length 指定的是字节数，而不是要返回的字符数。
Mid 函数从字符串中返回指定数目的字符。
Mid(string, start[, length])参数string字符串表达式，从中返回字符。
如果string包含Null，则返回Null。
Startstring中被提取的字符部分的开始位置。
如果start超过了string中字符的数目，Mid将返回零长度字符串("")。
Length要返回的字符数。
如果省略或length超过文本的字符数（包括start处的字符），将返回字符串中从start到字符串结束的所有字符。
说明要判断string中字符的数目，可使用Len函数。
下面的示例利用Mid函数返回字符串中从第四个字符开始的六个字符：Dim MyVarMyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含"Script"。
注意 MidB函数与包含在字符串中的字节数据一起使用。
其参数不是指定字符数，而是字节数。
返回字符串内字符的数目，或是存储一变量所需的字节数。
Len(string | varname)参数string任意有效的字符串表达式。
如果string参数包含Null，则返回Null。
Varname任意有效的变量名。
如果varname 参数包含Null，则返回Null。
说明下面的示例利用Len函数返回字符串中的字符数目：Dim MyStringMyString = Len("VBSCRIPT") 'MyString 包含8。
注意 LenB函数与包含在字符串中的字节数据一起使用。
LenB不是返回字符串中的字符数，而是返回用于代表字符串的字节数。
Right 函数从字符串右边返回指定数目的字符。
Right(string, length)参数string字符串表达式，其最右边的字符被返回。
如果string参数中包含Null，则返回Null。
Length数值表达式，指明要返回的字符数目。
如果为0，返回零长度字符串；如果此数大于或等于string 参数中的所有字符数目，则返回整个字符串。
说明要确定string参数中的字符数目，使用Len函数。
下面的示例利用Right函数从字符串右边返回指定数目的字符：Dim AnyString, MyStrAnyString = "Hello World" ' 定义字符串。
MyStr = Right(AnyString, 1)' 返回"d"。
MyStr = Right(AnyString, 6)' 返回" World"。
MyStr = Right(AnyString, 20)' 返回"Hello World"。
注意 RightB函数用于字符串中的字节数据，length参数指定返回的是字节数目，而不是字符数目。
返回某字符串在另一字符串中第一次出现的位置。
InStr([start, ]string1, string2[, compare])参数start可选项。
数值表达式，用于设置每次搜索的开始位置。
如果省略，将从第一个字符的位置开始搜索。
如果start包含Null，则会出现错误。
如果已指定compare，则必须要有start参数。
string1必选项。
接受搜索的字符串表达式。
string2必选项。
要搜索的字符串表达式。
compare可选项。
指示在计算子字符串时使用的比较类型的数值。
有关数值，请参阅“设置”部分。
如果省略，将执行二进制比较。
设置compare参数可以有以下值：常数值描述vbBinaryCompare 0 执行二进制比较。
vbT extCompare 1 执行文本比较。
返回值InStr函数返回以下值：如果InStr 返回string1 为零长度0string1 为Null Nullstring2 为零长度startstring2 为Null Nullstring2 没有找到0在string1 中找到string2 找到匹配字符串的位置start > Len(string2) 0说明下面的示例利用InStr搜索字符串：Dim SearchString, SearchChar, MyPosSearchString ="XXpXXpXXPXXP" ' 要搜索的字符串。
SearchChar = "P" ' Search for "P".MyPos = Instr(4, SearchString, SearchChar, 1)' 在位置4 进行的文本比较。
返回6。
MyPos = Instr(1, SearchString, SearchChar, 0)' 在位置1 进行的二进制比较。
返回9。
MyPos = Instr(SearchString,SearchChar)' 默认情况下，进行的是二进制比较（省略了最后的参数）。
返回9。
MyPos = Instr(1, SearchString, "W")' 在位置1 进行的二进制比较。
返回0（找不到"W"）。
注意 InStrB函数使用包含在字符串中的字节数据，所以InStrB返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
LTrim、RTrim与Trim 函数返回不带前导空格(LTrim)、后续空格(RTrim) 或前导与后续空格(Trim) 的字符串副本。
LTrim(string)RTrim(string)Trim(string)string参数是任意有效的字符串表达式。
如果string参数中包含Null，则返回Null。
说明下面的示例利用LTrim, RTrim, 和Trim函数分别用来除去字符串开始的空格、尾部空格、开始和尾部空格：Dim MyVarMyVar = LTrim(" vbscript ")'MyVar 包含"vbscript "。
MyVar = RTrim(" vbscript ")'MyVar 包含" vbscript"。
MyVar = Trim(" vbscript ")'MyVar 包含"vbscript"。
Rnd 函数返回一个随机数。
Rnd[(number)]number参数可以是任意有效的数值表达式。
说明Rnd函数返回一个小于1 但大于或等于0 的值。
number的值决定了Rnd生成随机数的方式：如果number 为Rnd 生成小于零每次都相同的值，使用number作为种子。
大于零序列中的下一个随机数。
等于零最近生成的数。
省略序列中的下一个随机数。
因每一次连续调用Rnd函数时都用序列中的前一个数作为下一个数的种子，所以对于任何最初给定的种子都会生成相同的数列。
在调用Rnd之前，先使用无参数的Randomize语句初始化随机数生成器，该生成器具有基于系统计时器的种子。
要产生指定范围的随机整数，请使用以下公式：Int((upperbound - lowerbound + 1) * Rnd + lowerbound)这里，upperbound是此范围的上界，而lowerbound是此范围内的下界。
注意要重复随机数的序列，请在使用数值参数调用Randomize之前，立即用负值参数调用Rnd。
使用同样number值的Randomize不能重复先前的随机数序列。
Randomize 语句初始化随机数生成器。
语法Randomize [number]可选的number参数是Variant或任何有效的数值表达式。
说明Randomize 用number将Rnd函数的随机数生成器初始化，该随机数生成器给number 一个新的种子值。
如果省略number，则用系统计时器返回的值作为新的种子值。
如果没有使用Randomize，则（无参数的）Rnd函数使用第一次调用Rnd函数的种子值。
注意若想得到重复的随机数序列，在使用具有数值参数的Randomize之前直接调用具有负参数值的Rnd。
使用具有同样number值的Randomize 是不会得到重复的随机数序列的。
Rnd 函数示例本示例使用Rnd 函数随机生成一个 1 到 6 的随机整数。
本示例用Randomize 语句初始化随机数生成器。
由于忽略了数值参数，所以Randomize 用Timer 函数的返回值作为新的随机数种子值。
Dim MyValueRandomize ' 对随机数生成器做初始化的动作。
MyValue = Int((6 * Rnd) + 1) ' 生成1 到6 之间的随机数值。
Split函数描述返回一个下标从零开始的一维数组，它包含指定数目的子字符串。
语法Split(expression[,delimiter[,count[,compare]]])设置值Replace 函数返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。
Replace(expression, find, replacewith[, compare[, count[, start]]])参数expression必选项。
字符串表达式包含要替代的子字符串。
Find必选项。
被搜索的子字符串。
Replacewith必选项。
用于替换的子字符串。
Start可选项。
expression中开始搜索子字符串的位置。
如果省略，默认值为1。
在和count 关联时必须用count可选项。
执行子字符串替换的数目。
如果省略，默认值为-1，表示进行所有可能的替换。
在和start关联时必须用。
Compare可选项。
指示在计算子字符串时使用的比较类型的数值。
有关数值，请参阅“设置”部分。
如果省略,缺省值为0 ,这意味着必须进行二进制比较。
设置compare参数可以有以下值：常数值描述vbBinaryCompare 0 执行二进制比较。
vbT extCompare 1 执行文本比较。
返回值Replace返回以下值：如果Replace 返回expression 为零长度零长度字符串("")。