51Testing软件测试论坛

标题: qtp如何返回并打印函数值 [打印本页]

作者: marygao929 时间: 2008-2-18 18:13
标题: qtp如何返回并打印函数值
问各位一个问题：QTP中调用函数，如何输出某个参数并打印出来？自定义了一个函数（有输入参数），用return或给函数名赋值的方法返回函数值，但都不行
哪位有好的方法？多谢！具体函数如下：
Function getcode(brs,pages,frames,wbelm)
dim usrcode,obj
set obj=Browser(brs).Page(pages).Frame(frames).WebElement(wbelm)
usrcode=obj.getroproperty("innertext")
getcode=obj.getroproperty("innertext")
End Function
如何输出并打印usrcode？

作者: rivermen 时间: 2008-2-18 18:29
设计function 的时候要指定函数值得返回类型，如
string Function getcode(brs,pages,frames,wbelm)

然后调用的时候;
dim srtGetValue as string
这里用实参
srtGetValue =(brs,pages,frames,wbelm)

作者: marygao929 时间: 2008-2-19 10:26
string Function getcode(brs,pages,frames,wbelm)
报这句语法错误

作者: gy21st 时间: 2008-2-19 11:06
getcode难道不是你想要的？
也可以使用一个byref参数。

作者: marygao929 时间: 2008-2-19 13:40
怎样验证调用函数后，返回的值是正确的？
用msgbox getcode 报错

作者: marygao929 时间: 2008-2-20 18:13
难道没有人知道吗？请各位再看看

作者: gy21st 时间: 2008-2-20 19:07
不是没人知道，是大家都知道而不好意思来回答。这是最基础的问题，建议你先看帮助，而不是直接发帖子来问。两天了你还没有解决这个问题，实际上你仔细看帮助最多二十分钟就有答案。

x = getcode 参数1，参数2，参数3，参数4
msgbox X

或者直接：
msgbox getcode(参数1，参数2，参数3，参数4)

就不会有语法错误。如果问为什么, 请在帮助索引中输入Function, 然后参考Function Statement这节的帮助。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)