Imports System.Globalization
Imports System.Numerics
Module Example
Public Sub Main()
Dim c() As Complex = { New Complex(17.3, 14.1),
New Complex(-1.14, -1.002) }
Dim cultures() As CultureInfo = { New CultureInfo("en-US"),
New CultureInfo("fr-FR") }
For Each c1 As Complex In c
For Each culture As CultureInfo In cultures
Console.Write("{0} ({1}) ", c1.ToString(culture), culture.Name)
Next
Console.WriteLine()
Next
End Sub
End Module