Public ReadOnly Property Current As Object

Dim instance As TargetDevices
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 ConvertCtrlForm = New ConvertCtrlForm()
Public Sub CurrentExample()
   ' reference the convert control
   Dim convertctrl As ConvertCtrl = _form.ConvertCtrl

   Dim devices As TargetDevices = convertctrl.TargetDevices

   Try
      ' enumerate through the list of inputs
      ' demonstrating the current property
      For Each dev As TargetDevice In devices
         ' set the result to what we expect
         _result = (dev Is devices.Current)
      Next dev
   Catch e1 As Exception
      _result = False
   End Try
End Sub

public bool _result = false;
public ConvertCtrlForm _form = new ConvertCtrlForm();
public void CurrentExample()
{
   // reference the convert control
   ConvertCtrl convertctrl = _form.ConvertCtrl;

   TargetDevices devices = convertctrl.TargetDevices;

   try
   {
      // enumerate through the list of inputs
      // demonstrating the current property
      foreach (TargetDevice dev in devices)
      {
         // set the result to what we expect
         _result = (dev == devices.Current);
      }
   }
   catch (Exception)
   {
      _result = false;
   }
}