ltmmTVTuner.AvailableModes Example for Visual Basic

Dim lMode As Long
Dim lAvailableModes As Long

If Not ltmmCapture.TVTuner Is Nothing Then
   lAvailableModes = ltmmCapture.TVTuner.AvailableModes
   If lAvailableModes And ltmmTUNER_MODE_TV Then
      ltmmCapture.TVTuner.Mode = ltmmTUNER_MODE_TV
   Else
      ltmmCapture.TVTuner.Mode = ltmmTUNER_MODE_DEFAULT
   End If
   lMode = ltmmCapture.TVTuner.Mode
End If