System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)
Подождите немного. Документ загружается.
See also
LimitLow5 Property (Page 2196)
ColorLimitLow5 Property (Page 2072)
CheckLimitLow5 Property (Page 2060)
BarGraph Object (Page 1819)
TypeToleranceHigh Property
Description
TRUE, when the "Tolerance high" lower limit value should be evaluated as a percentage.
FALSE, when the evaluation should be as an absolute value. BOOLEAN write-read access.
Example:
The "BarGraphLimitConfiguration()" procedure configures the properties of the limit values. In
this example the limit value for "Tolerance High" will be configured:
Sub BarGraphLimitConfiguration()
'VBA757
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
'Set analysis = absolute
.TypeToleranceHigh = False
'Activate monitoring
.CheckToleranceHigh = True
'Set barcolor = "yellow"
.ColorToleranceHigh = RGB(255, 255, 0)
'Set upper limit = "40"
.ToleranceHigh = 40
End With
End Sub
See also
ColorToleranceHigh Property (Page 2073)
CheckToleranceHigh Property (Page 2061)
BarGraph Object (Page 1819)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2321
TypeToleranceLow Property
Description
TRUE, when the "Tolerance low" lower limit value should be evaluated as a percentage.
FALSE, when the evaluation should be as an absolute value. BOOLEAN write-read access.
Example:
The "BarGraphLimitConfiguration()" procedure configures the properties of the limit values. In
this example the limit value for "Tolerance Low" will be configured:
Sub BarGraphLimitConfiguration()
'VBA758
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
'Set analysis = absolute
.TypeToleranceLow = False
'Activate monitoring
.CheckToleranceLow = True
'Set barcolor = "red"
.ColorToleranceLow = RGB(255, 0, 0)
'Set lower limit = "10"
.ToleranceLow = 10
End With
End Sub
See also
ToleranceLow Property (Page 2308)
ColorToleranceLow Property (Page 2074)
CheckToleranceLow Property (Page 2061)
BarGraph Object (Page 1819)
TypeWarningHigh Property
Description
TRUE, when the "Warning high" lower limit value should be evaluated as a percentage. FALSE,
when the evaluation should be as an absolute value. BOOLEAN write-read access.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2322
System Manual, 11/2008,
Example:
The "BarGraphLimitConfiguration()" procedure configures the properties of the high limit value
for
an alarm. In this example the type of evaluation will be set to "Absolute". The alarm will be
triggered at a value of "75".
Sub BarGraphLimitConfiguration()
'VBA759
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
'Set analysis = absolute
.TypeWarningHigh = False
'Activate monitoring
.CheckWarningHigh = True
'Set barcolor = "red"
.ColorWarningHigh = RGB(255, 0, 0)
'Set upper limit = "75"
.WarningHigh = 75
End With
End Sub
See also
WarningHigh Property (Page 2406)
ColorWarningHigh Property (Page 2076)
CheckWarningHigh Property (Page 2062)
BarGraph Object (Page 1819)
TypeWarningLow Property
Description
TRUE, when the "Warning low" lower limit value should be evaluated as a percentage. FALSE,
when the evaluation should be as an absolute value. BOOLEAN write-read access.
Example:
The "BarGraphLimitConfiguration()" procedure configures the properties of the low limit value
for
an alarm. In this example the type of evaluation will be set to "Absolute". The alarm will be
triggered at a value of "12".
Sub BarGraphLimitConfiguration()
'VBA760
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2323
'Set analysis = absolute
.TypeWarningLow = False
'Activate monitoring
.CheckWarningLow = True
'Set barcolor = "magenta"
.ColorWarningLow = RGB(255, 0, 255)
'Set lower limit = "12"
.WarningLow = 12
End With
End Sub
See also
WarningLow Property (Page 2407)
ColorWarningLow Property (Page 2077)
CheckWarningLow Property (Page 2063)
BarGraph Object (Page 1819)
4.4.8.16 U
Underlined Property
Description
TRUE if the font attribute "Underline" is set for the language-dependent text in the object.
BOOLEAN write-read access.
Example:
The following example sets the font attributes of a button for French and English:
Sub ExampleForLanguageFonts()
'VBA761
Dim colLangFonts As HMILanguageFonts
Dim objButton As HMIButton
Set objButton = ActiveDocument.HMIObjects.AddHMIObject("myButton", "HMIButton")
objButton.Text = "DefText"
Set colLangFonts = objButton.LDFonts
'
'Set font-properties for french:
With colLangFonts.ItemByLCID(1036)
.Family = "Courier New"
.Bold = True
.Italic = False
.Underlined = True
.Size = 12
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2324
System Manual, 11/2008,
End With
'
'Set font-properties for english:
With colLangFonts.ItemByLCID(1033)
.Family = "Times New Roman"
.Bold = False
.Italic = True
.Underlined = False
.Size = 14
End With
End Sub
See also
Size Property (Page 2291)
Parent Property (Page 2241)
LanguageID Property (Page 2158)
Italic Property (Page 2151)
FontFamily Property (Page 2127)
Bold Property (Page 2034)
Application Property (Page 2008)
LanguageFont Object (Page 1889)
UnselBGColor Property
Description
Defines or returns the background color of entries in the text list object which are not selected.
LONG write-read access.
Determination of Color Value
The color is displayed in RGB format (Red, Green, Blue). Specify the corresponding decimal
value for each of the three RGB values (value range from 0 to 255).
Use VBA function "RGB" to assign a color to a property. The color "red", for example, is
represented as follows: RGB(255, 0, 0)
Example:
The "TextListConfiguration()" procedure accesses the properties of the object TextList. In this
example the colors will be defined for entries that are not selected in the selection list:
Sub TextListConfiguration()
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2325
'VBA762
Dim objTextList As HMITextList
Set objTextList = ActiveDocument.HMIObjects.AddHMIObject("myTextList", "HMITextList")
With objTextList
.UnselBGColor = RGB(255, 0, 0)
.UnselTextColor = RGB(0, 0, 0)
End With
End Sub
See also
TextList Object (Page 1964)
UnselTextColor Property
Description
In the case of the TextList object, defines or returns the color of text in the selection list for
entries that are not selected. LONG write-read access.
Determination of Color Value
The color is displayed in RGB format (Red, Green, Blue). Specify the corresponding decimal
value for each of the three RGB values (value range from 0 to 255).
Use VBA function "RGB" to assign a color to a property. The color "red", for example, is
represented as follows: RGB(255, 0, 0)
Example:
The "TextListConfiguration()" procedure accesses the properties of the object TextList. In this
example the colors will be defined for entries that are not selected in the selection list:
Sub TextListConfiguration()
'VBA763
Dim objTextList As HMITextList
Set objTextList = ActiveDocument.HMIObjects.AddHMIObject("myTextList", "HMITextList")
With objTextList
.UnselBGColor = RGB(255, 0, 0)
.UnselTextColor = RGB(0, 0, 0)
End With
End Sub
See also
TextList Object (Page 1964)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2326
System Manual, 11/2008,
UpdateCycle Property
Description
Defines or returns the type and frequency of updates to the picture window in Runtime.
Update Cycle Assigned Value
Upon change 0
250 ms 1
500 ms 2
1 s 3
2 s 4
5 s 5
10 s 6
1 min 7
5 min 8
10 min 9
1 h 10
User cycle 1 11
User cycle 2 12
User cycle 3 13
User cycle 4 14
User cycle 5 15
Picture cycle 255
Example:
The "PictureWindowConfig" procedure accesses the properties of the picture window. In this
example the picture window will be updated every 5 seconds in Runtime:
Sub PictureWindowConfig()
'VBA764
Dim objPicWindow As HMIPictureWindow
Set objPicWindow = ActiveDocument.HMIObjects.AddHMIObject("PicWindow1", "HMIPictureWindow")
With objPicWindow
.UpdateCycle = 5
End With
End Sub
See also
PictureWindow Object (Page 1919)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2327
UserValue1 Property
Description
Defines or returns any value in the case of the GroupDisplay object.
The value can be evaluated by a script, for example. This value is neither evaluated nor
displayed in Runtime.
Example:
The "GroupDisplayConfiguration()" procedure accesses the properties of the Group Display.
In this example four different user values will be assigned:
Sub GroupDisplayConfiguration()
'VBA765
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects.AddHMIObject("GroupDisplay1",
"HMIGroupDisplay")
With objGroupDisplay
.UserValue1 = 0
.UserValue2 = 25
.UserValue3 = 50
.UserValue4 = 75
End With
End Sub
See also
UserValue4 Property (Page 2330)
UserValue3 Property (Page 2329)
UserValue2-Eigenschaft (Page 2328)
GroupDisplay Object (Page 1874)
UserValue2-Eigenschaft
Description
Defines or returns any value in the case of the GroupDisplay object.
The value can be evaluated by a script, for example. This value is neither evaluated nor
displayed in Runtime.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2328
System Manual, 11/2008,
Example:
The "GroupDisplayConfiguration()" procedure accesses the properties of the Group Display.
In this example four different user values will be assigned:
Sub GroupDisplayConfiguration()
'VBA766
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects.AddHMIObject("GroupDisplay1",
"HMIGroupDisplay")
With objGroupDisplay
.UserValue1 = 0
.UserValue2 = 25
.UserValue3 = 50
.UserValue4 = 75
End With
End Sub
See also
UserValue4 Property (Page 2330)
UserValue3 Property (Page 2329)
UserValue1 Property (Page 2328)
GroupDisplay Object (Page 1874)
UserValue3 Property
Description
Defines or returns any value in the case of the GroupDisplay object.
The value can be evaluated by a script, for example. This value is neither evaluated nor
displayed in Runtime.
Example:
The "GroupDisplayConfiguration()" procedure accesses the properties of the Group Display.
In this example four different user values will be assigned:
Sub GroupDisplayConfiguration()
'VBA767
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects.AddHMIObject("GroupDisplay1",
"HMIGroupDisplay")
With objGroupDisplay
.UserValue1 = 0
.UserValue2 = 25
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2329
.UserValue3 = 50
.UserValue4 = 75
End With
End Sub
See also
UserValue4 Property (Page 2330)
UserValue2-Eigenschaft (Page 2328)
UserValue1 Property (Page 2328)
GroupDisplay Object (Page 1874)
UserValue4 Property
Description
Defines or returns any value in the case of the GroupDisplay object.
The value can be evaluated by a script, for example. This value is neither evaluated nor
displayed in Runtime.
Example:
The "GroupDisplayConfiguration()" procedure accesses the properties of the Group Display.
In this example four different user values will be assigned:
Sub GroupDisplayConfiguration()
'VBA768
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects.AddHMIObject("GroupDisplay1",
"HMIGroupDisplay")
With objGroupDisplay
.UserValue1 = 0
.UserValue2 = 25
.UserValue3 = 50
.UserValue4 = 75
End With
End Sub
See also
UserValue3 Property (Page 2329)
UserValue2-Eigenschaft (Page 2328)
UserValue1 Property (Page 2328)
GroupDisplay Object (Page 1874)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2330
System Manual, 11/2008,