技术支持
AI小西
风驰卡
产品入门
在线产品选型
售后登记和质保查询
备件商城
ASP工程师验证
ASP公司证书验证
售后服务常见问题
首页
售前文档（样本、宣传册等） 
售后文档（FAQ、手册等）
首页
立即开通1847会员
首页
教室培训课
取证训练营
在线自学课
认证证书查询
培训伙伴验证
首页
最新发帖
精华帖
发新帖
已解决问题
精华常见问题
自动化标准机型应用中心
官方商城
西门子中国
钻石
本版热门话题
相关推荐
相关帖子推荐
恭喜，你发布的帖子
发布于 2022-04-18 08:25:36
7楼
转 黄河远上
建好结构变量后
在鼠标左键里，选择VBS动作：
Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y)
Dim PIC
Set PIC = ScreenItems("画面窗口1")'选择画面窗口
PIC.Visible = False
PIC.Left = x +10
PIC.Top = Y '使窗口移动到鼠标位置
PIC.TagPrefix = "TAG_6."' 定义变量前缀
PIC.Visible = True
这个脚本存在几个小问题：
这个只能被调用一次，或者说只能同时显示一个画面窗口，因为你的只指定了一个画面窗口名称。
窗口定位存在问题，如果按钮是在画面边缘，可能存在画面窗口不能完全显示的情况。
但因为现在用的是点击事件，不排除你会为每个设备单独做一个画面窗口。建议把脚本改为项目函数进行调用，都这个脚本进行有些修改也是可以改成重复调用多个画面窗口的。
画面窗口位置建议引入画面窗口的长和宽进行比较，结合按钮位置与长宽选择窗口是出现在按钮左边还是按钮右边，这样可以有效的避免画面窗口出现在屏幕外。
请填写推广理由：
分享
只看
楼主
