dotNETportal.cz

To je prostě naprosto typická ukázka míchání několika problémů dohromady. Tipuju, že potřebujete vědět:

1) Jak se ve VB.NET pracuje s regulárními výrazy

2) Jak se v Rich Text boxu pracuje se selekcí

3) Jak zajistit, aby se mi text obarvoval rovnou při psaní.

ad 1) Zkuste si pohrát s následujícím kódem:

    RichTextBox1.Text = "Toto je $promenna a toto je $jinapromenna a toto je další, $uplnejinapromenna co tady je"
    Dim myMatches As System.Text.RegularExpressions.MatchCollection = System.Text.RegularExpressions.Regex.Matches(RichTextBox1.Text, "\$.*?\s", System.Text.RegularExpressions.RegexOptions.Multiline)
    For Each myMatch As System.Text.RegularExpressions.Match In myMatches
      Debug.Print(myMatch.ToString)
    Next

ad 2) Toto si najdete sám ;-))

ad 3) Zkuste začít třeba tady: http://pietschsoft.com/post/2006/07/VBNE...

Ve VB.NET se s regulárními výrazy pracuje za pomoci třídy Regex z System.Text.RegularExpressions. Reference je celkem jednoduchá:

Metoda IsMatch zjistí, zda zda-li argument odpovídá výrazu či ne, vrací tedy Boolean.

Metoda Match vyhledá ve vstupním textu první řetězec, který odpovídá výrazu.

Metoda Matches vyhledá ve vstupním textu všechny řetězce, které odpovídají výrazu a vrátí je v kolekci.

Metoda Replace vyhledá ve vstupním textu všechny řetězce, které odpovídají výrazu a nahradí je jinými hodnotami.

Některé z těchto funkcí vracejí proměnnou typu Match (popřípadě kolekci), ta představuje jeden nalezený řetězec, který odpovídá výrazu. Dostanete ho ven pomocí metody ToString. Tato třída poskytuje ještě další vlastnosti, jako třeba proměnné $1, $2, $3 a podobně.

Třída Regex se dá používat dvěma způsoby: Zaprvé můžete funkce využít jako sdílené:

Dim mcol As MatchCollection = Regex.Matches(vstup, "výraz")

Nebo zadruhé můžete využít konstruktoru a používat funkce pro referencovanou proměnnou:

Dim r As New Regex("výraz")
Dim mcol As MatchCollection = r.Matches(vstup)

Odkaz na oficiální referenci: http://msdn.microsoft.com/en-us/library/...