Microphone monitor ActiveX

The ActiveX would monitor the mic input levels (Left & Right) in the background and trigger an EVENT when a preset loudness threshold is passed. To start monitoring the ports: StartMonitoring (LeftThreshold, RightThreshold) ' The threshold integer must be between 1 and 100. To Stop monitoring the ports: StopMonitoring Private Sub PortMonitor_Trigger(ByVal sender As [login to view URL], ByVal e As [login to view URL]) Handles [login to view URL] If [login to view URL] = True then ... If [login to view URL] = True then ... End Sub Please indicate if you can get the LINE-IN port monitored also?