qtp如何返回并打印函数值

marygao929

问各位一个问题：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

设计function 的时候要指定函数值得返回类型，如
string Function getcode(brs,pages,frames,wbelm)

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

marygao929

string Function getcode(brs,pages,frames,wbelm)
报这句语法错误

gy21st

getcode难道不是你想要的？
也可以使用一个byref参数。

marygao929

怎样验证调用函数后，返回的值是正确的？
用msgbox getcode 报错

marygao929

难道没有人知道吗？ 请各位再看看

gy21st

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

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

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

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