Public Sub CopyTo( _
   ByVal array() As TargetDevice, _
   ByVal arrayIndex As Integer _
) 

Dim instance As TargetDevices
Dim array() As TargetDevice
Dim arrayIndex As Integer
 
instance.CopyTo(array, arrayIndex)

public void CopyTo( 
   TargetDevice[] array,
   int arrayIndex
)

public:
void CopyTo( 
   array<TargetDevice^>^ array,
   int arrayIndex
) 

Public _result As Boolean = False
Public _form As ConvertCtrlForm = New ConvertCtrlForm()
Public Sub CopyToExample()
   ' reference the form convert control
   Dim convertctrl As ConvertCtrl = _form.ConvertCtrl
   Dim devices As TargetDevices = convertctrl.TargetDevices

   Try
      ' allocate a new array for the copied video devices
      Dim copiedDevices As TargetDevice() = New TargetDevice(devices.Count - 1) {}

      ' copy them
      devices.CopyTo(copiedDevices, 0)

      ' set the result to what we expect
      _result = (copiedDevices.Length = devices.Count)
   Catch e1 As Exception
      _result = False
   End Try
End Sub

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

   try
   {
      // allocate a new array for the copied video devices
      TargetDevice[] copiedDevices = new TargetDevice[devices.Count];

      // copy them
      devices.CopyTo(copiedDevices, 0);

      // set the result to what we expect
      _result = (copiedDevices.Length == devices.Count);
   }
   catch (Exception)
   {
      _result = false;
   }
}