技术论坛

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

回复：赶脚VBS快入门了，本贴不是分享技术的，太初级了。

已锁定

葉贰

  • 帖子

    170

  • 精华

    0

  • 被关注

    3

论坛等级：侠士

注册时间：2020-02-25

普通 普通 如何晋级?

发布于 2022-10-24 08:38:36

10楼

试试这样写


Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y)                 

Dim SUM1

Dim I,J

Dim ArrAY(9,9)

Set SUM1 = HMIRuntime.Tags ("SUM")


SUM1.VALUE = 0

For each I in ArrAY 

SUM1.VALUE = SUM1.VALUE + 1

I = SUM1.VALUE

Next

SUM1.WRITE

'MsgBOX SUM1.VALUE

MsgBOX ArrAY(8,7)

End Sub


评论
编辑推荐： 关闭

请填写推广理由：

活动公告 查看全部公告>

查参数？诊故障？调设备？问问「AI小西」

热门视频，猜你喜欢

本版热门话题

SIMATIC WinCC / Panel

共有32760条技术帖

更多

评选标准

相关推荐

换一换

热门标签

换一换

相关帖子推荐

换一换
guzhang

恭喜，你发布的帖子

被评为精华帖！

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

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

  • 分享

  • 只看
    楼主

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