This function adds a string to the end of the list.
object.Add(aItem)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISStrings interface |
|
aItem |
In, Required | string |
The string to add to the list |
int
Display the added strings and the text.
Dim aStrings
Set aStrings = Profile.CreateStrings
aStrings.Add("FirstLine")
aStrings.Add("SecondLine")
aStrings.Add("ThirdLine")
Profile.MsgBox("TEXT:" & vbNewLine & aStrings.Text & vbNewLine &_
"LINES COUNT: " & aStrings.Count)