经典wincc中如何创建一个全局的VBS Function函数

已锁定

第七印记

  • 帖子

    203
  • 精华

    1
  • 被关注

    8

论坛等级:侠客

注册时间:2009-07-25

普通 普通 如何晋级?

经典wincc中如何创建一个全局的VBS Function函数

627

4

2022-08-11 22:49:26

1.我想用VBS创建一个全局的Function函数,用于在各个画面中调用这个函数,但是我在项目模块右键新建项目模块都是 Sub...end Sub, 如下图所示,


后来我把sub..end sub改成Function  ....end Function  如下所示

Function Status_Check(strName,Status,Fbk_err)


If 0 = Status Then

If Fbk_err = 0 Then

Status_Check = 1

Else

Msgbox "所选流程设备:"& strName & "有故障,请排除后重新锁定流程!"

Status_Check = 0

End if

Else

    Msgbox "所选流程:"& strName & "设备已被其他流程锁定,该流程不能选择"

Status_Check = 0

End if


End Function

Function Status1


End Function

后来在画面按钮的VBS动作中如下调用,

Function Status_Check(strName,Status,Fbk_err)


If 0 = Status Then

If Fbk_err = 0 Then

Status_Check = 1

Else

Msgbox "所选流程设备:"& strName & "有故障,请排除后重新锁定流程!"

Status_Check = 0

End if

Else

    Msgbox "所选流程:"& strName & "设备已被其他流程锁定,该流程不能选择"

Status_Check = 0

End if


End Function

Function Status1


End Function

,但是一编译,就出错,如下图


有知道是什么原因的大神帮忙解答一下,谢谢。可能是没有理解VBS如何创建全局的过程和 全局的函数。

经典wincc中如何创建一个全局的VBS Function函数 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有31079条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。