我wincc 中菜单和工具栏做下拉菜单，画面老是切换不了！不知道是怎么回事！
在菜单和工具栏中已编辑好菜单
也在全局脚本中调用VBS脚本
Sub ActivatePicture(Byval PictureName)
Dim objScreen
Dim strScreenName
'"Userdata" contains the screen name specified in editor menus and toolbars'

strScreenName=PictureName.Userdata
HMIRuntime.BaseScreenName=strScreenName
End Sub
但是画面一直切换不了，求助！