您正在浏览的页面需要登录,为了提高您的阅读体验,请在右上角登录您的账号!
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
wincc画面切换
想以一个整数的值得大小来切换画面码如下:
dai
Sub OnOpen()
Dim a
Dim objScrWindown
Set a=HMIRuntime.Tags("d")
Set objScrWindown=ScreenItems("画面窗口1")
If a=1 Then
Elseif a=2 Then
objScrWindown.ScreenName="NewPdl2"
Elseif a=3 Then objScrWindown.ScreenName="NewPdl3"
Else objScrWindown.ScreenName="NewPdl0"
End If End Sub
求大家指正
|