在Visual Basic（VB）编程中获取MAC地址的方法如下：
方法一：使用WMI（Windows Management Instrumentation）
WMI是一个用于管理和监控Windows系统的框架，可以通过它获取网络适配器的信息，包括MAC地址。
```vb
Option Explicit
Private Sub Form_Load（）
Dim objWMIService As Object
Dim colItems As Object
Dim objItem As Object
Dim macAddress As String
' 创建WMI对象
Set objWMIService = GetObject（"winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2"）
' 查询本地网络适配器配置
Set colItems = objWMIService.ExecQuery（"SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True"）
' 遍历适配器并获取MAC地址
For Each objItem In colItems
macAddress = macAddress & objItem.MACAddress
Next objItem
' 显示MAC地址
TextBox1.Text = macAddress
End Sub
```
方法二：使用API函数
通过调用Windows API函数`GetAdaptersInfo`和`GetPhysicalAddress`，可以获取网卡的MAC地址。
```vb
Private Declare Function GetAdaptersInfo Lib "Iphlpapi.dll" （ByVal lpAdapterInfo As PIPAdapterInfo） As Long
Private Declare Function GetPhysicalAddress Lib "Iphlpapi.dll" （ByVal dwAdapterIndex As Long, pdwAddressLength As Long, pbAddress As Byte） As Long
Private Function GetMacAddress（） As String
Dim pBuf As PIPAdapterInfo
Dim pPhysAddr As PIPAddress
Dim i As Long
Dim macAddress As String
' 获取适配器信息
If GetAdaptersInfo（pBuf） = 0 Then
MsgBox "获取适配器信息失败!"
Exit Function
End If
' 遍历适配器信息
For i = 0 To pBuf.NumAdapters - 1
pPhysAddr = New PIPAddress
If GetPhysicalAddress（i, pBuf.AdapterInfo（i）.AddressLength, pPhysAddr） = 0 Then
Exit For
End If
macAddress = macAddress & Format（pPhysAddr.Address, "{0:X2}-{1:X2}-{2:X2}-{3:X2}-{4:X2}-{5:X2}", _
pPhysAddr.Address（0）, pPhysAddr.Address（1）, pPhysAddr.Address（2）, pPhysAddr.Address（3）, pPhysAddr.Address（4）, pPhysAddr.Address（5））
Next i
' 释放内存
FreeMem pBuf
GetMacAddress = macAddress
End Function
```
方法三：使用第三方库
有些第三方库提供了更简单的获取MAC地址的方法，例如使用`System.Net.NetworkInformation`命名空间。
```vb
Imports System.Net.NetworkInformation
Private Sub Form_Load（）
Dim macAddresses（） As String
' 获取所有网卡的MAC地址
macAddresses = NetworkInterface.GetAllNetworkInterfaces（）.Select（Function（ni） ni.GetPhysicalAddress（）.ToString（））.ToArray（）
' 显示MAC地址
TextBox1.Text = String.Join（", ", macAddresses）
End Sub
```
建议
选择合适的方法：
根据你的需求和VB版本选择合适的方法。WMI方法适用于大多数情况，而API调用方法提供了更底层的控制。
错误处理：
在实际应用中，务必添加适当的错误处理代码，以确保程序的健壮性。
权限：
获取MAC地址可能需要管理员权限，特别是在使用WMI时。
通过以上方法，你可以在VB编程中轻松获取MAC地址。