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

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

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.