• 在“Screen_01”中插入一个“矩形”对象
  注意
  稍后会在脚本中使用画面名称。
• 定义对象的尺寸和名称
  本例中矩形的宽度和高度分别为100和50。
  对象的名称为“Rectangle_1”。
  注意
  稍后会在脚本中使用对象（矩形）的名称。

Fig. 01

为变量分配一个“初始值”。本例中，宽度为“100”，高度为“50”。
（ 属性 > 值 > 初始值）。下文会解释设置原因 (见步骤8)。

注意
将会在脚本中使用这些变量。

Fig. 02

创建一个内部脚本变量
通过一个内部脚本变量更改 WinCC 对象的属性（本例为矩形的属性）。
可以根据需要指定变量的名称。
本例中为：“ObjectRectangle”

对象定义
在脚本编辑器中，将对象“Rectangle_1”传送给变量“ObjectRectangle”。
“HmiRuntime.Screens”语句表示对象（矩形）所在的画面。
画面中对象（矩形）的引用可以通过“ScreenItem”语句。
本例为：
Set ObjectRectangle = HmiRuntime.Screens("Screen_01").ScreenItems("Rectangle_1")

注意
记住画面中的对象名称必须是唯一的，这意味着其它对象不能使用这个名称。
然而，在不同的画面中可以存在相同的对象名称！

给对象（矩形）的“高度”和“宽度”分配变量
"Width" 为对象宽度。
"Height" 为对象高度。
为矩形的“高度”和“宽度”定义了两个变量。
并把这两个变量分配给相应的对象。

本例中：

ObjectRectangle.Width = SmartTags("RectangleWidth")
ObjectRectangle.Height = SmartTags("RectangleHeight")

Fig. 03

此脚本和 Script_01_Rectangle" 结构相同。唯一不同的是指定值是矩形宽度 ("200") 和高度 ("100") 。

 
Fig. 04

自动完成

• 在创建脚本时，使用“自动完成”。
  自动完成是一种特征，在对话框中提供一种上下文相关的列表，从中可以选择需要的变量或指令。
  示例 1
  在“...= HmiRuntime”对话框之后，输入一个“句点”（.）。
  打开一个“弹出菜单”，可以从中选择所有可用的变量和语句。

Fig. 05

示例 2
在“ObjectRectangle”对话框之后，输入一个“句点”（.）
打开一个“弹出菜单”，可以从中选择所有可用的属性。

Fig. 06

添加变量

• 定位到需要添加变量的位置。
• 点击右键。打开弹出菜单。
  选择菜单命令“自动完成>列表对象”。
  打开另外一个窗口，从中选择相关的变量，并点击“确认”按钮输入。

Fig. 07

• "Change size" ("Script_01_Rectangle" script)
• "Standard size" ("Script_02_Init_Rectangle" script)

Fig. 08

在各自的输入输出域中组态关联内部变量“宽度”和“高度”。
(属性 > 常规 > 过程)

“更改尺寸”按钮调用脚本“Script_01_Rectangle”。
(属性 > 事件 > 单击)

“标准尺寸”按钮调用脚本“Script_02_Init_Rectangle”。
(属性 > 事件> 单击)

如果需要画面改变后仍然保存修改后的尺寸，在画面“Screen_01”装载时调用脚本“Script_01_Rectangle”（ 属性 > 事件 > 装载）

首次调用画面，或者还没有为矩形设置尺寸时，矩形在画面上不可见 (宽度和高度都为 "零")。
通过定义初始大小 "Width" 和 "Height" 变量可以避免此情况 (见步骤2)。

Fig. 09

• 为了测试附件中的组态，可以使用WinCC Comfort 中的  TP1200  或 WinCC Advanced 仿真。通过IO域指定值，确保对象（矩形）指定的值不能超过当前画面的宽度或者高度。否则提示系统消息（脚本错误）。
  

补救措施

通过“属性〉范围〉设置”属性为变量“RectangleHeight”和“RectangleWidth”设置一个最大值。 此值大小与组态对象的位置有关。

• 脚本中的错误 ...
  脚本读出对象（矩形）的名称。如果希望在“PC 运行模拟器”中测试组态，在启动运行时之前，检查是否使能“运行系统设置〉常规〉画面〉装载名称”选项。
•  WinCC (TIA Portal) 帮助系统提供了更多关于“VBS 对象模型”的信息，在 "可视化过程 > 使用系统函数和运行系统脚本> 参考 > VB 脚本编写> VBS 对象模型 ".
  

Fig. 10