IP-Adressen auslesen in VB.NET Mit diesem Codeschnipsel lässt sich die eigene IP-Adresse in VB.Net auslesen.
Autor:   Kevin	Bewertung:     [ Jetzt bewerten ]	Views:  53.293
ohne Homepage	System:  Win9x, WinNT, Win2k, WinXP, Vista, Win7, Win8, Win10	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 87 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.7 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Nach langem Suchen bin ich zu diesem funktionierendem Quellcode gekommen ... zuerst importieren wir die Klasse System.Net mit dem Befehl "Imports System.Net". Die Anweisung muss in die erste Zeile des Codefensters der Form1 geschrieben, also noch vor Public Class Form1.

Imports System.Net
Public Class Form1
...

Für unser Beispiel benötigen wir auf der Form eine ListBox und einen CommandButton. Beim Klick auf den Button werden dann alle IP-Adresse ermittelt und in die ListBox übertragen.

Private Sub Button1_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles Button1.Click
 
  Dim Addresslist() As IPAddress = _
    DNS.GetHostByName(Dns.GetHostName()).Addresslist
  Dim IPs As IPAddress
 
  ' alle IP-Adressen auflisten
  ListBox1.Items.Clear
  For Each IPs in Addresslist
    ListBox1.Items.Add(IPs.ToString)
  Next IPs
End Sub