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

已锁定

李岩

西门子1847工业学习平台

  • 帖子

    3179
  • 精华

    34
  • 被关注

    112

论坛等级:至圣

注册时间:2004-03-31

钻石 钻石 如何晋级?

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

711

10

2022-09-09 14:06: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 J = 0 To 9

For I = 0 To 9

SUM1.VALUE = SUM1.VALUE + 1

ArrAY(J,I) = SUM1.VALUE

Next

Next

SUM1.WRITE

'MsgBOX SUM1.VALUE

MsgBOX ArrAY(8,7)

End Sub



赶脚VBS快入门了,本贴不是分享技术的,太初级了。 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32569条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

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

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

  • 分享

  • 只看
    楼主

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