WINCC报表 VBS SQLSever MSHFlexGrid 控件 数据库SQLSever中的数据如何用控件MSHFlexGrid在界面上进行显示

根据需求,我已经把所需要的数据导入到wincc自带的SQLSever里,也就是我报表的内容已经在数据库存好了。我现在就是想通过控件MSHFlexGrid与SQLSever相连,这样就把数据显示出来,呈现给客户了。问题是在wincc环境下,控件MSHFlexGrid我不知道如何配置(特别提醒wincc环境下的控件MSHFlexGrid设置与在VB环境下的控件MSHFlexGrid设置是不一样的,VB环境下,我会配置的),才能与数据库相连,请教各位指导:如何在wincc环境下,设置我的控件MSHFlexGrid,把我的报表内容显示出来,越详细越好!这样就万事大吉了!谢谢了!急急急急急急急急!

最佳答案

其实差不多
  Dim str1 
  Dim str2 
  Dim MSFlexGrid1
          Set MSFlexGrid1=ScreenItems("history")
  str1 = "时间|报警信息|报警点"
  MSFlexGrid1.AllowUserResizing = 1
  MSFlexGrid1.Rows = 1
  MSFlexGrid1.Cols = 3
  'MSFlexGrid1.FixedRows = 1
  'MSFlexGrid1.FixedCols = 1
  MSFlexGrid1.FormatString = str1
  MSFlexGrid1.ColWidth(0) = 2000
  MSFlexGrid1.ColWidth(1) = 4000
  MSFlexGrid1.ColWidth(2) = 3000
          rst.movefirst
          i=1
          Do While Not rst.EOF
              MSFlexGrid1.AddItem ( i & vbTab & Trim(rst.fields("datetime").value) & vbTab & Trim(rst.fields("text1").value) & vbTab & Trim(rst.fields("text2").value))
              rst.MoveNext
              i=i+1
          Loop
  这是一个报警查询的的例子,中间省了数据库操作的部分,MSFlexGrid1.的操作基本都在,你可以参考!

提问者对于答案的评价:
非常感谢

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

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

相关推荐