vbs获取function返回值

我建立了一个function在一个按钮的点击事件中调用这个方法,没有成功,请大家帮我找下原因,谢谢!
 function定义如下:
 Function Fun1(i1,i2)
 Fun1 = i1+i2
 End Function
 按钮事件如下:
 Dim i
 Set i = Fun1(1,2)
 MsgBox("1")
 现象:
 没有弹出messageBox。。。
 应该是我给i获取Fun1返回值的方法不对吧,我又不知道怎么弄,谢谢大家帮忙!

问题补充:
dcount107在不,能帮忙解释下啥时候用set啥时候不用么?我现在的感觉就是给变量引用类(按引用调用)的时候用set,给变量赋值(按值调用)的时候就直接用=?

最佳答案

给“对象”赋值时需要用Set,比如:
 Dim ObjText
 Set ObjTag = ScreenItems("Text1")
 给非对象变量或者对象的属性赋值是不需要set,比如:
 ScreenItems("Text1").Text = "MyText"
 

提问者对于答案的评价:
thx,呵呵,有收获~

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc272832.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日 上午9:27
下一篇 2019年6月11日 上午9:27

相关推荐

  • wincc运行中自动取消激活

    Wincc激活状态下,组态几个按钮进行窗口画面的切换,但是点击几次之后按钮进行切换后,wincc就自动取消激活了,请问这是什么原因?有人说我Wincc出错了。需要卸载重装,请大虾们…

    SIMATIC WinCC 2019年6月11日
  • 过程值得处理

    K型PT100传感器要到MP277面板上显示,PIW的过程值可以直接取用(0-27648),但过程值是如何处理的 问题补充:是K型热电偶,但在WINCCFLEXIBLE中,如果我把…

    SIMATIC WinCC 2019年6月11日
  • 关于Microsoft Office Access的问题

    怎样用Microsoft Office Access从wincc数据库中中导出归档变量?如果有能不能写详细点? 问题补充:有没有更详细的注释,我对数据库不是很清…

    SIMATIC WinCC 2019年6月11日
  • WIN7旗舰版32位系统无法安装WinCC flexible SMART V3 SP1

    请问WIN7旗舰版32位系统无法安装WinCC flexible SMART V3 SP1怎么处理啊? 问题补充:Win7 &nb…

    2021年7月5日
  • WINCC变量记录丢失如何处理

    我遇到一个WINCC5.0SP2系统,设置变量记录,运行,趋势和在线列表均显示正常。有一天突然断电后,在线趋势控件或在线列表控件无任何显示了,打开存储变量记录的文件夹,发现所有变量…

    SIMATIC WinCC 2019年6月10日
  • WINCC画面变量显示感叹号,但是上边会提示报警信息,证明通讯是没有问题,这是因为什么原因

    WINCC画面变量显示感叹号,但是上边会提示报警信息,证明通讯是没有问题,这是因为什么原因。 最佳答案 都显示感叹号还是一个?某个的话,拿就是这个变量地址连的不对或者类型选的不对和…

    SIMATIC WinCC 2021年7月5日
  • wincc项目

    谁能给我一个比较好的WINCC6.2项目,我学习用,谢谢。我的邮箱:154468061@qq.com 问题补充:我本身有个5.0的项目,想移植到6.0版的,有谁可以帮我移植下吗,我…

    SIMATIC WinCC 2019年6月11日
  • WINCC用户归档的控制变量

    在学习用户归档的时候,遇到这样一个问题,请指教:我新建一个归档,名为guolu,然后一步一步进行编辑,在控制变量的选项时,我选择创建,则创建了@UA_guolu_ID等四个控制变量…

    SIMATIC WinCC 2019年6月11日
  • WINCC安装程序

    那位有WINCC6.2中文版安装程序,麻烦给我发下,谢谢了。我是名初学者。邮箱是:huangyeluo003@163.com 最佳答案 WINCC6.2的安装程序大小差不多1G,&…

    SIMATIC WinCC 2019年6月11日
  • WINCC复制问题

    我将一个WINCC复制到另一个机器上 但打开以后发现以前删除的画面又出现了 请教这个问题怎么解决 问题补充:我是直接打成压缩包在复制的 没用项目复制器…

    SIMATIC WinCC 2019年6月11日