序列号 函数名 函数作用 第一参 第二参 第三参 第四参 第五参 返回值
1 QTP_Small()  让QTP运行时保持最小化      
2 QTP_Big()  '恢复QTP窗口      
3 "QTP_WriteFile(pathway,words)"  '写文件函数(追加) 文件路径 写入内容    
4 "Function QTP_WriteFile_Change(pathway,words)" '写文件函数(改写)  文件路径  写入内容    
5 "QTP_Read_Excel(pathway,sheetname,x,y)" '读Excel文件元素  文件路径 工作表名  行值 列值  
6 "QTP_Write_Excel(pathway,sheetname,x,y,content)" '写Excel文件元素并保存退出 文件路径
工作表名 行值 列值 写入内容 
7 "QTP_Msgbox(Value,waitTime,Title)" 定时停留弹出框函数  弹出值 弹出框停留时间 弹出框标题   
8 "QTP_Change_Color(pathway,sheetname,x,y,color)" '改变Excel的单元格颜色 文件路径 工作表名
行值  列值  颜色(只接受red和green) 
9 QTP_Capture(pathway) '捕获当前屏幕（截图） 保存图片路径

1 Function CreateExcel() 生成Excel对象和默认新工作表  Excel对象
2 Sub CloseExcel(ExcelApp) 关闭指定的Excel  Excel对象     
3 "Function SaveWorkbook(ExcelApp, workbookIdentifier, path)" 保存工作表 Excel对象 工作表名
Excel文件路径  1成功，0失败
4 "Sub SetCellValue(excelSheet, row, column, value)" 给Excel元素赋值 工作表名 行 列 值  
5 "Function GetCellValue(excelSheet, row, column)" 获得指定元素值 工作表名 行 列 值，0未找到元素
6 "Function GetSheet(ExcelApp, sheetIdentifier)         返回工作表  工作表
7 "Function InsertNewWorksheet(ExcelApp, workbookIdentifier, sheetName)" 插入一个新的工作表 Excel对象
工作表名 新工作表名 新工作表对象
8 Function CreateNewWorkbook(ExcelApp) 建立一个新表 Excel对象     
9 "Function OpenWorkbook(ExcelApp, path)" 打开一个之前保存过的工作表 Excel对象 路径    
10 "Sub ActivateWorkbook(ExcelApp, workbookIdentifier)" 激活工作表  Excel对象 工作表名    
11 "Sub CloseWorkbook(ExcelApp, workbookIdentifier)" 关闭工作表  Excel对象 工作表名    
12 "Function CompareSheets(sheet1, sheet2, startColumn, numberOfColumns, startRow, numberOfRows, trimed)" 比较工作表
1工作表一2工作表二 3起始列 4列数 5起始行 6行数 默认参数  true一致  false不一致

QTP与Robot通用函数:
序列号 函数名 函数作用  第一参 第二参 第三参 第四参 返回值
1 Get_Data() 获取当前日期     
2 Get_Time() 获取当前时间     
3 "Get_RandNum(fromNum,toNum)" 随机函数生成 起始生成值 结束生成值 随机数
4 "Swap(byref a,byref b)" 值交换函数 交换参数1 交换参数2 (引用调用)
5 IsPrimeNumber(num) 是否是质数函数 '是质数返回true，否则返回false
6 "ReadLine(pathway, rowcount)" 读指定文本文件指定行内容 文件路径  行数 
"返回指定行内容，""文本越界"",""文件不存在"""
7 Function MakeString(inputlength) 随机生成字符串 字符串长度  随机字符串
8 Sub ZYGLQ() 启动资源管理器     
9 Sub Run() 启动运行     
10 "SendMail(SendTo, Subject, Body, Attachment)" 调用outlook发送电子邮件 收件人 主题 邮件内容 附件 
11 "Function NoRepeat(Inp,Sp)" 去掉字符串中的重复项 输入字符串  字符串分隔符  无重复的字符串
12 Function GetLen(Str) 求字符串长度（中文算2个西文字符） 输入字符串    
13 Sub RunApp(command) 运行指定程序  运行程序名    
14 Function Nextday(ByVal inputday)  求下一天是几号的函数 原始日期  原始日期后一天的日期
15 Function ISLeapYear(ByVal inYear) 判断是否闰年 年份 true:是闰年  false:非闰年
16 "Function Days(SourceData, DesData)" 计算两个日期之间相隔几天  初时日期  目的日期  相隔天数
17 Function Identification(Text1) 检查身份证号是否正确 身份证号  正确：true  错误：false
18 "Access_GetCount(DBlocation,TableName,Value)" 查询Access数据库字符出现次数  数据库存放位置  表名 
查询的值  返回值出现的次数
19 Function checkString (myString) 检查是否存在数字  输入字符串  true：存在数字 false：不存在数字
20 "Function BubbleSort(VString,Spl,Func)" 按ASCII码值冒泡排序  待排序的字符串  分隔符  排序方式：
1降序，2升序 排序完的序列

1, 获取对话框相应的文字: GetVisible Text

2, 查找相应的字符串: instr (1,查找目标字符串,所查找的字符串)

3, 随机数的获取: Randomnumber.Value() 或cstr(int(Rnd*10)+1)

4, 等待函数: Wait(秒数)

5, 获取数组下标: UBound (数组名)

6, 拆分数组: Split(MyString, ",", -1, 1)

7, 可执行步骤: OptionalStep

8, 报告信息: Reporter.ReportEvent 3, "Save Step", "Out of cycle!"

9, 判断对话框是否存在: .exist

10，事件过滤函数：Reporter.Filter=过滤条件(0，1，2，3)，0代表显示所有的error和warning,1，显示error,2,显示waining,3,任何error和warning都不显示。

11，循环函数：do … loop until，for…to… then next,while.

12，数据表格：DataTable,向外赋值，Dim aa = DataTable.value(“CellingName”,”ActionName”).

13，获得对象属性的三种方法GetTOProperty，GetTOProperties,GetROProperty,GetTOProperty获得程序中对象当前的属性，GetTOProperties获得当前属性所有集合，GetROProperty获得的是录制时对象所获得的属性。

14，检查点方法check和输出指定属性值output。

15，函数Descrīption,可以获得某页面同标签的属性进行操作。

16，函数nagative可以随便跳转页面到指定的URL。

17，函数Object可以获得当前页面同属性的控件。

18，函数Focus可以让控件获得焦点，函数Blur则是失去焦点，click单击，dbclick双击。

19，函数setAttribute可以设置控件属性，getAttribute可以获得属性。

添加数据：

1.        在每个要覆盖的域添加checkpoint。

2.        在不能同名的必填字段里，添加随机函数，循环增加。

查询数据：

1.       先添加数据，再查询数据更新，更新成功时设置checkpoint。

2.         最后删除成功时设置checkpoint