ltmmTVTuner.ConnectInput Example for Visual Basic

Dim lConnectInput As Long
Dim lNumInputConnections As Long

If Not ltmmCapture.TVTuner Is Nothing Then
   lNumInputConnections = ltmmCapture.TVTuner.NumInputConnections
   If lNumInputConnections = 0 Then
      MsgBox "No Input connections"
   Else
      ltmmCapture.TVTuner.ConnectInput = ltmmTUNER_MODE_DEFAULT
      lConnectInput = ltmmCapture.TVTuner.ConnectInput
   End If
End If