第一个图为正常状态

此主题相关图片如下：无标题111.png

第二个图为异常状态

此主题相关图片如下：一次图片.jpg

通过代码

        Dim IPAdress As System.Net.IPAddress
        Dim HostName As String
        HostName = System.Net.Dns.GetHostName \'获得本机的机器名
        IPAdress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0) \'获得本机的IP
        OutPut.Show( HostName )  \'本机机器名
        OutPut.Show(IPAdress.ToString )  \'本机的IP
        Vars("ipaddrss") =  IPAdress.ToString

查出来的结果是

是 192.168.0.210

不是 192.168.44.191

请教如何解决

Dim cmd As  new Process()
cmd.StartInfo.FileName = "tracert"
cmd.StartInfo.Arguments = "-h 1 www.baidu.com"

cmd.StartInfo.RedirectStandardOutput = True
cmd.StartInfo.RedirectStandardInput = True
cmd.StartInfo.UseShellExecute = False
cmd.StartInfo.CreateNoWindow = True

cmd.Start()
Dim info As String = cmd.StandardOutput.ReadToEnd()
msgbox(Info)