Returns the number of ChannelFormat objects in a ChannelFormats collection object.
Syntax
Station.ChannelFormats.Count
Example
Set MyStation = NSChannelMgr.Channels.Item(1)
MsgBox "There are " & MyStation.ChannelFormats.Count & " formats"
NSChannelMgr.Connect "LocalHost"
Dim Formats
Set Formats = NSChannelMgr.ChannelFormats
BitrateTotal = 0
For i = 0 to Formats.Count – 1
BitrateTotal = BitrateTotal + Formats(i).BitRate
Next i
MsgBox "Average bitrate for station formats is " _
& BitrateTotal / Formats.Count
See Also
ChannelFormats collections, ChannelFormats objects, ChannelFormats.Item
© 1996-1998 Microsoft Corporation. All rights reserved.