设为首页收藏本站
开启辅助访问 软件测试门户软件测试培训软件测试论坛测试解决方案文章资料精选软件测试博客软件测试招聘

51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步，快速开始

微信登录，快人一步

手机号码，快捷登录

51Testing软件测试论坛 »软件测试论坛 › [管理工具] › [自动化测试工具及框架] › [QuickTest Professional] › 关于使用函数返回值时提示：类型不匹配“return”
返回列表 发新帖
查看: 6262|回复: 10
打印 上一主题 下一主题

[原创] 关于使用函数返回值时提示：类型不匹配“return”

[复制链接]
liaojianguo

该用户从未签到
跳转到指定楼层
1#
发表于 2011-5-18 18:01:56 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
写了一个简单的函数，函数功能是打开一个excel，并且返回某一个格的值。但是在运行时，却提示：类型不匹配“return”。。以下为脚本，报错见附件。


function openexcel(filename,sheetname,x,y)
Dim XFS,XFSBOOK,XFSSHEET
Set XFS = createobject("Excel.Application")
Set XFSBOOK = XFS.WorkBooks.Open(filename)
Set XFSSHEET = XFSBOOK.worksheets(sheetname)
return XFSSHEET.cells(x,y).value   ‘这里报错
Set XFS=nothing
XFSBOOK.close
XFSSHEET.close
end function

msgbox openexcel ("C:\project\data\qtp.xls","sheet2",1,2)
Function, Return, 函数
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
微信
收藏收藏

相关帖子

【喜讯】51微信互动平台签到赚积点上线了
回复

使用道具 举报

liaojianguo

该用户从未签到
2#
 楼主| 发表于 2011-5-18 18:03:36 | 只看该作者
附件
回复 支持 反对

使用道具 举报

liaojianguo

该用户从未签到
3#
 楼主| 发表于 2011-5-18 18:04:00 | 只看该作者
回复 2# liaojianguo
【你来问我来答第140期】：敏捷测试的奥秘与挑战：问答专场！
回复 支持 反对

使用道具 举报

iQuickTest

该用户从未签到
4#
发表于 2011-5-19 07:30:27 | 只看该作者

null

vbs返回不是这样写的，是直接返回给函数名。
回复 支持 反对

使用道具 举报

lyscser

该用户从未签到
5#
发表于 2011-5-19 08:41:55 | 只看该作者
都起这么早……
回复 支持 反对

使用道具 举报

iQuickTest

该用户从未签到
6#
发表于 2011-5-19 09:08:14 | 只看该作者
老了，睡不着
【你来问我来答第140期】：敏捷测试的奥秘与挑战：问答专场！
回复 支持 反对

使用道具 举报

superliming

该用户从未签到
7#
发表于 2011-5-19 09:33:51 | 只看该作者
vbs中没有return
回复 支持 反对

使用道具 举报

liaojianguo

该用户从未签到
8#
 楼主| 发表于 2011-5-20 10:34:00 | 只看该作者
如果我想要返回某一个表格里的一个数据呢？我该怎么写？我就是想返回XFSSHEET.cells(x,y).value   这个值，以方便调用。
回复 支持 反对

使用道具 举报

liaojianguo

该用户从未签到
9#
 楼主| 发表于 2011-5-20 10:49:35 | 只看该作者
问题已经解决。vbs是以函数名做为返回值，故return那句只要改成 openexcel = XFSSHEET.cells(x,y).value即可。
【你来问我来答第140期】：敏捷测试的奥秘与挑战：问答专场！
回复 支持 反对

使用道具 举报

fly_away
  • TA的每日心情
    开心
    2015-4-16 21:09

    • 签到天数: 2 天

    连续签到: 1 天

    [LV.1]测试小兵
    10#
    发表于 2011-5-24 13:06:02 | 只看该作者
    本人写VBS脚本函数，从未见过有return这个关键字，楼主最好下个VBS的官方帮助文档看看
    回复 支持 反对

    使用道具 举报

    17800455
  • TA的每日心情
    开心
    2018-7-13 14:04

    • 签到天数: 6 天

    连续签到: 1 天

    [LV.2]测试排长
    11#
    发表于 2011-5-24 18:04:23 | 只看该作者
    openexcel =  XFSSHEET.cells(x,y).value   ‘这里报错

    vbs不支持return返回.
    如果要返回值的话.
    直接   函数名=返回的值
    这样就可以了.
    回复 支持 反对

    使用道具 举报

    返回列表 发新帖

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 )  关于我们

    GMT+8, 2024-11-20 03:27 , Processed in 0.074500 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表