Opprette en port test i Visual Basic.NET ( VB.NET ) er ikke komplisert - i VB.NET kan du bruke " System.Net.Sockets " namespace , som gir deg et grensesnitt for å kontrollere nettverket av en datamaskin. Bruk " TcpClient " class å koble til hver port du ønsker å teste og vise om en port er åpen eller lukket . Denne prosessen er nyttig når du vil teste mange havner i en datamaskin for å finne ut hvilke som er tilgjengelige for bruk . Du trenger 
 Microsoft Visual Studio 
 Vis flere instruksjoner 
 en 
 Launch Microsoft Visual Studio , klikk på " Ny Proejct " linken og utvide " Visual Basic " nedenfor " . installerte maler " Dobbeltklikk på" Console Application " . å skape en ny konsoll prosjekt 
 2 
 Legg til følgende kode ovenfor " Modul Module1 "for å erklære navnerommene du vil bruke i prosjektet : 
 
 Importen System.Net.SocketsImports System.NetImports System.ThreadingImports System.Text 
 3 
 Legg til følgende kode under " Sub Main ( ) " for å lage en variabel for å definere en tellervariabelen , start port og avslutningen port du vil teste : en 
 Dim startPrt As Integer = 75Dim endPrt As Integer = 90Dim lpLng Som Long 
 4 
 Kopier og lim inn følgende koden for å lage en løkke og vise en melding med status for hver port : en 
 for lpLng = startPrt å endPrtDim clientTcp som ny TcpClient ( ) TryclientTcp.Connect ( " 1.1.1.1 " , lpLng ) Console . WriteLine ( " Port " + lpLng.ToString ( ) + "er klar") clientTcp.Close ( ) Catch ex As SocketExceptionConsole.WriteLine ( " Port " + lpLng.ToString ( ) + " er stengt" + ex.Message ) Avslutt TryNextConsole.ReadLine ( ) 
 5 
 Rediger " 1.1.1.1 " streng og skriv inn IP -adressen til verten du vil teste. Trykk " F5 " tasten for å kjøre programmet og begynne å teste hver port .