字段名：gwh 表名称：zmxzz
Dim zmxlsbl02 ''声明临时变量
is_sql="select gwh from zmxzz where txm=5" ''查询zmxzz表中，字段名txm=5的gwh字段名下的数值
cn.execute (is_sql) ''执行sql
HMIRuntime.Tags("zmx-xtcs-tag_2").Write =screenitems("gwh").outputvalue ''目的想将字段名gwh中取出的数值赋值给变量：zmx-xtcs-tag_2
哪位大侠给看看，怎么不执行？
谢谢！
问题补充：
第一个返回值是adoset（0），我有20个返回值，该怎么设置呢，谢谢你，再说一声！
adoset（1），adoset（2）都报错。
最佳答案
screenitems("gwh").outputvalue 这是个什么呀？
你的画面上有一个叫gwh的对象？
如果你是认为用screenitems("gwh").outputvalue来获取查询的值，貌似不行吧。
建议你用ADO
--------------------------------------------
上面的程序可以改为
dim adoset
set adoset = CreateObject("ADODB.Recordset") ‘创建ado对象
Dim zmxlsbl02
is_sql="select gwh from zmxzz where txm=5"
adoset.Open is_sql,cn ’执行你的查询语句
HMIRuntime.Tags("zmx-xtcs-tag_2").Write = adoset(0) ‘将查询到的结果的第一个值赋给变量
提问者对于答案的评价：
谢谢，明白了
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc264137.html
微信扫一扫 
支付宝扫一扫