The Titles.Count property returns a Long value specifying the number of Title objects in a Titles collection object.
Syntax
Titles.Count
Remarks
You can use this property with a For...Next statement to carry out an operation on the objects in a collection, as shown in the example.
Example
The following example uses the count property to enumerate through a Titles collection to output the ID’s of Title member objects.
Sub enumTitles(server As String)
Dim title As IMSrvTitle
MediaServer1.SetServer server
MsgBox "There are " & MediaServer1.Titles("*").Count & " titles."
For Each title In MediaServer1.Titles("*")
MsgBox title.Name
Next
End Sub
© 1996-1998 Microsoft Corporation. All rights reserved.