vb.net读取网卡,vb获取网卡物理地址

电脑有两张网卡。如何用vb.net分别获取网卡的IP?求大神明路!

'要使得引用System.Management有效,先通过菜单

成都创新互联公司专业为企业提供松溪网站建设、松溪做网站、松溪网站设计、松溪网站制作等企业网站建设、网页设计与制作、松溪企业网站模板建站服务,十多年松溪做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。

'[项目]--[添加引用],在“.Net”选项卡里,选择“System.Management”,单击[确定]

Imports System.Management

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim MySearcher As New ManagementObjectSearcher("SELECT * FROM Win32_NetworkAdapterConfiguration")

For Each MySearcherObj As ManagementObject In MySearcher.Get

If CBool(MySearcherObj("IPEnabled")) Then

MsgBox(MySearcherObj("IPAddress")(0))

End If

Next

End Sub

End Class

vb.net笔记本读不出网卡地址

出现这样的原因,大部分是由于 无线网卡没有安装到位,接触不良造成的。

网卡可以多插几次。如果这样,问题没有解决,带着您的笔记本找网卡服务商,如果他们解决不了,

那问题可能就在于笔记本本身。带着您的本本和卡找您的本本服务商。

求大神指点 vb.net 怎么获取 所有网卡的 描述呢? vbs 的也可以

Private Sub GetMyIP()

Dim strComputer As String

Dim objWMI As Object

Dim colIP As Object

Dim IP As Object

Dim I As Integer

strComputer = "."

objWMI = GetObject("winmgmts://"  strComputer  "/root/cimv2")

colIP = objWMI.ExecQuery _

("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")

For Each IP In colIP

If Not IsNothing(IP.IPAddress) Then

For I = LBound(IP.IPAddress) To UBound(IP.IPAddress)

MsgBox("IP 地址:"  IP.IPAddress(I)  Chr(10)  _

"网卡类型:"  IP.Description(I)  Chr(10)  _

"网卡地址:"  IP.Macaddress(I))

Next

End If

Next

End Sub

vb.net 获取指定网卡的网络连接状态

.net不能获得【指定】网卡的信息,给个思路,先遍历所有网卡,然后找到你需要的的那个网卡的信息。


分享名称:vb.net读取网卡,vb获取网卡物理地址
URL网址:http://ybzwz.com/article/dsegoeo.html