ChannelFormats.Count Property

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 bit rate for station formats is " _
       & BitrateTotal / Formats.Count & “.”)

Previous

Next