[RESOLVED] Richtextbox - find special signs, and select bold [ Whole word only ]

[Fraps]

According to above code I'm really close ( I think ) to get what I've posted here in a prelude.
so I can now put something like that:

Private Sub Command1_Click()
        HighlightWords RichTextBox1,"$" & " " & 1, vbRed
        HighlightWords RichTextBox1,"$" & " " & 2, vbRed
and so on and on...
      End Sub

Is there any way to put here something like: show me all the digits after the space
something like:

HighlightWords RichTextBox1,"$" & " " & [digits], vbRed