技术论坛

 • 产品分类
 • 咱工程师的故事
 • 培训与认证答疑专区
 • 服务合作伙伴专区

回复：WINCC 7.5 VBS脚本

已锁定

chengzi666

  • 帖子

    44

  • 精华

    0

  • 被关注

    6

论坛等级：侠客

注册时间：2021-03-09

黄金 黄金 如何晋级?

发布于 2023-07-20 10:17:39

1楼

如果只是清空每一行的文本就这样写

Sub OnClick(ByVal Item)

Dim cmd, i

Set cmd = ScreenItems("组合框1")

For i = 1 To cmd.NumberLines

cmd.Index = i

cmd.Text = ""

Next

Set cmd = Nothing

Set i = Nothing

End Sub

如果想清空列表就把组合框行数设1

Sub OnClick(ByVal Item)

Dim cmd

Set cmd = ScreenItems("组合框1")

cmd.NumberLines = 1

Set cmd = Nothing

End Sub

评论
编辑推荐： 关闭

请填写推广理由：

活动公告 查看全部公告>

AI 小西智伴登场，7×24 小时权威支援，让技术支持告别等待！

热门视频，猜你喜欢

本版热门话题

SIMATIC WinCC / Panel

共有32570条技术帖

更多

评选标准

相关推荐

换一换

热门标签

换一换

相关帖子推荐

换一换
guzhang

恭喜，你发布的帖子

被评为精华帖！

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

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

  • 分享

  • 只看
    楼主

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