Denna handledning visar hur du använder UCASE, LCASE och STRCONV -funktionerna i VBA.
När du arbetar i VBA behöver du ofta konvertera strängar till gemener, versaler eller rätt bokstäver. Detta är möjligt med hjälp avUCase, LCase och StrConv funktioner.
Dessa funktioner är viktiga när man manipulerar strängar i VBA, som VBA är skiftlägeskänsliga. Om du vill göra VBA skiftlägeskänslig måste du lägga till Option Jämför text högst upp i din modul. Du kan ta reda på mer om detta här: Förhindra VBA -fallskänslig
UCase - Konvertera sträng till versaler
De UCase funktion i VBA konverterar alla bokstäver i en sträng till versaler. Det finns bara ett argument, som kan vara en sträng, variabel med sträng eller ett cellvärde. Denna funktion används ofta om du vill jämföra två strängar. Här är koden för UCase -funktionen:
| 12345678 | Dim strText Som strängDim strTextUCase som strängstrText = "kör stora versaler"strTextUCase = UCase (strText)MsgBox strTextUCase |
I exemplet vill vi konvertera alla bokstäver i strText variabel till versaler och tilldela den konverterade strängen till strTextUCase variabel. I slutet kallar vi meddelanderutan med den konverterade strängen:
LCase - Konvertera sträng till gemener
Om du vill konvertera alla bokstäver i en sträng till gemener måste du använda LCase fungera. Denna funktion har ett argument, samma som UCase. Detta är koden för LCase -funktionen:
| 12345678 | Dim strText Som strängDim strTextLCase som strängstrText = "RUNNING lowerCASE FUNCTION"strTextLCase = LCase (strText)MsgBox strTextLCase |
I det här exemplet konverterar vi alla bokstäver i strängen från A1 till små bokstäver. Efter det tilldelas den konverterade strängen till cellen A1.
StrConv - Konvertera sträng till rätt fodral
De StrConv funktion kan du konvertera en textsträng till rätt bokstav. Funktionen har två argument. Först är strängen som du vill konvertera. Den andra är den typ av konvertering du vill ha. För att konvertera en sträng till ett riktigt fall måste du ställa in den till vbProperCase. Koden för funktionen är:
| 12345678 | Dim strText Som strängDim strTextProperCase As StringstrText = "kör korrekt fallfunktion"strTextProperCase = StrConv (strText, vbProperCase)MsgBox strTextProperCase |
Du kommer att se i exemplet hur funktionen fungerar. Den tar strängen från cellen B1, konverterar den till rätt bokstav och returnerar värdet i cellen A1.
StrConv - Konvertera sträng till versaler eller gemener
Med StrConv -funktionen kan du också konvertera en sträng till versaler eller gemener. För att göra detta behöver du bara ställa in det andra argumentet till vbUpperCase eller vbLowerCase:
| 1 | strTextConverted = StrConv (strText, vbUpperCase) |
| 1 | strTextConverted = StrConv (strText, vbLowerCase) |
VBA Övre, nedre och korrekta fodral - Fodralfunktioner i åtkomst
Alla ovanstående exempel fungerar exakt likadant i Access VBA som i Excel VBA.
| 1234 | Private Sub ClientName_AfterUpdate ()'detta kommer att konvertera texten i rutan för klientnamn till versalerMe.ClientName = UCase (Me.ClientName)Avsluta Sub |
