[RESOLVED] [2005] RegEx Need Simple Ones

[jesus4u]

The Regex man strikes back.... should handle all three cases...

Dim s As String = ""
Dim Pattern As String = "^[\d]*$|^[a-zA-Z]*$|^[\s]{0}$"
If System.Text.RegularExpressions.Regex.IsMatch(s, Pattern) = True Then
      MessageBox.Show("Match!")
Else
      MessageBox.Show("No Match!")
End If

Hey thanks for that! It actually takes care of all my scenarios.
Appreciate it!

[jesus4u]

I am NOT good with Regex expressions. I need 3 RegEx expressions.

1. Is a value in a textbox empty?
2. Is a value in a textbox a number?
3. Is a value in a textbox only alpha characters?

Thanks

[nmadd]

Hello,

Do you really need to use RegEx? Couldn't you just do for the first two at least:

If Me.TextBox1.Text = String.Empty
 
If IsNumeric(Me.TextBox1.Text)

[jesus4u]

Thanks but yes I DO need to use RegEx.

[penagate]

1. ^(.*)$
2. ^([0-9]+)$
3. ^([a-zA-Z]+)$

[jesus4u]

1. ^(.*)$ Does not work
2. ^([0-9]+)$ Works...thanks
3. ^([a-zA-Z]+)$ Does not work

[danasegarane]

This one ?

Dim regx As Regex
        Dim regp As Match
        regx = New Regex("\s") 'Matches any whitespace character (including spaces, newlines, tabs, and so on)
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Emptystring" & regp.Length.ToString)
        regx = New Regex("[1-9]")
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Numbers" & regp.Length.ToString)
        regx = New Regex("[Aa-zZ]")
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Charaters" & regp.Length.ToString)

[jesus4u]

This one ?

Dim regx As Regex
        Dim regp As Match
        regx = New Regex("\s") 'Matches any whitespace character (including spaces, newlines, tabs, and so on)
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Emptystring" & regp.Length.ToString)
        regx = New Regex("[1-9]")
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Numbers" & regp.Length.ToString)
        regx = New Regex("[Aa-zZ]")
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Charaters" & regp.Length.ToString)

For the first one if I type " sdfsdf", I need it to come back false because there are other characters there.

[jesus4u]

This one ?

Dim regx As Regex
        Dim regp As Match
        regx = New Regex("\s") 'Matches any whitespace character (including spaces, newlines, tabs, and so on)
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Emptystring" & regp.Length.ToString)
        regx = New Regex("[1-9]")
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Numbers" & regp.Length.ToString)
        regx = New Regex("[Aa-zZ]")
        regp = regx.Match(TextBox1.Text)
        'Console.WriteLine("Charaters" & regp.Length.ToString)

This one is wrong [1-9] cause if I type gghh123 it comes back True when it is obviously NOT a number.

[danasegarane]

Do you want to combine all these conditons ?

[jesus4u]

and this one is wrong [Aa-zZ] cause if I type gghh123 it comes back True when it is not all alpha characters.

[jesus4u]

Do you want to combine all these conditons ?

Well, let's just get them to work separately first.

[nmadd]

1. ^(.*)$ Does not work
2. ^([0-9]+)$ Works...thanks
3. ^([a-zA-Z]+)$ Does not work

#3 seems to work for me.

[penagate]

and this one is wrong [Aa-zZ] cause if I type gghh123 it comes back True when it is not all alpha characters.

Post your code.

[jesus4u]

#3 seems to work for me.

My mistake #3 DOES work. Thanks

[jesus4u]

Post your code.

Sub Main()

Dim s As String = "gghh123 "

Dim regx As Regex
Dim regp As Match

regx = New Regex("[Aa-zZ]")
regp = regx.Match(s)

Look at the regp.Success property and you will see it is True.

[penagate]

Aa-zZ is not the same as a-zA-Z. The latter matches alphabetical characters regardless of case, by specifying two ranges; whereas I'm not entirely sure what the former matches—probably everything, or at least a large subset of the ASCII table.

Note that you can also specify case-insensitivity using a flag, which is an optional parameter of the Regex constructor..

[gigemboy]

The Regex man strikes back.... should handle all three cases...

Dim s As String = ""
Dim Pattern As String = "^[\d]*$|^[a-zA-Z]*$|^[\s]{0}$"
If System.Text.RegularExpressions.Regex.IsMatch(s, Pattern) = True Then
      MessageBox.Show("Match!")
Else
      MessageBox.Show("No Match!")
End If