回复:pcs7按钮选择

已锁定

手机用户20230818369474

  • 帖子

    5
  • 精华

    0
  • 被关注

    0

论坛等级:游民

注册时间:2023-08-18

普通 普通 如何晋级?

发布于 2024-11-21 23:29:38

5楼

展开查看
以下是引用yanyanyan在2024-11-18 09:36:29的发言 >3楼

' 获取当前画面的引用    

Dim screen    

Set screen = HMIRuntime.Screens("YourScreenName")    

' 隐藏Button1    

screen("Button1").Visible = False    

' 检查是否所有按钮都已隐藏    

Dim allButtonsHidden    

allButtonsHidden = True    

' 遍历所有按钮并检查其可见性    

If screen("Button2").Visible Then allButtonsHidden = False    

If screen("Button3").Visible Then allButtonsHidden = False    

If screen("Button4").Visible Then allButtonsHidden = False    

If screen("Button5").Visible Then allButtonsHidden = False    

' 如果所有按钮都已隐藏,则执行某些操作(例如,显示消息框)    

If allButtonsHidden Then    

MsgBox "所有按钮都已隐藏!"    

' 这里可以添加更多逻辑,比如关闭显示所有按钮‘    

End If    


我研究研究去。

评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

DCS/SIMATIC PCS7

共有4308条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

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

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

  • 分享

  • 只看
    楼主

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