Mega Code Archive

 

Categories / VB.Net by API / System

 

My Computer Ports SerialPortNames

Option Strict On Imports System.Collections.ObjectModel Public Module PortsTest    Public Sub Main()       Dim ports As ReadOnlyCollection(Of String) = _       My.Computer.Ports.SerialPortNames       For Each port As String In ports          Console.WriteLine(port)       Next    End Sub End Module