System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)
Подождите немного. Документ загружается.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the color for limit 4 will be defined as "Magenta":
Sub HMI3DBarGraphConfiguration()
'VBA567
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer04Checked = True
.Layer04Color = RGB(255, 0, 255)
End With
End Sub
See also
Layer04Checked Property (Page 2170)
3DBarGraph Object (Page 1805)
Layer04Value Property
Description
Defines or returns the value for "limit 4" in the case of the 3DBarGraph object.
Monitoring only takes effect when the Layer00Checked property value is set to TRUE.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the value for limit 4 will be defined as "40":
Sub HMI3DBarGraphConfiguration()
'VBA568
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer04Checked = True
.Layer04Value = 40
End With
End Sub
See also
Layer00Checked Property (Page 2161)
3DBarGraph Object (Page 1805)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2171
Layer05Checked Property
Description
TRUE if limit 5 is to be monitored in the case of the 3DBarGraph object. BOOLEAN write-read
access.
Limit value and representation are defined with the Layer05Value and Layer05Color
properties.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example, limit 5 will be monitored:
Sub HMI3DBarGraphConfiguration()
'VBA569
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer05Checked = True
End With
End Sub
See also
Layer05Value Property (Page 2173)
Layer05Color Property (Page 2172)
3DBarGraph Object (Page 1805)
Layer05Color Property
Description
Defines or returns the color for limit 5 of the 3DBarGraph object. LONG write-read access.
When monitoring of the limit value is activated (Layer05Checked property), the bar turns to
the color defined by this attribute on reaching the limit value.
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)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2172
System Manual, 11/2008,
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the color for limit 5 will be defined as "Magenta":
Sub HMI3DBarGraphConfiguration()
'VBA570
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer05Checked = True
.Layer05Color = RGB(255, 0, 255)
End With
End Sub
See also
Layer05Checked Property (Page 2172)
3DBarGraph Object (Page 1805)
Layer05Value Property
Description
Defines or returns the value for "limit 5" in the case of the 3DBarGraph object.
Monitoring only takes effect when the Layer05Checked property value is set to TRUE.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the value for limit 5 will be defined as "50":
Sub HMI3DBarGraphConfiguration()
'VBA571
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer05Checked = True
.Layer05Value = 50
End With
End Sub
See also
Layer05Checked Property (Page 2172)
3DBarGraph Object (Page 1805)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2173
Layer06Checked Property
Description
TRUE if limit 6 is to be monitored in the case of the 3DBarGraph object. BOOLEAN write-read
access.
Limit value and representation are defined with the Layer06Value and Layer06Color
properties.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example, limit 6 will be monitored:
Sub HMI3DBarGraphConfiguration()
'VBA572
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer06Checked = True
End With
End Sub
See also
Layer06Value Property (Page 2175)
Layer06Color Property (Page 2174)
3DBarGraph Object (Page 1805)
Layer06Color Property
Description
Defines or returns the color for limit 6 of the 3DBarGraph object. LONG write-read access.
When monitoring of the limit value is activated (Layer06Checked property), the bar turns to
the color defined by this attribute on reaching the limit value.
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)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2174
System Manual, 11/2008,
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the color for limit 6 will be defined as "Magenta":
Sub HMI3DBarGraphConfiguration()
'VBA573
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer06Checked = True
.Layer06Color = RGB(255, 0, 255)
End With
End Sub
See also
Layer06Checked Property (Page 2174)
3DBarGraph Object (Page 1805)
Layer06Value Property
Description
Defines or returns the value for "limit 6" in the case of the 3DBarGraph object.
Monitoring only takes effect when the Layer06Checked property value is set to TRUE.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the value for limit 6 will be defined as "60":
Sub HMI3DBarGraphConfiguration()
'VBA574
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer06Checked = True
.Layer06Value = 60
End With
End Sub
See also
Layer06Checked Property (Page 2174)
3DBarGraph Object (Page 1805)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2175
Layer07Checked Property
Description
TRUE if limit 7 is to be monitored in the case of the 3DBarGraph object. BOOLEAN write-read
access.
Limit value and representation are defined with the Layer07Value and Layer07Color
properties.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example, limit 7 will be monitored:
Sub HMI3DBarGraphConfiguration()
'VBA575
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer07Checked = True
End With
End Sub
See also
Layer07Value Property (Page 2177)
Layer07Color Property (Page 2176)
3DBarGraph Object (Page 1805)
Layer07Color Property
Description
Defines or returns the color for limit 7 of the 3DBarGraph object. LONG write-read access.
When monitoring of the limit value is activated (Layer07Checked property), the bar turns to
the color defined by this attribute on reaching the limit value.
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)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2176
System Manual, 11/2008,
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the color for limit 7 will be defined as "Magenta":
Sub HMI3DBarGraphConfiguration()
'VBA576
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer07Checked = True
.Layer07Color = RGB(255, 0, 255)
End With
End Sub
See also
Layer07Checked Property (Page 2176)
3DBarGraph Object (Page 1805)
Layer07Value Property
Description
Defines or returns the value for "limit 7" in the case of the 3DBarGraph object.
Monitoring only takes effect when the Layer07Checked property value is set to TRUE.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the value for limit 7 will be defined as "70":
Sub HMI3DBarGraphConfiguration()
'VBA577
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer07Checked = True
.Layer07Value = 70
End With
End Sub
See also
Layer07Checked Property (Page 2176)
3DBarGraph Object (Page 1805)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2177
Layer08Checked Property
Description
TRUE if limit 8 is to be monitored in the case of the 3DBarGraph object. BOOLEAN write-read
access.
Limit value and representation are defined with the Layer08Value and Layer08Color
properties.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example, limit 8 will be monitored:
Sub HMI3DBarGraphConfiguration()
'VBA578
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer08Checked = True
End With
End Sub
See also
Layer08Value Property (Page 2179)
Layer08Color Property (Page 2178)
3DBarGraph Object (Page 1805)
Layer08Color Property
Description
Defines or returns the color for limit 8 of the 3DBarGraph object. LONG write-read access.
When monitoring of the limit value is activated (Layer08Checked property), the bar turns to
the color defined by this attribute on reaching the limit value.
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)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2178
System Manual, 11/2008,
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the color for limit 8 will be defined as "Magenta":
Sub HMI3DBarGraphConfiguration()
'VBA579
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer08Checked = True
.Layer08Color = RGB(255, 0, 255)
End With
End Sub
See also
Layer08Checked Property (Page 2178)
3DBarGraph Object (Page 1805)
Layer08Value Property
Description
Defines or returns the value for "limit 8" in the case of the 3DBarGraph object.
Monitoring only takes effect when the Layer08Checked property value is set to TRUE.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example the value for limit 8 will be defined as "80":
Sub HMI3DBarGraphConfiguration()
'VBA580
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer08Checked = True
.Layer08Value = 80
End With
End Sub
See also
Layer08Checked Property (Page 2178)
3DBarGraph Object (Page 1805)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2179
Layer09Checked Property
Description
TRUE if limit 9 is to be monitored in the case of the 3DBarGraph object. BOOLEAN write-read
access.
Limit value and representation are defined with the Layer09Value and Layer09Color
properties.
Example:
The "HMI3DBarGraphConfiguration()" procedure accesses the properties of the 3DBarGraph
object. In this example, limit 9 will be monitored:
Sub HMI3DBarGraphConfiguration()
'VBA581
Dim obj3DBar As HMI3DBarGraph
Set obj3DBar = ActiveDocument.HMIObjects.AddHMIObject("3DBar1", "HMI3DBarGraph")
With obj3DBar
.Layer09Checked = True
End With
End Sub
See also
Layer09Value Property (Page 2181)
Layer09Color Property (Page 2180)
3DBarGraph Object (Page 1805)
Layer09Color Property
Description
Defines or returns the color for limit 9 of the 3DBarGraph object. LONG write-read access.
When monitoring of the limit value is activated (Layer09Checked property), the bar turns to
the color defined by this attribute on reaching the limit value.
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)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2180
System Manual, 11/2008,