Vb.net IfElse检查扫描是否等于IPv4

我想知道，如果

myClientMachineIp

（来自代码）等于

AddressFamily.InterNetwork

，如何进行If语句检查

我当前的代码：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim myClientMachineAddressList As IPHostEntry = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName())
        Dim myClientMachineIP As String = myClientMachineAddressList.AddressList(0).ToString()

        If myClientMachineIP = AddressFamily.InterNetwork Then
            TextBox1.Text = myClientMachineIP
        Else
            TextBox1.Text = "IP does not equal to IPv4"

        End If
    End Sub

---

不要通过调用

ToString（）

来丢弃有价值的信息。使用

IPAddress

类型：

Dim myClientMachineAddressList _
    = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName())
Dim myClientMachineIP = myClientMachineAddressList.AddressList(0)

If myClientMachineIP.AddressFamily = Sockets.AddressFamily.InterNetwork Then
    TextBox1.Text = myClientMachineIP.ToString()
Else
    TextBox1.Text = "IP does not equal to IPv4".
End If

---

如何将myClientMachineIP输出到文本框？