如何在VB.NET中查看IP地址更改？

Imports System.Net

Dim hostName As String = Dns.GetHostName()
Dim hostEntry As IPHostEntry = Dns.GetHostEntry(hostName)

For Each ipAddress As IPAddress In hostEntry.AddressList
    Console.WriteLine(ipAddress.ToString())
Next

Imports System.Net

Module Module1
    Sub Main()
        Dim hostName As String = Dns.GetHostName()
        Dim hostEntry As IPHostEntry = Dns.GetHostEntry(hostName)

        For Each ipAddress As IPAddress In hostEntry.AddressList
            Console.WriteLine(ipAddress.ToString())
        Next

        Console.ReadLine()
    End Sub
End Module