数据都能读到。脚本如下：
DimsqlacCEss
Dimri
Dima1avg
ri=HMIRUNtime.Tags("tian").Read
SetsqlaccESs=HMIRuntime.Tags("sqlaccess")
Seta1avg=HMIRuntime.Tags("a1avg")
sqlaccess.Write"selectID,ri,DAY,lngVaLUe,lngValuea,lngValueBFromwinccwhereday=’"&ri&"’"
a1avg.Write"selectavg(lngValue),avg(lngvaluea)fromwinccwhereday=’"&ri&"’"
但平均值那句（最后一句）小数位数多。
更改为a1avg.Write"selectconveRT(decimal(8,2),avg(lngValue)),avg(lngvaluea)fromwinccwhereday=’"&ri&"’"平均值就读不出数据了
该如何写？
最佳答案
从语法来讲是没有任何问题的。
但Access数据库不一定支持Convert函数，你可以单独试一下，然后检查一下SQL语句的执行结果。
提问者对于答案的评价：
也许你说的是对的，用FORMAT函数解决了。
分享一下：
a1avg.Write"selectformat(avg(lngValue),”####.##”),format(avg(lngvaluea),”###.###”)fromwinccwhereDay=”"&ri&"”"
