1、新建一个画面,在画面中分别拖入一个圆 对象和圆形按钮对象。圆对象的名称改为Circlel。

3、单击圆形按钮在属性对话框中选择事件栏,选择鼠标项,在左键按下一项中右键选择VBS脚本,打开VBS脚本编辑器。输入代码函数。Dim objCircleDim objTagSeto芟鲠阻缒bjCircle=ScreenItems("Circlel")Set objTag=HMIRuntime.Tags("C_fill")objTag.ReadobjTag.Value=objTag.Value+18objTag.WriteobjCircle.Radius=objTag.Value实现每次按下鼠标左键,圆半径加大18

5、运行仿真,按下鼠标左键,圆变大,按下鼠标右键,圆变小。

