VBS--QTP脚本语言(三).pptVIP

Function 过程及其调用 Function 过程是包含在 Function 和 End Function 语句之间的一组 VBScript 语句。Function 过程与 Sub 过程类似，但是 Function 过程可以返回值。 Function 过程通过函数名返回一个值，这个值是在过程的语句中赋给函数名的。Function 返回值的数据类型总是 Variant。 下面的代码示例是一个带有参数的 Function 过程，该 Function 过程的返回值是两个参数的乘积。 Function myMulti(no1, no2) ? myMulti = no1*no2 End Function * html head titleVBScript Function 过程代码示例/title script type=text/vbscript Function myMulti(no1, no2) myMulti = no1*no2 End Function /script /head body script type=text/vbscript dim vNo vNo = myMulti(8,9) + 100 MsgBox vNo /script /body /html演示示例 * 调用 Function 过程时，函数名必须用在变量赋值语句的右端或表达式中。比如： vNo = myMulti(8,9) + 100 MsgBox? myMulti(8,9) 过程的数据进出 给过程传递数据的途径是使用参数。参数名可以是任何有效的变量名。使用 Sub 语句或 Function 语句创建过程时，过程名之后必须紧跟括号。括号中包含所有参数，参数间用逗号分隔。 要从过程获取数据，必须使用 Function 过程。请记住，Function 过程可以返回值；Sub 过程不返回值。 * 题目 求用vbscript脚本编写猜数字的代码，要求是猜从1到10之间的随机数字，要求给出猜大猜小的提示！ dim i do i=int(1+10*rnd) u=inputbox(系统已给定一个1~10间的数字，你猜它是多少(输入0,结束程序),猜数字游戏,0) u=cint(u) if u=0 then exit do j=1 do while ui j=j+1 if ui then s=你猜的大了 else s=你猜的小了 end if u=inputbox(s ，再猜! ,请输入,0) u=cint(u) loop msgbox 你第 j 次猜对了,它是 i loop演示示例 While循环 While 循环条件 循环体 Wend While循环是先判断循环条件，根据循环条件的值来决定是否执行循环体。如果循环条件为真或不为0时执行循环体，直到循环条件不满足时退出While循环。 VBS中的子过程与函数都是一种程序体，只是有否返回值的差别罢了。 如果你的程序中有很多重复使用的代码段，就可以把它写成过程。 msgbox函数如果不取返回值的话不能使用括号，要这样用:?response.write msgbox 用户名或密码错误!,0,提示 chr(13) Cint 转为整形 Topics Copyright Tarena Technologies Inc., 2008. All rights reserved. Tarena High-End IT Training 中国北京　　电话：（01062136369 　　地址：北京市海淀区北三环西路甲18号 中鼎大厦B座7层 中国上海　　电话：（02161202603 　　地址：上海市北京东路668号 上海科技京城B区9层 加拿大多伦多　　电话：（416）491-6456 　　地址：Suite 1208, Deerford Road, Toronto, Ontario, Canada　　邮编：M2J 3J3 中国广州　　电话：（02085518898 　 　　地址：广州天河区岗顶侨鑫教育主楼三层 　　 VBScript简介(三) ---------QTP脚本语言 * * * * HTML基础 VBScript脚本语言概述 VBScript的对象和事