WINCC数据显示
悬赏分：10 - 离问题结束还有6天3小时
Sub Record_View

Dim strConnectionString

Dim objConnection

Dim objCommand

Dim strSQL

Dim Rs

Dim MSHFlexGrid


strConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=SHUJUJILU;Data Source=COMPUTER3\WINCC"

strSQL = "select * from WeightValue"

Set objConnection = CreateObject("ADODB.Connection")

objConnection.ConnectionString = strConnectionString

objConnection.Open


Set objCommand = CreateObject("ADODB.Command")

With objCommand

objCommand.ActiveConnection = objConnection

objCommand.CommandText = strSQL

End With


Set Rs=CreateObject("ADODB.Recordset")

Rs.Open objCommand, , 1, 3



Set MSHFlexGrid=HMIRuntime.Screens("MainPicture").ScreenItems("MSHFlexGrid")

Set MSHFlexGrid.DataSource = Rs

MSHFlexGrid.Refresh


Rs.Close

objConnection.Close

Set objCommand = Nothing

Set Rs=Nothing

Set objConnection = Nothing

Set MSHFlexGrid=Nothing

End Sub

（注：MSHFlexGrid控件是数据显示控件，放在了MainPicture画面中）
我的这段代码用变量触发或用定时器触发时MSHFlexGrid控件中都不能显示数据库中的数据，但用Mainpicture画面上的按钮然后通过单击事件调用上面的代码却能显示数据库中的数据在MSHFlexGrid控件中，我怎么也想不通啊，为什么事件触发不行而用按钮单击事件却可以呢？请高手给小弟看看，多谢了！


问题ID: 61600 提问时间：2010-11-28 13:50 提问者：宝金 - 新生 第1级

问题补充：可以对您的提问补充细节，以得到更准确的答案。请注意，每个问题只有一次补充机会。
提高悬赏：提高悬赏分，以提高问题的关注度；
无满意答案：没有满意的回答，还可直接结束提问，关闭问题。