全局数组写值

dcount107:
 你好!
 现在用全局数组是可以读了,我想给数组写值,又该如何?
 我太笨啦,没试出来
 

问题补充:
我照着你的回答试验了,还是写不进去啊

 
 ————————————–
 在全局脚本里编写一过程:
 Dim a(324),i
 For i=1 To 324
    a(i)=0
 Next
 HMIRuntime.DataSet.Add "a",a

 在画面打开时执行这个过程。

 画面上置两个按钮:

 按钮1:读

 Dim a,i
 a = HMIRuntime.DataSet("a").Value
 For i=1 To 324
    HMIRuntime.Trace a(i) & vbCrLf
 Next

 按钮2:写

 Dim a,i
 a = HMIRuntime.DataSet("a").Value
 For i=1 To 324
    a(i)=i
 Next
 HMIRuntime.DataSet("a").Value = a

 

最佳答案

----------------------------
    Dim a,i
    a = HMIRuntime.DataSet("a").Value 
    a(1)=30 ‘#给数组写值
    HMIRuntime.DataSet("a").Value =a ‘#更新DataSet
  ----------------------------
  我试过,没有问题啊。把你的脚本全部贴出来看看!
 ----------------------------
 经测试,一切正常。你所说是写不进去是怎么回事?
 还是发Email吧,这里交互性不好。

提问者对于答案的评价:
我抽时间给您发邮件,谢谢!!!

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc275326.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日
下一篇 2019年6月11日

相关推荐