100% FREE Monitoring
Website Checks every 10 minutes. Email alerts with false alert prevention technology.
Get Started Now!
How Does it Work?
FREE SEO Link Exchange
To increase your page rank and do it all for free, check out
LinkMarket.com.
IsGUID()
Determine if a string is a valid GUID using a regular expression to verify.
Public Function isGUID(ByVal QFormUID As String) As Boolean
Dim guidRegEx As Regex = New Regex("^(\{{0,1}([0-9a-fA-F]){8}-([0-9a-fA-F]){4}-([0-9a-fA-F]){4}-([0-9a-fA-F]){4}-([0-9a-fA-F]){12}\}{0,1})$")
If guidRegEx.IsMatch(QFormUID) Then
Return True
Else
Return False
End If
End Function