현재 사용하는 아이피주소 알기

Dim IPHostAddress As IPAddress

Dim GetIPv4Address As String = Nothing

Dim iphe As IPHostEntry = Dns.GetHostEntry(Dns.GetHostName())

For Each IPHostAddress In iphe.AddressList

     If IPHostAddress.AddressFamily = AddressFamily.InterNetwork Then

          GetIPv4Address = IPHostAddress.ToString()

     End If

Next

GetIPv4Address 스트링변수에 현재 사용하는 아이피주소가 저장됨