1、新建一个画面，在画面中分别拖入一个圆 对象和圆形按钮对象。圆对象的名称改为Circlel。
2、在变量管理器中，新建一个C_fill的内部变量，变量类型为32位无符号数，作为圆的半径。在对象圆的属性对话框中，选择 几何，在半径一项中，小灯泡处右键选择变量C_fill。
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
4、在右键按下右键选择VBS脚本，打开VBS脚本编辑器。输入代码函数Dim objCi筠续师诈rcleDim objTagSetobjCircle租涫疼迟=ScreenItems("Circlel")Set objTag=HMIRuntime.Tags("C_fill")objTag.ReadobjTag.Value=objTag.Value-18objTag.WriteobjCircle.Radius=objTag.Value实现每次按下鼠标右键，圆半径减小18
5、运行仿真，按下鼠标左键，圆变大，按下鼠标右键，圆变小。
