conocer la ip

El siguiente codigo te muestra la lista de direcciones IP de tu equipo:


Imports System
Imports System.Net

Module Module1
Sub Main()
Dim ipEntry As IPHostEntry
Dim address As IPAddress

ipEntry = Dns.Resolve(Environment.MachineName)

For Each address In ipEntry.AddressList
Console.WriteLine(address.ToString())
Next
End Sub
End Module


Saludos
Pedro Luna, [MVP VB.NET]
Gye, Ecu