Public Function New( _
   ByVal r As Double, _
   ByVal i As Double _
)

Dim r As Double
Dim i As Double
 
Dim instance As New Complex(r, i)

public Complex( 
   double r,
   double i
)

public:
Complex( 
   double r,
   double i
)

Public Sub ComplexConstructorExample_S2()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"))

   ' Prepare the command
   Dim com As Complex = New Complex(12.0, 5.0)

   ' Get the real and the imaginary part of the complex number.
   MessageBox.Show("Complex number real part is : " & com.R)
   MessageBox.Show("Complex number Imaginary part is : " & com.I)

End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void ComplexConstructorExample_S2()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"));

      // Prepare the command
      // Set the real and the imaginary part of the complex number.
      Complex com = Complex.Empty;

      com.R = 12.0;
      com.I = 5.0;

      Complex com2 = new Complex(com.R, com.I);

      // Get the real and the imaginary part of the complex number.
      MessageBox.Show("Complex number real part is : " + com2.R);
      MessageBox.Show("Complex number Imaginary part is : " + com2.I);

   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}