Dim lSignalPresent As Long If Not ltmmCapture.TVTuner Is Nothing Then lSignalPresent = ltmmCapture.TVTuner.SignalPresent End If