This browser is no longer supported.
Upgrade to Microsoft Edge to take advantage of the latest features, security updates, and technical support.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(211.20000000000002, 71%, 30%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EJ%3C/text%3E%3C/svg%3E)
Hello everyone
I am creating a program that needs the public IP Address of the computer it is running on. How would I get it from within code.
See if this is what you are looking for
Dim hostName As String = Net.Dns.GetHostName()
Dim IPAddress As String = Net.Dns.GetHostByName(hostName).AddressList(0).ToString()
MessageBox.Show($"Host Name: { hostName} IP: {IPAddress}")
You can validate this with a PowerShell one-liner
Get-NetIPAddress -AddressFamily IPv4 | select IPaddress,Interface* | ConvertTo-Json
Does this get the public IP address of the computer?
If it's not working for you then try this
Dim externalIpString As String = New WebClient().
DownloadString("http://icanhazip.com").
Replace("\r\n", "").Replace("\n", "").
Trim()
Dim externalIp = IPAddress.Parse(externalIpString)
MessageBox.Show(externalIp.ToString())
Then in say Google type What's my IP and compare the two.
It works great, thank you!