System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)
Подождите немного. Документ загружается.
See also
HMIObjects Object (Listing) (Page 1884)
AlignTop Method (Page 1727)
HMIDefaultObjects Object (Listing) (Page 1878)
BringToFront Method (Page 1730)
SendToBack Method (Page 1795)
SelectAll Method (Page 1794)
SameWidthAndHeight Method (Page 1790)
SameWidth Method (Page 1788)
SameHeight Method (Page 1787)
Rotate Method (Page 1786)
Remove Method (Page 1784)
ForwardOneLevel Method (Page 1759)
BackwardOneLevel Method (Page 1729)
MoveSelection Method (Page 1779)
Item Method (Page 1772)
FlipVertically Method (Page 1758)
FlipHorizontally Method (Page 1757)
EvenlySpaceVertically Method (Page 1752)
EvenlySpaceHorizontally Method (Page 1751)
DuplicateSelection Method (Page 1750)
DeselectAll Method (Page 1748)
DeleteAll Method (Page 1746)
CreateGroup Method (Page 1743)
CreateCustomizedObject Method (Page 1741)
CopySelection Method (Page 1738)
CenterVertically Method (Page 1733)
CenterHorizontally Method (Page 1732)
AlignRight Method (Page 1726)
AlignLeft Method (Page 1725)
AlignBottom Method (Page 1724)
How to Edit a Customized Object with VBA (Page 1628)
How to Edit Group Objects with VBA (Page 1620)
How to edit Default objects, Smart objects, Windows objects and Tube objects (Page 1610)
VBA Reference (Page 1664)
Customized Objects (Page 1626)
Group Objects (Page 1618)
Default objects, Smart objects, Windows objects and Tube objects (Page 1609)
Editing Objects with VBA (Page 1606)
Parent Property (Page 2241)
Count Property (Page 2082)
Application Property (Page 2008)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1951
Slider object
Description
Represents the object called "Slider Object". The Slider object is an element of the following
listings:
● Objects: Contains all objects of a picture.
● Selection: Contains all selected objects of a picture.
● HMIDefaultObjects: Contains the default property values of all standard, Windows, and
smart objects.
VBA Object Name
HMISlider
Usage
Use the Add method to create a new "Slider Object" object in a picture:
Sub AddSlider()
'VBA333
Dim objSlider As HMISlider
Set objSlider = ActiveDocument.HMIObjects.AddHMIObject("Slider1", "HMISlider")
End Sub
Use "HMIObjects"(Index)" to return an object from the HMIObjects listing, where Index in this
case identifies the object by name:
Sub EditSlider()
'VBA334
Dim objSlider As HMISlider
Set objSlider = ActiveDocument.HMIObjects("Slider1")
objSlider.ButtonColor = RGB(255, 0, 0)
End Sub
Use "Selection"(Index) to return an object from the Selection listing:
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1952
System Manual, 11/2008,
Sub ShowNameOfFirstSelectedObject()
'VBA335
'Select all objects in the picture:
ActiveDocument.Selection.SelectAll
'Get the name of the first object of the selection:
MsgBox ActiveDocument.Selection(1).ObjectName
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1953
See also
OperationReport Property (Page 2238)
BorderFlashColorOff Property (Page 2040)
Selection Object (Listing) (Page 1949)
HMIObjects Object (Listing) (Page 1884)
HMIDefaultObjects Object (Listing) (Page 1878)
AddHMIObject Method (Page 1719)
VBA Reference (Page 1664)
Editing Objects with VBA (Page 1606)
Width Property (Page 2408)
Visible Property (Page 2405)
Top Property (Page 2311)
ToolTipText Property (Page 2310)
SmallChange Property (Page 2292)
Process Property (Page 2260)
PasswordLevel Property (Page 2244)
OperationMessage Property (Page 2238)
Operation Property (Page 2237)
Name Property (Page 2228)
Min Property (Page 2225)
Max Property (Page 2207)
Left Property (Page 2192)
Layer Property (Page 2160)
Height Property (Page 2139)
FlashRateBorderColor Property (Page 2120)
FlashRateBackColor Property (Page 2119)
FlashBorderColor Property (Page 2112)
FlashBackColor Property (Page 2111)
FillStyle Property (Page 2108)
FillingIndex Property (Page 2107)
Filling Property (Page 2106)
FillColor Property (Page 2104)
ExtendedOperation Property (Page 2103)
Direction Property (Page 2091)
ColorTop Property (Page 2075)
ColorBottom Property (Page 2068)
ButtonColor Property (Page 2052)
BorderWidth Property (Page 2045)
BorderStyle Property (Page 2043)
BorderFlashColorOn Property (Page 2042)
BorderColor Property (Page 2036)
BorderBackColor Property (Page 2035)
BackFlashColorOn Property (Page 2022)
BackFlashColorOff Property (Page 2021)
BackColorTop Property (Page 2020)
BackColor Property (Page 2017)
BackColorBottom Property (Page 2020)
BackBorderWidth Property (Page 2016)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1954
System Manual, 11/2008,
SourceLink Object
Description
Represents the source for a direct connection.
VBA Object Name
HMISourceLink
Usage
Use the SourceLink property to return the SourceLink object. In the following example the X
position of "Rectangle_A" is copied to the Y position of "Rectangle_B" in Runtime by clicking
on the button:
Sub DirectConnection()
'VBA336
Dim objButton As HMIButton
Dim objRectangleA As HMIRectangle
Dim objRectangleB As HMIRectangle
Dim objEvent As HMIEvent
Dim objDirConnection As HMIDirectConnection
'
'Add objects to active document:
Set objRectangleA = ActiveDocument.HMIObjects.AddHMIObject("Rectangle_A", "HMIRectangle")
Set objRectangleB = ActiveDocument.HMIObjects.AddHMIObject("Rectangle_B", "HMIRectangle")
Set objButton = ActiveDocument.HMIObjects.AddHMIObject("myButton", "HMIButton")
With objRectangleA
.Top = 100
.Left = 100
End With
With objRectangleB
.Top = 250
.Left = 400
.BackColor = RGB(255, 0, 0)
End With
With objButton
.Top = 10
.Left = 10
.Text = "SetPosition"
End With
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1955
'
'Initiation of directconnection by mouseclick:
Set objDirConnection =
objButton.Events(1).Actions.AddAction(hmiActionCreationTypeDirectConnection)
With objDirConnection
'Sourceobject: Top-property of Rectangle_A
.SourceLink.Type = hmiSourceTypeProperty
.SourceLink.ObjectName = "Rectangle_A"
.SourceLink.AutomationName = "Top"
'
'Targetobject: Left-property of Rectangle_B
.DestinationLink.Type = hmiDestTypeProperty
.DestinationLink.ObjectName = "Rectangle_B"
.DestinationLink.AutomationName = "Left"
End With
End Sub
See also
DirectConnection Object (Page 1845)
VBA Reference (Page 1664)
Type Property (Page 2315)
SourceLink Property (Page 2293)
ObjectName Property (Page 2232)
AutomationName Property (Page 2011)
StaticText Object
Description
Represents the "Static Text" object. The StaticText object is an element of the following listings:
● Objects: Contains all objects of a picture.
● Selection: Contains all selected objects of a picture.
● HMIDefaultObjects: Contains the default property values of all standard, Windows, and
smart objects.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1956
System Manual, 11/2008,
VBA Object Name
HMIStaticText
Usage
Use the Add method to create a new "Static Text" object in a picture:
Sub AddStaticText()
'VBA337
Dim objStaticText As HMIStaticText
Set objStaticText = ActiveDocument.HMIObjects.AddHMIObject("Static_Text1", "HMIStaticText")
End Sub
Use "HMIObjects"(Index)" to return an object from the HMIObjects listing, where Index in this
case identifies the object by name:
Sub EditStaticText()
'VBA338
Dim objStaticText As HMIStaticText
Set objStaticText = ActiveDocument.HMIObjects("Static_Text1")
objStaticText.BorderColor = RGB(255, 0, 0)
End Sub
Use "Selection"(Index) to return an object from the Selection listing:
Sub ShowNameOfFirstSelectedObject()
'VBA339
'Select all objects in the picture:
ActiveDocument.Selection.SelectAll
'Get the name of the first object of the selection:
MsgBox ActiveDocument.Selection(1).ObjectName
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1957
See also
Selection Object (Listing) (Page 1949)
FontBold Property (Page 2126)
HMIObjects Object (Listing) (Page 1884)
HMIDefaultObjects Object (Listing) (Page 1878)
AddHMIObject Method (Page 1719)
VBA Reference (Page 1664)
Editing Objects with VBA (Page 1606)
Width Property (Page 2408)
Visible Property (Page 2405)
Top Property (Page 2311)
ToolTipText Property (Page 2310)
Text Property (Page 2306)
PasswordLevel Property (Page 2244)
Orientation Property (Page 2239)
Operation Property (Page 2237)
Name Property (Page 2228)
Left Property (Page 2192)
Layer Property (Page 2160)
Height Property (Page 2139)
ForeFlashColorOn Property (Page 2133)
ForeFlashColorOff Property (Page 2132)
ForeColor Property (Page 2132)
FontUnderline Property (Page 2131)
FontSize Property (Page 2130)
FontName Property (Page 2129)
FontItalic Property (Page 2128)
FlashRateForeColor Property (Page 2123)
FlashRateBorderColor Property (Page 2120)
FlashRateBackColor Property (Page 2119)
FlashForeColor Property (Page 2114)
FlashBorderColor Property (Page 2112)
FlashBackColor Property (Page 2111)
FillStyle Property (Page 2108)
FillingIndex Property (Page 2107)
Filling Property (Page 2106)
FillColor Property (Page 2104)
BorderWidth Property (Page 2045)
BorderStyle Property (Page 2043)
BorderFlashColorOn Property (Page 2042)
BorderFlashColorOff Property (Page 2040)
BorderColor Property (Page 2036)
BorderBackColor Property (Page 2035)
BackFlashColorOn Property (Page 2022)
BackFlashColorOff Property (Page 2021)
BackColor Property (Page 2017)
AlignmentTop Property (Page 2005)
AlignmentLeft Property (Page 2004)
AdaptBorder Property (Page 1999)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1958
System Manual, 11/2008,
StatusDisplay Object
Description
Represents the "Status Display" object. The "StatusDisplay" object is an element of the
following listings:
● Objects: Contains all objects of a picture.
● Selection: Contains all selected objects of a picture.
● HMIDefaultObjects: Contains the default property values of all standard, Windows, and
smart objects.
VBA Object Name
HMIStatusDisplay
Usage
Use the Add method to create a new "Status Display" object in a picture:
Sub AddStatusDisplay()
'VBA340
Dim objStatusDisplay As HMIStatusDisplay
Set objStatusDisplay = ActiveDocument.HMIObjects.AddHMIObject("Statusdisplay1",
"HMIStatusDisplay")
End Sub
Use "HMIObjects"(Index)" to return an object from the HMIObjects listing, where Index in this
case identifies the object by name:
Sub EditStatusDisplay()
'VBA341
Dim objStatusDisplay As HMIStatusDisplay
Set objStatusDisplay = ActiveDocument.HMIObjects("Statusdisplay1")
objStatusDisplay.BorderColor = RGB(255, 0, 0)
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1959
Use "Selection"(Index) to return an object from the Selection listing:
Sub ShowNameOfFirstSelectedObject()
'VBA342
'Select all objects in the picture:
ActiveDocument.Selection.SelectAll
'Get the name of the first object of the selection:
MsgBox ActiveDocument.Selection(1).ObjectName
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1960
System Manual, 11/2008,