Può accadere che l'utente, debba comunicare al programma una sintassi: di solito si comunica all'utente che l'input è case sensitive, ma con un'astuzia possiamo eliminare il problema. L'astuzia si chiama... LCase.
Prendiamo questo codice:
CODICE:
Dim codice As String
codice = Text1.Text
Select Case (codice)
Case "messaggio_predefinito"
MsgBox ("Hello World è il messaggio predefinito")
Case Else
MsgBox ("Non ho trovato alcun comando!")
End Select
Durante l'esecuzione del programma, dobbiamo inserire "messaggio_predefinito", ma se inserissimo "MeSsAgGiO_pReDeFiNiTo", "scatta" il Case Else. L'astuzia è di convertire in LCase ("lower case", minuscolo) il testo, in modo tale da avere una stringa minuscola dove possiamo lavorare. In pratica, dobbiamo ottenere un codice così:
CODICE:
Dim codice As String
codice = Text1.Text
Select Case (LCase(codice))
Case "messaggio_predefinito"
MsgBox ("Hello World è il messaggio predefinito")
Case Else
MsgBox ("Non ho trovato alcun comando!")
End Select
E' possibile usare UCase... ma per questo bisogna lavorare all'inverso...
Rendiamo non Case Sensitive un'input dato dall'utente
Pubblicato prima del 07/05/2008 - Informazione assente
Descrizione non disponibile. Questo membro non è più parte della Community.
|
Aggiungi un commento