【发布时间】:2015-10-27 20:10:51
【问题描述】:
Private Function GetMAC() As String
Dim macAddresses As String = ""
For Each nic As NetworkInterface In NetworkInterface.GetAllNetworkInterfaces()
If nic.OperationalStatus = OperationalStatus.Up Then
macAddresses += nic.GetPhysicalAddress().ToString()
Exit For
End If
Next
Return macAddresses
End Function
Dim str As String = GetMAC()
MsgBox(str)
str 值为 F406697228D3 现在我想把它改成 F4-06-69-72-28-D3..?
【问题讨论】: