IMcImageSetAudioChannels Property |
![]() |
Namespace: MediaCy.IQL.Sets
Sub ShowSetAudioChannel() If ImageSets.Count = 0 Then Exit Sub End If If ImageSets(0).AudioChannels.Count = 0 then ' no audio channels Exit Sub End If ' Note that the members of the channels collection are McImageSetChannel ' objects. We will use the Type property of the McImageSetChannel object to ' see which type of channel we are working with. Dim aChannel As McImageSetChannel Set aChannel = ImageSets(0).AudioChannels(0) ' Since we know that the channel is an audio channel, we can get the ' type-specific channel object and then report audio channel characteristics Dim anAudioChannel As McImageSetAudioChannel Set anAudioChannel = aChannel MsgBox "Audio channel '" + anAudioChannel.Name + "'" vbCrLf + "Duration: " + CStr(anAudioChannel.Duration) End Sub