Imports System
Imports System.IO.Ports
Imports System.Threading
Public Class PortChat
Public Shared Sub Main()
Dim s As String
For Each s In SerialPort.GetPortNames()
Console.WriteLine(" {0}", s)
Next s
End Sub
End Class