wincc用VBS 怎样改变画面的大小?
我用如下代码,可是画面依然不改变?如果大家有自适应分辨率的方法,请分享一下,谢谢!DimobjScreenSetobjScreen=HMIRuntime.Screens(...
我用如下代码,可是画面依然不改变?如果大家有自适应分辨率的方法,请分享一下,谢谢!
Dim objScreen
Set objScreen = HMIRuntime.Screens("NewPDL1")
objScreen.Width =800 ‘改变宽
objScreen.Height =600 ’改变高
objScreen.FillStyle = 131075
objScreen.FillColor = RGB(0,0, 255)
用MSGBOX objScreen.Width 显示已经改变,但实际上并没变。
或用
'Me.Width = 1466
' Me.Height = 768
也不能改变,问题出在哪了? 展开
Dim objScreen
Set objScreen = HMIRuntime.Screens("NewPDL1")
objScreen.Width =800 ‘改变宽
objScreen.Height =600 ’改变高
objScreen.FillStyle = 131075
objScreen.FillColor = RGB(0,0, 255)
用MSGBOX objScreen.Width 显示已经改变,但实际上并没变。
或用
'Me.Width = 1466
' Me.Height = 768
也不能改变,问题出在哪了? 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询