Public Sub Add( _
   ByVal item As Processor _
) 

Dim instance As Processors
Dim item As Processor
 
instance.Add(item)

public void Add( 
   Processor item
)

public:
void Add( 
   Processor^ item
) 

Public _result As Boolean = False
Public _form As PlayCtrlForm = New PlayCtrlForm()
Public Sub SelectProcessorsExample()
   ' reference the play control
   Dim playctrl As PlayCtrl = _form.PlayCtrl

   Try
      ' get the available video processors
      Dim allProcs As VideoProcessors = playctrl.VideoProcessors

      ' get the available video processors
      Dim selProcs As VideoProcessors = playctrl.SelectedVideoProcessors

      ' get the count of selected video processors
      Dim n As Integer = selProcs.Count

      ' add and remove some processors
      selProcs.Add(allProcs.Mosaic)
      selProcs.Add(allProcs.Emboss)
      selProcs.Remove(allProcs.Mosaic)

      ' get the count again
      Dim m As Integer = selProcs.Count

      ' set the result to what we expect
      _result = (m > n AndAlso n = 0)
   Catch e1 As Exception
      _result = False
   End Try
End Sub

public bool _result = false;
public PlayCtrlForm _form = new PlayCtrlForm();
public void SelectProcessorsExample()
{
   // reference the play control
   PlayCtrl playctrl = _form.PlayCtrl;

   try
   {
      // get the available video processors
      VideoProcessors allProcs = playctrl.VideoProcessors;

      // get the available video processors
      VideoProcessors selProcs = playctrl.SelectedVideoProcessors;

      // get the count of selected video processors
      int n = selProcs.Count;

      // add and remove some processors
      selProcs.Add(allProcs.Mosaic);
      selProcs.Add(allProcs.Emboss);
      selProcs.Remove(allProcs.Mosaic);

      // get the count again
      int m = selProcs.Count;

      // set the result to what we expect
      _result = (m > n && n == 0);
   }
   catch (Exception)
   {
      _result = false;
   }
}