Public ReadOnly Property Width As Integer

Dim instance As CaptureSize
Dim value As Integer
 
value = instance.Width

public int Width {get;}

public:
property int Width {
   int get();
}

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

  Try
     ' select a USB video device, use your device name here
     If capturectrl.VideoDevices("USB") Is Nothing Then
       Throw New Exception("No USB video device available")
     End If

     capturectrl.VideoDevices("USB").Selected = True

     ' reference the capture size collection
     Dim sizes As CaptureSizes = capturectrl.VideoCaptureSizes

     ' get the current selection
     Dim n As Integer = sizes.Selection

     ' loop through all the capture sizes
     For Each cs As CaptureSize In sizes
       ' check some criteria and select one
       If cs.Width = 640 AndAlso cs.Height = 480 Then
         ' select it and break
         cs.Selected = True
         Exit For
       End If
     Next cs

     ' set the result to what we expect
     _result = (n <> sizes.Selection)
  Catch e1 As Exception
     _result = False
  End Try
End Sub

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

   try
   {
      // select a USB video device, use your device name here
      if (capturectrl.VideoDevices["USB"] == null)
         throw new Exception("No USB video device available");

      capturectrl.VideoDevices["USB"].Selected = true;

      // reference the capture size collection
      CaptureSizes sizes = capturectrl.VideoCaptureSizes;

      // get the current selection
      int n = sizes.Selection;

      // loop through all the capture sizes
      foreach (CaptureSize cs in sizes)
      {
         // check some criteria and select one
         if (cs.Width == 640 && cs.Height == 480)
         {
            // select it and break
            cs.Selected = true;
            break;
         }
      }

      // set the result to what we expect
      _result = (n != sizes.Selection);
   }
   catch (Exception)
   {
      _result = false;
   }
}