[Help] Checking a textbox for a word [solved]

how can i check if textbox contains f.e. "$" more than one time
i already tried

Code:

Dim S As String = "$"
For Each S In TextBox1.Text
Msgbox("..")
Next

Here:

Code:

Dim WordCount As Integer = 0 For i = 1 To TextBox1.Text.Length If Mid(TextBox1.Text, i, 1) = "$" Then WordCount += 1 End If Next MsgBox(WordCount)

Originally Posted by -Away

Here:

Code:

Dim WordCount As Integer = 0 For i = 1 To TextBox1.Text.Length If Mid(TextBox1.Text, i, 1) = "$" Then WordCount += 1 End If Next MsgBox(WordCount)

solved thanks
going to check mid function moar

[highlight=vb.net]
Private Function getWordCount(ByVal searchStr as string, byval targetstring as string) as integer
Return System.Text.RegularExpressions.Regex.Matches(targe tstring, System.Text.RegularExpressions.Regex.Escape(search Str)).Count
End Function
[/highlight]

Gotta love RegEx.

[Help] Checking a textbox for a word [solved]

Post a Reply

Tags for this Thread