System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)

Подождите немного. Документ загружается.

See also

TabOrderOtherAction Property (Page 2303)

TabOrderMouse Property (Page 2302)

TabOrderKeyboard Property (Page 2301)

Document Object (Page 1847)

TabOrderAlpha Property

Description

Defines or returns the position of the object in the TAB sequence for the alpha tab order cursor.

Example:

In this example two I/O fields will be inserted in the active picture and the TAB sequence will

then be defined:

Sub IOFieldConfig()

'VBA734

Dim objIOField1 As HMIIOField

Dim objIOField2 As HMIIOField

Set objIOField1 = ActiveDocument.HMIObjects.AddHMIObject("IOField1", "HMIIOField")

Set objIOField2 = ActiveDocument.HMIObjects.AddHMIObject("IOField2", "HMIIOField")

With objIOField1

.Top = 10

.Left = 10

.TabOrderAlpha = 1

End With

With objIOField2

.Top = 100

.Left = 10

.TabOrderAlpha = 2

End With

End Sub

See also

Document Object (Page 1847)

TabOrderKeyboard Property

Description

TRUE if objects with a keyboard operation event configured to them are to be included in the

configured TAB sequence. BOOLEAN write-read access.

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

2301

Example:

The "ConfigureTabOrder()" procedure defines which objects in the active picture are to be

included in the configured TAB sequence. In this example objects with a keyboard operation

will be included in the TAB sequence:

Sub ConfigureTabOrder()

'VBA735

With ActiveDocument

.TABOrderAllHMIObjects = True

.TABOrderKeyboard = False

.TABOrderMouse = False

.TABOrderOtherAction = False

End With

End Sub

See also

TabOrderOtherAction Property (Page 2303)

TabOrderMouse Property (Page 2302)

TabOrderAllHMIObjects Property (Page 2300)

Document Object (Page 1847)

TabOrderMouse Property

Description

TRUE if objects with a mouse operation event configured to them are to be included in the

configured TAB sequence. BOOLEAN write-read access.

Example:

The "ConfigureTabOrder()" procedure defines which objects in the active picture are to be

included in the configured TAB sequence. In this example objects with a mouse operation

event will be included in the TAB sequence:

Sub ConfigureTabOrder()

'VBA736

With ActiveDocument

.TABOrderAllHMIObjects = True

.TABOrderKeyboard = False

.TABOrderMouse = False

.TABOrderOtherAction = False

End With

End Sub

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

2302

System Manual, 11/2008,

See also

TabOrderOtherAction Property (Page 2303)

TabOrderKeyboard Property (Page 2301)

TabOrderAllHMIObjects Property (Page 2300)

Document Object (Page 1847)

TabOrderOtherAction Property

Description

TRUE if objects with an event other than a mouse or keyboard operation event configured to

them are to be included in the configured TAB sequence. BOOLEAN write-read access.

Example:

The "ConfigureTabOrder()" procedure defines which objects in the active picture are to be

included in the configured TAB sequence. In this example objects with events other than a

mouse or keyboard operation will be included in the TAB sequence:

Sub ConfigureTabOrder()

'VBA737

With ActiveDocument

.TABOrderAllHMIObjects = True

.TABOrderKeyboard = False

.TABOrderMouse = False

.TABOrderOtherAction = False

End With

End Sub

See also

TabOrderMouse Property (Page 2302)

TabOrderKeyboard Property (Page 2301)

TabOrderAllHMIObjects Property (Page 2300)

Document Object (Page 1847)

Tag Property

Description

Defines or returns information text for a user-defined menu entry or user-defined icon. You

can use the Tag property for example to briefly describe what the menu entry does.

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

2303

Example:

In the following example, a user-defined menu with two menus entries and a submenu with

two

entries will be created in the active picture. The submenu will be visually distinguished by

a dividing line:

Sub CreateDocumentMenus()

'VBA738

Dim objDocMenu As HMIMenu

Dim objMenuItem As HMIMenuItem

Dim objSubMenu As HMIMenuItem

'Add menu:

Set objDocMenu = ActiveDocument.CustomMenus.InsertMenu(1, "DocMenu1", "Doc_Menu_1")

'Add menuitems to custom-menu:

Set objMenuItem = objDocMenu.MenuItems.InsertMenuItem(1, "dmItem1_1", "My first menuitem")

Set objMenuItem = objDocMenu.MenuItems.InsertMenuItem(2, "dmItem1_2", "My second menuitem")

'Add seperator to custom-menu:

Set objMenuItem = objDocMenu.MenuItems.InsertSeparator(3, "dSeparator1_3")

'Add submenu to custom-menu:

Set objSubMenu = objDocMenu.MenuItems.InsertSubMenu(4, "dSubMenu1_4", "My first submenu")

'Add menuitems to submenu:

Set objMenuItem = objSubMenu.SubMenu.InsertMenuItem(5, "dmItem1_5", "My first submenuitem")

Set objMenuItem = objSubMenu.SubMenu.InsertMenuItem(6, "dmItem1_6", "My second

submenuitem")

'To place an additional information:

With objDocMenu

.MenuItems(1).Tag = "This is the first menuitem"

End With

End Sub

See also

ToolbarItem Object (Page 1970)

MenuItem Object (Page 1906)

TagPrefix Property

Description

Defines or returns the tag prefix for all the tags contained in the Picture Window object.

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

2304

System Manual, 11/2008,

Example:

The picture "InputOutput" is to be displayed in the picture window. The picture "InputOutput"

contains three I/O fields which are linked to a structure tag. The structure tag consists of the

elements EA1, EA2, EA3; one element each for each I/O field.

Three such structure tags have been define in the project, with structure names Struct1, Struct2

and Struct3.

The tag prefix is in this case the structure name followed by a period. Specify the tag prefix

as,

say, Struct2. (the period is necessary in order to address the elements of the structure tag

as structure elements in a syntactically correct way). The I/O fields in the picture "InputOutput"

are then linked to the elements in structure tag Struct2:

Tag Prefix: "Struct2."

● Output value (first I/O field): EA1

● Output value (second I/O field): EA2

● Output value (third I/O field): EA3

The current tag connection in the picture window is then

● Output value (first I/O field): Struct2.EA1

● Output value (second I/O field): Struct2.EA2

● Output value (third I/O field): Struct2.EA3

Example:

The "PictureWindowConfig" procedure accesses the properties of the picture window. In this

example the picture window will be configured:

Sub PictureWindowConfig()

'VBA739

Dim objPicWindow As HMIPictureWindow

Set objPicWindow = ActiveDocument.HMIObjects.AddHMIObject("PicWindow1", "HMIPictureWindow")

With objPicWindow

.AdaptPicture = False

.AdaptSize = False

.Caption = True

.CaptionText = "Picturewindow in runtime"

.OffsetLeft = 5

.OffsetTop = 10

'Replace the picturename "Test.PDL" with the name of

'an existing document from your "GraCS"-Folder of your active project

.PictureName = "Test.PDL"

.ScrollBars = True

.ServerPrefix = "my_Server::"

.TagPrefix = "Struct."

.UpdateCycle = 5

.Zoom = 100

End With

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,

2305

See also

PictureWindow Object (Page 1919)

TagScaleParam1 property

Description

Sets the value1 for the value range process.

TagScaleParam2 property

Description

Sets the value2 for the value range process.

TagScaleParam3 property

Description

Sets the value3 for the value range process.

TagScaleParam4 property

Description

Sets the value4 for the value range process.

TagStartvaluePersistence property

Description

Defines whether an internal tag is set as persistent. You can only set internal tags as persistent.

Text Property

Description

Defines or returns the labeling for an object.

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

2306

System Manual, 11/2008,

Example:

The "ButtonConfiguration()" procedure accesses the properties of the button. In this example

the label will be defined:

Sub ButtonConfiguration()

'VBA740

Dim objButton As HMIButton

Set objButton = ActiveDocument.HMIObjects.AddHMIObject("Button1", "HMIButton")

With objButton

.Text = "Button1"

End With

End Sub

See also

Button Object (Page 1824)

StaticText Object (Page 1956)

OptionGroup Object (Page 1916)

CheckBox Object (Page 1827)

Toggle Property

Description

TRUE, when the round button should lock after being operated in Runtime. BOOLEAN write-

read access.

Example:

The "RoundButtonConfiguration()" procedure accesses the properties of the RoundButton. In

this example the round button is intended to latch down when pressed in Runtime:

Sub RoundButtonConfiguration()

'VBA741

Dim objRoundButton As HMIRoundButton

Set objRoundButton = ActiveDocument.HMIObjects.AddHMIObject("RButton1", "HMIRoundButton")

With objRoundButton

.Toggle = True

End With

End Sub

See also

RoundButton Object (Page 1942)

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

2307

ToleranceHigh Property

Description

Defines or returns the limit value for "Tolerance high".

The type of the evaluation (in percent or absolute) is defined in the TypeToleranceHigh

property.

Monitoring of the limit value only takes effect when the CheckToleranceHigh property is set to

"True".

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()

'VBA742

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 to "40"

.ToleranceHigh = 40

End With

End Sub

See also

TypeToleranceHigh Property (Page 2321)

CheckToleranceHigh Property (Page 2061)

BarGraph Object (Page 1819)

ToleranceLow Property

Description

Defines or returns the limit value for "Tolerance low".

The type of the evaluation (in percent or absolute) is defined in the TypeToleranceLow property.

Monitoring of the limit value only takes effect when the CheckToleranceLow property is set to

"True".

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

2308

System Manual, 11/2008,

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()

'VBA743

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 to "40"

.ToleranceLow = 40

End With

End Sub

See also

TypeToleranceLow Property (Page 2322)

CheckToleranceLow Property (Page 2061)

BarGraph Object (Page 1819)

ToolbarItems Property

Description

Returns a listing containing all the elements (icons and separation lines) of a user-defined

toolbar.

Example

In the following example a user-defined toolbar with two icons is created in the active picture.

These icons are separated by a dividing line:

Sub AddDocumentSpecificCustomToolbar()

'VBA744

Dim objToolbar As HMIToolbar

Dim objToolbarItem As HMIToolbarItem

Set objToolbar = ActiveDocument.CustomToolbars.Add("DocToolbar")

'Add symbol-icon to userdefined toolbar

Set objToolbarItem = objToolbar.ToolbarItems.InsertToolbarItem(1, "tItem1_1", "My first

symbol-icon")

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

2309

Set objToolbarItem = objToolbar.ToolbarItems.InsertToolbarItem(3, "tItem1_3", "My second

symbol-icon")

Set objToolbarItem = objToolbar.ToolbarItems.InsertSeparator(2, "tSeparator1_2")

End Sub

See also

ToolbarItem Object (Page 1970)

Toolbar Object (Page 1967)

ToolTipText Property

Description

Defines or returns the text that will be displayed as a Tooltip when you run the mouse over an

object (HMIObject, icon).

Example:

The "RectangleConfiguration()" procedure accesses the properties of the Rectangle object. In

this example a tool tip text will be assigned to the rectangle:

Sub RectangleConfiguration()

'VBA745

Dim objRectangle As HMIRectangle

Set objRectangle = ActiveDocument.HMIObjects.AddHMIObject("Rectangle1", "HMIRectangle")

With objRectangle

.ToolTipText = "This is a rectangle"

End With

End Sub

Note

If you want to make the "ToolTipText" property dynamic with the dynamic dialog, you must

initialize before the dynamization.

Example:

Sub Dyn()

Dim objCircle As HMICircle

Dim doc As Document

Dim objDynDialog As HMIDynamicDialog

Set doc = ActiveDocument

Set objCircle = ActiveDocument.HMIObjects.AddHMIObject("Circle","HMICircle")

VBA for Automated Configuration

4.4 The object model of the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

2310

System Manual, 11/2008,