vb.net 教程 7-1 本地网络信息的获取 3 网络连接信息

悠悠 2022-09-11 03:30 128阅读 0赞

通过IPGlobalProperties类可以获得网络连接的信息：

通过GetIPGlobalProperties方法来获得一个IPGlobalProperties实例：

Dim IPGP As IPGlobalProperties = IPGlobalProperties.GetIPGlobalProperties  
 具体代码如下：

Private Sub Button2\_Click(sender As Object, e As EventArgs) Handles Button2.Click  
        Dim IPGP As IPGlobalProperties = IPGlobalProperties.GetIPGlobalProperties  
        TextBox1.Text = "DHCP范围名：" & IPGP.DomainName & vbCrLf  
        TextBox1.Text &= "网络适配器标识符：" & IPGP.DhcpScopeName & vbCrLf  
        TextBox1.Text &= "主机名：" & IPGP.HostName & vbCrLf  
        TextBox1.Text &= "WINS代理：" & IPGP.IsWinsProxy & vbCrLf  
   
        Dim nodeType As String = ""  
        Select Case IPGP.NodeType  
            Case NetBiosNodeType.Broadcast  
                nodeType = "广播节点"  
            Case NetBiosNodeType.Hybrid  
                nodeType = "Hybrid 混合节点"  
            Case NetBiosNodeType.Mixed  
                nodeType = "Hybrid 混合节点上"  
            Case NetBiosNodeType.Peer2Peer  
                nodeType = "对等节点"  
            Case NetBiosNodeType.Unknown  
                nodeType = "未知节点类型"  
            Case Else  
                nodeType = "未知状态"  
        End Select  
        TextBox1.Text &= "节点类型：" & nodeType & vbCrLf  
    End Sub  
运行如下：

由于.net平台下C\#和vb.NET很相似，本文也可以为C\#爱好者提供参考。

学习更多vb.net知识，请参看[vb.net教程][vb.net] 目录  
————————————————  
版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

[vb.net]: https://www.xin3721.com/eschool/vbnetxin3721/