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

4 votes166 views1 answer
Excel vba check cell not empty
VBA
0 vote171 views1 answer
Enable macros on opening workbook vba
VBA
0 vote173 views1 answer
Limit combobox to list vba
VBA
0 vote170 views1 answer
Excel vba disable alerts
VBA
0 vote167 views1 answer
Vba like with wildcard
VBA
0 vote164 views1 answer
Vba copy paste value only
VBA
1 vote191 views1 answer
Vba format string as cash
VBA
0 vote194 views1 answer
Excel vba paste all to each sheet in workbook
VBA
3 votes194 views2 answers
Vba active workbook path
VBA
0 vote175 views1 answer
Excel PasteSpecial Format:= can't find the argument
VBA