Public ReadOnly Property Current As Object

Dim instance As AudioInputs
Dim value As Object
 
value = instance.Current

public object Current {get;}

public:
property Object^ Current {
   Object^ get();
}

Public _result As Boolean = False
Public _form As CaptureCtrlForm = New CaptureCtrlForm()
Public Sub CurrentExample()
   ' reference the capture control
   Dim capturectrl As CaptureCtrl = _form.CaptureCtrl

   ' select an audio device, use your device name here instead of USB
   capturectrl.AudioDevices("USB").Selected = True

   ' get the audio inputs object
   Dim audioinputs As AudioInputs = capturectrl.AudioInputs

   Try
      ' loop through all audio inputs
      For Each ai As AudioInput In audioinputs
         ' set the result to what we expect
         _result = (ai Is audioinputs.Current)
      Next ai
   Catch e1 As Exception
      _result = False
   End Try

   ' we'll loop on the state and pump messages for this example.
   ' but you should not need to if running from a Windows Forms application.
   Do While capturectrl.State = CaptureState.Running
      Application.DoEvents()
   Loop
End Sub

public bool _result = false;
public CaptureCtrlForm _form = new CaptureCtrlForm();
public void CurrentExample()
{
   // reference the capture control
   CaptureCtrl capturectrl = _form.CaptureCtrl;

   // select an audio device, use your device name here instead of USB
   capturectrl.AudioDevices["USB"].Selected = true;

   // get the audio inputs object
   AudioInputs audioinputs = capturectrl.AudioInputs;

   try
   {
      // loop through all audio inputs
      foreach (AudioInput ai in audioinputs)
      {
         // set the result to what we expect
         _result = (ai == audioinputs.Current);
      }
   }
   catch (Exception)
   {
      _result = false;
   }

   // we'll loop on the state and pump messages for this example.
   // but you should not need to if running from a Windows Forms application.
   while (capturectrl.State == CaptureState.Running)
      Application.DoEvents();
}