资源描述：
《QTP VBScript编程练习.pptx》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、QTP编程练习1.请编写一个程序，要求输入一个字符串，默认输入为”hello,world!”,然后打印显示此字符串，请注意要有必要的注释。1）函数InputBox()：在对话框中显示提示，等待用户输入文本或单击按钮，并返回文本框内容。InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])Input=InputBox("输入一个字符串：","","hello,world)（2）输出print与MsgBox区别：Msgbox：是属于模式型窗
2、口，暂停执行当前脚本,直到点击“确认”才能执行当前脚本。（人必须确认）Print:是属于非模式窗口，打印的东西会输入到QTP自带的一个文本里，并可以清除ClearAll.当前脚本会执行直到完。（也就是说人可以不管它）2.请编写一个程序，计算从1到10连加的和，并显示结果。应用一个For循环。PS：'Dima(11)’网查骨灰级写法'Execute(Join(a,"s=s+i:i=i+1:"))'MsgBox"1到10的连加和为"&s&"。“Execute()函数：执行一个或多个指定的语句。Join()函数：返回一个
3、字符串，此字符串由包含在数组中的许多子字符串联接创建。Scripting运行库的Count属性返回一个集合或Dictionary对象包含的项目数。只读。object.Count例子：FunctionShowKeysDima,d,i,s'创建一些变量。Setd=CreateObject("Scripting.Dictionary")d.Add"a","Athens"'添加一些键和项目。d.Add"b","Belgrade"d.Add"c","Cairo"a=d.Keys'获取键。Fori=0Tod.Count-1'重
4、复数组。s=s&a(i)&"
"'创建返回字符串。NextShowKeys=sEndFunction3.请先声明三个字符串变量，并分别赋值为”come”,“on”,“Olympic”，然后打印显示“comeon,Olympic!”.(请注意在打印显示的时候一定要用到定义的变量)（1）vbscript是弱变量类型语言，VBS对于类型要求不严格,就是任意类型的,不需要声明类型。dimstrstr=""这样str就是字符串型了2.常用函数Cstr(expression)函数转化一个表达式为字符串函数描述Asc把字符
5、串中的首字母转换为ANSI字符代码。CBool把表达式转换为布尔类型。CByte把表达式转换为字节（Byte）类型。CCur把表达式转换为货币（Currency）类型。CDate把有效的日期和时间表达式转换为日期（Date）类型。CDbl把表达式转换为双精度（Double）类型。Chr把指定的ANSI字符代码转换为字符。CInt把表达式转换为整数（Integer）类型。CLng把表达式转换为长整形（Long）类型。CSng把表达式转换为单精度（Single）类型。CStr把表达式转换为子类型String的varia
6、nt。Hex返回指定数字的十六进制值。Oct返回指定数字的八进制值。Conversion函数3.字符串string的处理函数比如Trim函数描述InStr返回字符串在另一字符串中首次出现的位置。检索从字符串的第一个字符开始。InStrRev返回字符串在另一字符串中首次出现的位置。检索从字符串的最末字符开始。LCase把指定字符串转换为小写。Left从字符串的左侧返回指定数目的字符。Len返回字符串中的字符数目。LTrim删除字符串左侧的空格。RTrim删除字符串右侧的空格。Trim删除字符串左侧和右侧的空格。Mid
7、从字符串返回指定数目的字符。Replace使用另外一个字符串替换字符串的指定部分指定的次数。Right返回从字符串右侧开始指定数目的字符。Space返回由指定数目的空格组成的字符串。StrComp比较两个字符串，返回代表比较结果的一个值。String返回包含指定长度的重复字符的字符串。StrReverse反转字符串。UCase把指定的字符串转换为大写。4.先声明一个一维动态数组，然后将其数组元素个数确定为10，'并将整数1到10依次赋值个数组的各个元素，然后打印显示数组的第五个元素。应用一个常用数组函数Array(
8、arglist)arglist或为参数，或为元素值。A=Array(10,20,30)A(2)？2)申明动态数组：数组随时可以变化如：a()a(10)a(5,6)dim定义数组长度redim重新定义数组长度,会使原有的数据全部消失Preserve关键字用于指示在重定义时保持原来数组的值，如果不加，重定义后值没了，需要重新初始化。其它操作数组函数：Filter
