VB get external IP address

Private Function GetExternalIp() As String
    Try
        Dim ExternalIP As String
        ExternalIP = (New WebClient()).DownloadString("http://checkip.dyndns.org/")
        ExternalIP = (New Regex("\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}")) _
                     .Matches(ExternalIP)(0).ToString()
        Return ExternalIP
    Catch
        Return Nothing
    End Try
End Function

Similar codes

0 vote152 views1 answer
Vba random number
VBA
8 votes245 views1 answer
Vba convert 2 bytes to an integer
VBA
0 vote130 views1 answer
Vba find sub dictionary
VBA
0 vote126 views2 answers
Get excel file from email attachment in vba
VBA
0 vote141 views1 answer
Vba copy file
VBA
2 votes133 views1 answer
Excel vba date to string conversion
VBA
3 votes124 views1 answer
Excel vba make long from two shorts
VBA
0 vote130 views1 answer
Vba string start with
VBA
0 vote134 views1 answer
Vba full date format
VBA
5 votes150 views2 answers
Excel vba write to the windows registry
VBA