Sono oggi quì per rilasciarvi un software molto molto semplice per cercare i 3 propri IP!
IP Locale, IP LAN ed l' IP Remoto!
Download:
Clicca QUI
Scansione:
Clicca QUI

Source Code:

Codice:
Public Class Form1 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = "127.0.0.1" 
    End Sub 

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim localip As Net.IPAddress = Net.Dns.GetHostByName(Net.Dns.GetHostName).AddressList(0)
        TextBox2.Text = localip.ToString 
    End Sub 

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Dim web As New Net.WebClient 
        Dim s As String 
        s = web.DownloadString("http://bot.whatismyipaddress.com/") 
        TextBox3.Text = s 
    End Sub 
End Class  

Ciao e alla prossima!!!