Vb get ip address

Private Sub GetIPAddress()

Dim strHostName As String

Dim strIPAddress As String



strHostName = System.Net.Dns.GetHostName()

strIPAddress = System.Net.Dns.GetHostByName(strHostName).AddressList(0).ToString()


MessageBox.Show("Host Name: " & strHostName & "; IP Address: " & strIPAddress)

End Sub

Source: stackoverflow.com

Similar codes

0 vote243 views1 answer
Excel vba textbox forecolor disabled
VBA
0 vote283 views1 answer
Excel vba protect content
VBA
0 vote254 views1 answer
Vba random number
VBA
5 votes261 views1 answer
Excel vba first byte from INTEGER
VBA
0 vote237 views1 answer
Excel vba cell on change
VBA
0 vote259 views1 answer
Vba round to 2 decimals
VBA
0 vote240 views1 answer
Vba pass named range to function
VBA
0 vote172 views1 answer
Vba select file in folder
VBA
0 vote260 views1 answer
Priavte sub with multiple handels find sneder
VBA
4 votes276 views1 answer
Excel vba how to get a range's full address including sheet name
VBA