' Validate a URL' Example: MessageBox.Show(IsValidUrl("http://www.vb2themax.com"))Function IsValidUrl(ByVal url As String) As Boolean Return System.Text.RegularExpressions.Regex.IsMatch(url, _ "(http|ftp|https)://([w-]+.)+(/[w- ./?%&=]*)?")End Function