用VB讀取WINCC中的資料，代碼如下：
Private Sub Timer1_Timer()
Dim WinCC As Object '定義wincc為物件
Set WinCC = CreateObject("WinCC-Runtime-Project")
Text1.Text = WinCC.GetValue("tag")
End Sub
將定時器設定為1S，運行后每過1S滑鼠旁邊的沙漏就出現一次，請問大家怎么能讓滑鼠不出現這個沙漏的重繪。
另外如果我把代碼寫在TEXTBOX內，如下：
Private Sub Text1_Change()
Dim WinCC As Object '定義wincc為物件
Set WinCC = CreateObject("WinCC-Runtime-Project")
Text1.Text = WinCC.GetValue("tag")
End Sub
運行后，只能在對text框體進行操作后，或是把代碼寫到button內去點擊按鈕，資料才會被顯示出來，如果不用定時器的話還沒有辦法直接顯示wincc中的變數。
新手入門，請大家賜教。
uj5u.com熱心網友回復：
Dim WinCC As Object '定義wincc為物件這句挪到全域變數
Set WinCC = CreateObject("WinCC-Runtime-Project")
這句挪到Form_Load中
uj5u.com熱心網友回復：
其實直接用自定義滑鼠指標，用全透明的就約等于隱藏了轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/51372.html
標籤：VB基礎類