Testare una parola, stringa o una sequenza di caratteri per vedere se rispondono a un modello di base, come ad esempio utilizzando solo caratteri alfabetici, è un compito potenzialmente impegnativo. Tuttavia, Visual Basic supporta una sintassi speciale, chiamato espressioni regolari (o espressioni regolari), che rende il compito facile.

istruzione

1 Fai clic su "Strumenti". Trascinare un pulsante e una casella di testo nel form.

2 Fare doppio clic sul pulsante. Questo vi porterà l'editor di codice per quando l'utente fa clic sul pulsante. Incollare il seguente codice:

s Dim come stringa = TextBox1.Text

3 Incollare il seguente per dichiarare le espressioni regolari che descrivono due tipi di test alfabeto:

Dim alphaNumericRegex come nuovo Regex ( "^ \ w + $")

Dim alphaOnlyRegex come nuovo Regex ( "^ [a-zA-Z] + $")

sintassi delle espressioni regolari può sembrare un po 'difficile in un primo momento, quindi cerchiamo di passare attraverso un passo alla volta. Entrambi i comandi di sintassi iniziano e finiscono con il carattere "^" personaggi e "$". Questi sono i comandi regex per l'inizio e la fine di una stringa. La regex alfanumerico, che corrisponde a lettere e numeri, usa la "\ w +" comando. "\ W" corrisponde a qualsiasi carattere alfanumerico, mentre il segno più dice di consentire più di un carattere da abbinare. Quindi l'intero modello è partita "inizio di una stringa, qualsiasi numero di caratteri alfanumerici, e alla fine della stringa."

Il secondo comando è simile al primo, ma contiene "[a-zA-Z]." Questi dicono che per adattarsi a qualsiasi dei caratteri indicati nella gamma. Quindi sarebbe leggere "inizio di una stringa, un numero qualsiasi di caratteri tra due 'a' e 'z' o 'A' e 'Z', e alla fine della stringa."

Vedere la risorsa per maggiori dettagli sulla sintassi delle espressioni regolari.

4 Incollare le seguenti righe che metteranno alla prova il codice e stampare i risultati al debugger:

Debug.WriteLine("Is it alphanumeric? " & alphaNumericRegex.IsMatch(s))

Debug.WriteLine ( "E 'alpha solo?" & AlphaOnlyRegex.IsMatch (s))

5 Premere il tasto "F5" per eseguire il test.