Imports System
Imports System.IO.Ports
Imports System.Threading
Public Class PortChat
Public Shared Sub Main()
Dim s As String
For Each s In [Enum].GetNames(GetType(Parity))
Console.WriteLine(" {0}", s)
Next s
End Sub
End Class