Question

在开始解决问题之前，让我先从程序尝试完成的内容开始。我正在研究一个程序，检查每5到10秒（尚未实现）秒，看看你是否已经放弃了我正在这样做的方式让用户在启动VPN之前键入IP，然后他们启动VPN并检查它是否发生变化。我的问题是，当我比较两个字符串时，即使它们是相同的，程序保持不同。

Imports System.Net
Imports System.IO

Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        LbIP.Text = GetIP()
    End Sub

    Function GetIP() As String
        Dim IP As New WebClient
        Return IP.DownloadString("http://icanhazip.com/")
    End Function

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If GetIP() = TextBox1.Text Then
            Label1.Text = "VPN DROPPED"
        Else
            Label1.Text = "Your Good"
        End If
    End Sub
End Class

Answer 1

DownloadString将返回字符串末尾的\ n的IP地址。你需要删除它并进行比较。

示范工作

  If GetIP().Replace("\n","") = TextBox1.Text Then
            Label1.Text = "VPN DROPPED"
        Else
            Label1.Text = "Your Good"
 End If

比较IP字符串不起作用

1 个答案: