Public Property Selection As Integer

Dim instance As TargetDevices
Dim value As Integer
 
instance.Selection = value
 
value = instance.Selection

public int Selection {get; set;}

public:
property int Selection {
   int get();
   void set (    int value);
}

Public _result As Boolean = False
Public _form As ConvertCtrlForm = New ConvertCtrlForm()
Public Sub TargetDevicesExample()
  Dim inputName, inputFriendlyName As String
  Dim selectedCamera As Integer

  ' reference the convert control
  Dim convertctrl As ConvertCtrl = _form.ConvertCtrl

  Try
     ' get the target devices object
     Dim devices As TargetDevices = convertctrl.TargetDevices

     ' select an input by name if possible
     If devices("Microsoft DV Camera") Is Nothing Then
       Throw New Exception("No MS DV Camera device available!")
     End If

     devices("Microsoft DV Camera").Selected = True

     ' get the full friendly name of the device 
     Dim friendlyName As String = devices("Microsoft DV Camera").FriendlyName

     ' get the selected index of the currently selected target device
     ' (the MS DV camera above)
     selectedCamera = devices.Selection

     ' now enumerate all the target devices,
     ' looking for an audio device and select it
     For Each td As TargetDevice In devices
       ' get the inputs properties
       inputName = td.Name
       inputFriendlyName = td.FriendlyName

       ' if we found a target audio device
       If inputFriendlyName.Contains("Audio") Then
         ' select it and break
         td.Selected = True
         Exit For
       End If
     Next td

     ' set the result to what we expect
     _result = (selectedCamera <> devices.Selection)

  Catch e1 As Exception
     _result = False
  End Try
End Sub

public bool _result = false;
public ConvertCtrlForm _form = new ConvertCtrlForm();
public void TargetDevicesExample()
{
   string inputName, inputFriendlyName;
   int selectedCamera;

   // reference the convert control
   ConvertCtrl convertctrl = _form.ConvertCtrl;

   try
   {
      // get the target devices object
      TargetDevices devices = convertctrl.TargetDevices;

      // select an input by name if possible
      if (devices["Microsoft DV Camera"] == null)
         throw new Exception("No MS DV Camera device available!");

      devices["Microsoft DV Camera"].Selected = true;

      // get the full friendly name of the device 
      string friendlyName = devices["Microsoft DV Camera"].FriendlyName;

      // get the selected index of the currently selected target device
      // (the MS DV camera above)
      selectedCamera = devices.Selection;

      // now enumerate all the target devices,
      // looking for an audio device and select it
      foreach (TargetDevice td in devices)
      {
         // get the inputs properties
         inputName = td.Name;
         inputFriendlyName = td.FriendlyName;

         // if we found a target audio device
         if (inputFriendlyName.Contains("Audio"))
         {
            // select it and break
            td.Selected = true;
            break;
         }
      }

      // set the result to what we expect
      _result = (selectedCamera != devices.Selection);

   }
   catch (Exception)
   {
      _result = false;
   }
}