May 29
Scopri le funzioni di casi di VBA in modo da poter sfruttare o applicare minuscole al testo, invece di richiedere agli utenti del vostro programma di farlo manualmente automaticamente. Imparare l'affermazione "Select Case" per ridurre l'ingombro nel codice. La conoscenza si guadagna da imparare queste affermazioni possono aiutarvi per iscritto istruzioni case personalizzati, come quelli che ignorano parole come "il" e "a" per la produzione corretta capitalizzazione di intestazioni in un documento.
La funzione VBA UCase converte il testo del suo singolo argomento a tutti maiuscoli. Ad esempio, eseguire l'istruzione "Debug.Print UCase (" ciao "), si tradurrà in" CIAO ". Non è necessario un programma di provare questo, ma è possibile eseguire l'esempio appena dato dalla VBA" finestra immediata ". aprire l'ambiente di programmazione VBA facendo clic sul pulsante "Visual Basic" nella scheda Sviluppatore, quindi fare clic sulla voce "immediata" nel menu finestra di VBA. Digitare il "debug" dichiarazione appena descritta per vedere apparire il testo "CIAO".
la funzione LCase di VBA converte il testo in ingresso a tutti minuscolo, che è utile se è necessario confrontare le stringhe di testo con diversi casi. Ad esempio, se il programma ha una variabile "x" il cui valore è "Ciao" e un valore "y" il cui valore è "CIAO", quindi il confronto "x = y" sarebbe tornato "False", perché i casi non lo fanno incontro. Il "LCase (x) = LCase (y)" confronto produrrebbe "True", tuttavia, perché l'istruzione cambia il caso di tutte le lettere per abbassare.
La funzione Select Case sostituisce diversi se poi dichiarazioni. L'istruzione Select Case test una variabile, mentre le singole dichiarazioni di casi forniscono canali per l'esecuzione del programma sulla base dei risultati del test. Si possono avere molte dichiarazioni di casi in base alle esigenze. Se si vuole essere sicuri che il Select Case cattura tutte le condizioni possibili, includere una dichiarazione CASE ELSE prima dell'istruzione End Select. Un esempio illustra come funziona Select Case.
Public Sub testCase ()
età Dim
età = InputBox ( "Si prega di inserire la tua età.")
Selezionare una età Caso
Caso 13 a 19:
MsgBox "Sei un adolescente."
Caso 20 a 29:
MsgBox "Sei nei tuoi vent'anni"
Caso è> = 30:
MsgBox "Sei oltre 30."
End Select
End Sub
il linguaggio VBA di Microsoft Word ha una proprietà funzione simile denominata "caso" di applicazione del titolo, frase e altri casi in testo. Per vedere questa proprietà in azione, digitare del testo minuscolo in un nuovo documento e selezionare il testo con un doppio clic su di esso. Fare clic sulla scheda "Sviluppatore" di Word, quindi fare clic sul pulsante "Visual Basic" per accedere all'ambiente di programmazione VBA. Incollare il seguente programma nella finestra centrale del ambiente. Questo programma utilizza la proprietà caso di Word per convertire il testo selezionato prima di condannare caso, poi a caso il titolo. Eseguire il programma premendo il tasto "F5". Il testo selezionato cambierà caso, ogni volta che si preme "Invio".
c sub ()
MsgBox ( "Ecco caso frase ...")
Selection.Range.Case = wdTitleSentence
MsgBox ( "Premere 'Enter' per vedere caso titolo")
Selection.Range.Case = wdTitleWord
End Sub