VB函数调用

已锁定

太太菜了

  • 帖子

    36
  • 精华

    0
  • 被关注

    2

论坛等级:游民

注册时间:2009-12-27

普通 普通 如何晋级?

VB函数调用

677

5

2009-12-27 20:18:35

请教下面函数部分含义:基本思路是把画面按坐标来分,一个小表格区代表一个可修改区(点击可弹出输入参数)
settag "colsource1",s
If X<130 Then
aa=0
Else
aa=(X-130)\85
aa=aa+1
End If

If aa<4 And aa>0 Then 'enter number
If aa=1 Then
s="steptime"
End If
If aa=2 Then
s="stepwrvel"
End If
If aa=3 Then
s="stepwracc"
End If ————————————以上是前3参数个分区域

settag "colsource1",s
resu=gridgetvalue("r3limit",s,1)
settag "limitnumber",resu
settag "selsource",3
settag "gridenternumen",1

End If 'end enter number——————这段为什么要设LIMIT?


If aa>3 Then 'enter sel
bb=adoobj.Recordset.Fields(aa).Name

Set a = HMIRuntime.Tags("colsource")
Set b = HMIRuntime.Tags("colsource1")
If aa=4 Then
a.Write("spos")
b.Write("stepprpos")

End If
If aa=5 Then
a.Write("sdisp")
b.Write ("stepprdisp1")
End If
If aa=6 Then
a.Write("spr")
b.Write ("stepprdisp2")
End If ——————————这段之所以同aa=3之前的分开是不是因为aa>3后有下拉选择。所以行定义后又要做第几列的定义?

settag "tablesource","recipegridsel"
settag "selsource",2————-2是什么意思
settag "enterselecten",1
End If 'end enter sel
End Sub
初学者,见笑。谢谢大家。
VB函数调用 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32564条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

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

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

  • 分享

  • 只看
    楼主

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