Imports System.Numerics
Module Example
Public Sub Main()
Dim c1 As New Complex(4.93, 6.87)
Dim values() As Complex = { New Complex(12.5, 9.6),
New Complex(-5.3, -6.6) }
For Each c2 In values
Console.WriteLine("{0} - {1} = {2}", c1, c2,
Complex.Subtract(c1, c2))
Next
End Sub
End Module