System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)
Подождите немного. Документ загружается.
See also
ScreenItems Object (List) (Page 138)
Activate Method (Page 639)
Properties (Page 276)
ScreenItem Object (Page 134)
Width Property (Page 626)
Visible Property (Page 624)
Type Property (Page 596)
TopConnectedObjectName Property (Page 576)
TopConnectedConnectionPointIndex Property (Page 576)
Top Property (Page 575)
ToolTipText Property (Page 574)
Parent Property (Page 471)
Orientation Property (Page 468)
ObjectName Property (Page 455)
Left Property (Page 423)
Layer Property (Page 408)
Height Property (Page 391)
Enabled Property (Page 360)
BottomConnectedObjectName Property (Page 316)
BottomConnectedConnectionPointIndex Property (Page 315)
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
181
1.14.3.3 Smart objects
3D Bar
Description
Object Type of ScreenItem Object. Represents the graphic object "3D Bar"
Type Identifier in VBS
HMIBar
Usage
In the following example, the object with the name "3DBar1" is moved 10 pixels to the right:
'VBS32
Dim objBar
Set objBar = ScreenItems("3DBar1")
objBar.Left = objBar.Left + 10
Notes on Error Handling
Bars and 3D bars are imaged in the object model on a "HMIBar" type. Since the two objects
have
different properties, the availability of the property (dynamic type compilation in Runtime)
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
182
System Manual, 11/2008,
should be queried via an exception measure. The exception measure is activated for the
corresponding procedure by the following instruction:
On Error Resume Next
The instruction causes the VBScript engine to initiate the follow-on command in the case of a
Runtime error.
The error code can subsequently be checked using the Err object. In order to deactivate the
handling of Runtime errors in scripts, use the following command:
On Error Goto 0
Handling errors always relates to the procedure layer. If a script in a procedure causes an
error,
VBScript checks whether an error handling measure is implemented in this layer. If not,
control is transferred one layer up (to the calling procedure). If there is no error handling
measure here either, the control is transferred yet another layer up. This continues until either
the top module level is reached or the code for Runtime error handling is located. If the
activation of the Runtime error handling fails, the control is transferred to the top level on the
internal VBScript Runtime error handing. This opens an error dialog and stops the script.
The "On Error Resume Next" command can be installed on all layers (i.e. also in procedures).
When the error handling measure is use, it can basically be determined whether the user is
actually using the required implementation type.
In addition, it can be ensured that there is no termination of execution due to a faulty access
to the object.
Examples of error handling
'VBS148
Sub OnClick(ByVal Item)
Dim objScreenItem
'
'Activation of errorhandling:
On Error Resume Next
For Each objScreenItem In ScreenItems
If "HMIBar" = objScreenItem.Type Then
'
'=== Property "Layer00Value" only available for 3D bar
objScreenItem.Layer00Value = objScreenItem.Layer00Value * 2
If 0 <> Err.Number Then
HMIRuntime.Trace objScreenItem.Name & ": no 3D bar" & vbCrLf
'
'Delete error message
Err.Clear
End If
End If
Next
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
183
On Error Goto 0 'Deactivation of errorhandling
End Sub
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
184
System Manual, 11/2008,
See also
Type Property (Page 596)
Layer08Color Property (Page 415)
BorderStyle Property (Page 314)
Activate Method (Page 639)
Properties (Page 276)
ScreenItems Object (List) (Page 138)
ScreenItem Object (Page 134)
ZeroPointValue Property (Page 637)
Width Property (Page 626)
Visible Property (Page 624)
Top Property (Page 575)
ToolTipText Property (Page 574)
Process Property (Page 485)
PredefinedAngles Property (Page 484)
PasswordLevel Property (Page 472)
Parent Property (Page 471)
ObjectName Property (Page 455)
Min Property (Page 449)
Max Property (Page 435)
LightEffect Property (Page 424)
Left Property (Page 423)
Layer10Value Property (Page 422)
Layer09Value Property (Page 422)
Layer08Value Property (Page 421)
Layer07Value Property (Page 421)
Layer06Value Property (Page 421)
Layer05Value Property (Page 420)
Layer04Value Property (Page 420)
Layer03Value Property (Page 420)
Layer02Value Property (Page 420)
Layer01Value Property (Page 419)
Layer00Value Property (Page 419)
Layer10Color Property (Page 415)
Layer09Color Property (Page 415)
Layer07Color Property (Page 414)
Layer06Color Property (Page 414)
Layer05Color Property (Page 414)
Layer04Color Property (Page 413)
Layer03Color Property (Page 413)
Layer02Color Property (Page 413)
Layer01Color Property (Page 413)
Layer00Color Property (Page 412)
Layer10Checked Property (Page 412)
Layer09Checked Property (Page 412)
Layer08Checked Property (Page 411)
Layer07Checked Property (Page 411)
Layer06Checked Property (Page 411)
Layer05Checked Property (Page 410)
Layer04Checked Property (Page 410)
Layer03Checked Property (Page 410)
Layer02Checked Property (Page 410)
Layer01Checked Property (Page 409)
Layer00Checked Property (Page 409)
Layer Object (Page 127)
Height Property (Page 391)
Enabled Property (Page 360)
Direction Property (Page 357)
BorderWidth Property (Page 315)
BorderColor Property (Page 313)
BaseY Property (Page 303)
BaseX Property (Page 303)
BarWidth Property (Page 301)
BarHeight Property (Page 300)
BarDepth Property (Page 300)
Background Property (Page 298)
BackColor Property (Page 295)
Axe Property (Page 294)
AngleBeta Property (Page 286)
AngleAlpha Property (Page 286)
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
185
Application Window
Description
Object Type of ScreenItem Object. Represents the graphic object "Application Window"
Type Identifier in VBS
HMIApplicationWindow
Usage
In the following example, the object with the name "ApplicationWindow1" is moved 10 pixels
to the right:
'VBS33
Dim objAppWindow
Set objAppWindow = ScreenItems("ApplicationWindow1")
objAppWindow.Left = objAppWindow.Left + 10
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
186
System Manual, 11/2008,
See also
Properties (Page 276)
Activate Method (Page 639)
ScreenItems Object (List) (Page 138)
ScreenItem Object (Page 134)
WindowBorder Property (Page 627)
Width Property (Page 626)
Visible Property (Page 624)
Type Property (Page 596)
Top Property (Page 575)
Template Property (Page 532)
Parent Property (Page 471)
OnTop Property (Page 460)
ObjectName Property (Page 455)
Moveable Property (Page 451)
MaximizeButton Property (Page 435)
Left Property (Page 423)
Layer Object (Page 127)
Height Property (Page 391)
Enabled Property (Page 360)
CloseButton Property (Page 328)
Caption Property (Page 320)
Application Property (Page 287)
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
187
Bar
Description
Object Type of ScreenItem Object. Represents the graphic object "Bar"
Type Identifier in VBS
HMIBar
Usage
In the following example, the object with the name "Bar1" is moved 10 pixels to the right:
'VBS34
Dim objBar
Set objBar = ScreenItems("Bar1")
objBar.Left = objBar.Left + 10
Notes on Error Handling
Bars and 3D bars are imaged in the object model on a "HMIBar" type. Since the two objects
have
different properties, the availability of the property (dynamic type compilation in Runtime)
should be queried via an exception measure. The exception measure is activated for the
corresponding procedure by the following instruction:
On Error Resume Next
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
188
System Manual, 11/2008,
The instruction causes the VBScript engine to initiate the follow-on command in the case of a
Runtime error.
The error code can subsequently be checked using the Err object. In order to deactivate the
handling of Runtime errors in scripts, use the following command:
On Error Goto 0
Handling errors always relates to the procedure layer. If a script in a procedure causes an
error,
VBScript checks whether an error handling measure is implemented in this layer. If not,
control is transferred one layer up (to the calling procedure). If there is no error handling
measure here either, the control is transferred yet another layer up. This continues until either
the top module level is reached or the code for Runtime error handling is located. If the
activation of the Runtime error handling fails, the control is transferred to the top level on the
internal VBScript Runtime error handing. This opens an error dialog and stops the script.
The "On Error Resume Next" command can be installed on all layers (i.e. also in procedures).
When the error handling measure is use, it can basically be determined whether the user is
actually using the required implementation type.
In addition, it can be ensured that there is no termination of execution due to a faulty access
to the object.
Examples of error handling
'VBS147
Sub OnClick(ByVal Item)
Dim objScreenItem
'
'Activation of errorhandling:
On Error Resume Next
For Each objScreenItem In ScreenItems
If "HMIBar" = objScreenItem.Type Then
'
'=== Property "LimitHigh4" only available for bar
objScreenItem.LimitHigh4 = objScreenItem.LimitHigh4 * 2
If 0 <> Err.Number Then
HMIRuntime.Trace objScreenItem.Name & ": no bar" & vbCrLf
'
'Delete error message
Err.Clear
End If
End If
Next
On Error Goto 0 'Deactivation of errorhandling
End Sub
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
189
See also
ToolTipText Property (Page 574)
Layer Object (Page 127)
ColorChangeType Property (Page 332)
Average Property (Page 294)
Activate Method (Page 639)
Properties (Page 276)
ScreenItems Object (List) (Page 138)
ScreenItem Object (Page 134)
ZeroPointValue Property (Page 637)
ZeroPoint Property (Page 636)
Width Property (Page 626)
WarningLow Property (Page 626)
WarningHigh Property (Page 626)
Visible Property (Page 624)
TypeWarningLow Property (Page 601)
TypeWarningHigh Property (Page 600)
TypeToleranceLow Property (Page 600)
TypeToleranceHigh Property (Page 600)
TypeLimitLow5 Property (Page 600)
TypeLimitLow4 Property (Page 599)
TypeLimitHigh5 Property (Page 599)
TypeLimitHigh4 Property (Page 599)
TypeAlarmLow Property (Page 598)
TypeAlarmHigh Property (Page 598)
Type Property (Page 596)
TrendColor Property (Page 579)
Trend Property (Page 577)
Top Property (Page 575)
ToleranceLow Property (Page 562)
ToleranceHigh Property (Page 562)
ScalingType Property (Page 499)
Scaling Property (Page 498)
ScaleTicks Property (Page 498)
ScaleColor Property (Page 498)
RightComma Property (Page 492)
Process Property (Page 485)
PasswordLevel Property (Page 472)
Parent Property (Page 471)
ObjectName Property (Page 455)
Min Property (Page 449)
Max Property (Page 435)
Marker Property (Page 435)
LongStrokesTextEach Property (Page 432)
LongStrokesSize Property (Page 432)
LongStrokesOnly Property (Page 432)
LongStrokesBold Property (Page 431)
LimitLow5 Property (Page 425)
LimitLow4 Property (Page 425)
LimitHigh5 Property (Page 425)
LimitHigh4 Property (Page 424)
LeftComma Property (Page 424)
Left Property (Page 423)
HysteresisRange Property (Page 399)
Hysteresis Property (Page 399)
Height Property (Page 391)
FontSize Property (Page 382)
FontName Property (Page 381)
FontBold Property (Page 380)
FlashRateBorderColor Property (Page 376)
FlashRateBackColor Property (Page 376)
FlashBorderColor Property (Page 373)
FlashBackColor Property (Page 373)
FillStyle2 Property (Page 370)
FillStyle Property (Page 369)
FillColor Property (Page 368)
Exponent Property (Page 364)
Enabled Property (Page 360)
Direction Property (Page 357)
ColorWarningLow Property (Page 335)
ColorWarningHigh Property (Page 335)
ColorToleranceLow Property (Page 334)
ColorToleranceHigh Property (Page 334)
ColorLimitLow5 Property (Page 334)
ColorLimitLow4 Property (Page 333)
ColorLimitHigh5 Property (Page 333)
ColorLimitHigh4 Property (Page 333)
ColorAlarmLow Property (Page 332)
ColorAlarmHigh Property (Page 331)
CheckWarningLow Property (Page 327)
CheckWarningHigh Property (Page 326)
CheckToleranceLow Property (Page 326)
CheckToleranceHigh Property (Page 326)
CheckLimitLow5 Property (Page 325)
CheckLimitLow4 Property (Page 325)
CheckLimitHigh5 Property (Page 325)
CheckLimitHigh4 Property (Page 324)
CheckAlarmLow Property (Page 324)
CheckAlarmHigh Property (Page 324)
BorderWidth Property (Page 315)
BorderStyle Property (Page 314)
BorderFlashColorOn Property (Page 314)
BorderFlashColorOff Property (Page 314)
BorderColor Property (Page 313)
BorderBackColor Property (Page 312)
BackFlashColorOn Property (Page 297)
BackFlashColorOff Property (Page 297)
BackColor3 Property (Page 296)
BackColor2 Property (Page 296)
BackColor Property (Page 295)
AxisSection Property (Page 294)
Alignment Property (Page 283)
AlarmLow Property (Page 283)
AlarmHigh Property (Page 282)
VBS for Creating Procedures and Actions
1.14 VBS Reference
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
190
System Manual, 11/2008,