Whats My IP Address ?

Dim ipE As System.Net.IPHostEntry = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName)


       Dim AL As Array = Dns.GetHostEntry(vWrkStn).AddressList
       Dim A As IPAddress
       For Each A In AL

           If A.AddressFamily = Sockets.AddressFamily.InterNetwork Then
               IP4 = A
               Exit For
           End If
       Next
       MyIP = IP4.ToString