get ip address of NIC

[Jason]

Imports System.Management
I've got the following code, that gets the mac address of the card I'm
looking for, but how can I also get the ip address of that card???

Thanks
Dim scope As ManagementScope = New
ManagementScope(ManagementPath.DefaultPath)
Dim query As SelectQuery = New
SelectQuery("Win32_NetworkAdapterConfiguration")
' this query returns all properties of the class
Dim searcher As ManagementObjectSearcher = New
ManagementObjectSearcher(scope, query)
Dim mo As New ManagementObject
For Each mo In searcher.Get()
If (mo.Item("Caption").ToString) = "[00000016] Packet Scheduler
Miniport" Then
Try
MACaddress = (mo.Item("MacAddress").ToString)
'Me.RichTextBox1.Text &= "Mac Address: " & MacAttack &
vbCrLf
Catch ex As Exception

End Try
End If
Next

[iwdu15]

try

Dim MyIp as Net.IPAddress =
Net.Dns.GetHostByName(Net.Dns.GetHostName).Address List.GetValue(0)
--
-iwdu15