发布于 2009-09-23 11:28:44
0楼
Sub ActivateScreen (Byval p1)
Dim objScreen
Dim strScreenName
' "UserData" contains the screen name specified
' in editor menus and toolbars.
strScreenName = "SGcoolingpump-P1"
HMIRuntime.BaseScreenName = strScreenName
End Sub
在找答案里有例子介绍的。