Private Sub Timer1_Timer ()
Dim WinCC As Object 'definition WinCC for Object
The Set of WinCC=CreateObject (" WinCC - Runtime - Project ")
Text1. Text=WinCC. GetValue (" tag ")
End Sub
Set a timer to 1 s, run after every 1 s hourglass appear next to the mouse once, how can you make the mouse didn't appear the hourglass refresh,
In addition if I write the code within the TEXTBOX, as follows:
Private Sub Text1_Change ()
Dim WinCC As Object 'definition WinCC for Object
The Set of WinCC=CreateObject (" WinCC - Runtime - Project ")
Text1. Text=WinCC. GetValue (" tag ")
End Sub
After the operation, can only be in the text box body after the operation, or write the code inside the button to click on the button, the data will be displayed, if without the timer also have no way to directly display variables in wincc,
The new, please grant instruction,
CodePudding user response:
Dim WinCC As Object 'definition WinCC for ObjectThe move to a global variable
The Set of WinCC=CreateObject (" WinCC - Runtime - Project ")
The move to the Form_Load
CodePudding user response:
In fact with custom directly the mouse pointer, use transparent is approximately equal to hide