Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

Description

Returns a newly created and empty StringObjects.

Syntax

...

Code Block
languagevb
Public Function CreateStringObjects() As StringObjects

Example

Code Block
languagevb
Sub Main    Dim strObjects As StringObjects    Dim strObj As StringObject

...


    Debug.Clear

...


    Set strObjects = DiagramManager.CreateStringObjects

...


    Set strObj = strObjects.Add("A")    Set strObj = strObjects.Add("B")    Set strObj = strObjects.Add("C")

...


    For Each strObj In strObjects        Debug.Print strObj.StringValue    NextEnd Sub

See Also