Development VB.Net

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(Handshake))
            Console.WriteLine("   {0}", s)
        Next s
 End Sub
End Class