You are viewing an old version of this page. View the current version.

Compare with Current View Page History

« Previous Version 4 Next »

Description

Returns a newly created and empty StringObjects.

Syntax

Public Function CreateStringObjects() As StringObjects

Example

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

  • No labels