Šī apmācība parādīs, kā VBA izmantot funkcijas UCASE, LCASE un STRCONV.
Strādājot VBA, virknes bieži jāpārveido par mazajiem, lielajiem vai lielajiem burtiem. Tas ir iespējams, izmantojotUCase, LCase un StrConv funkcijas.
Šīs funkcijas ir svarīgas, manipulējot ar VBA virknēm, kā tas ir VBA reģistrjutīga. Ja vēlaties, lai VBA nebūtu reģistrjutīgs, jums jāpievieno Option Salīdzināt tekstu moduļa augšpusē. Jūs varat uzzināt vairāk par to šeit: Novērst VBA reģistrjutīgo
UCase - pārvērst virkni par lielajiem burtiem
The UCase funkcija VBA pārvērš visus virknes burtus lielajos burtos. Ir tikai viens arguments, kas var būt virkne, mainīgs ar virkni vai šūnas vērtība. Šo funkciju bieži izmanto, ja vēlaties salīdzināt divas virknes. Šeit ir UCase funkcijas kods:
| 12345678 | Dim strText kā virkneDim strTextUCase kā virknestrText = "darbojas lielo burtu funkcija"strTextUCase = UCase (strText)MsgBox strTextUCase |
Šajā piemērā mēs vēlamies pārvērst visus strText mainīgo uz lielajiem burtiem un piešķir konvertēto virkni strTextUCase mainīgais. Beigās mēs izsaucam ziņojumu lodziņu ar konvertēto virkni:
LCase - pārvērst virkni par mazajiem burtiem
Ja vēlaties pārvērst visus virknes burtus mazajos burtos, jums jāizmanto LCase funkciju. Šai funkcijai ir viens arguments, tāds pats kā UCase. Šis ir LCase funkcijas kods:
| 12345678 | Dim strText kā virkneDim strTextLCase kā virknestrText = "RUNINGING CECE FUNCTION"strTextLCase = LCase (strText)MsgBox strTextLCase |
Šajā piemērā mēs konvertējam visus virknes burtus no A1 uz mazajiem burtiem. Pēc tam pārveidotā virkne tiek piešķirta šūnai A1.
StrConv - pārvērst virkni par pareizo gadījumu
The StrConv funkcija ļauj pārvērst teksta virkni pareizos reģistros. Funkcijai ir divi argumenti. Pirmkārt, ir virkne, kuru vēlaties konvertēt. Otrais ir vēlamā reklāmguvuma veids. Lai virkni pārvērstu pareizā gadījumā, tā jāiestata uz vbProperCase. Funkcijas kods ir šāds:
| 12345678 | Dim strText kā virkneDim strTextProperCase kā virknestrText = "darbojas atbilstoša lietu funkcija"strTextProperCase = StrConv (strText, vbProperCase)MsgBox strTextProperCase |
Piemērā redzēsit, kā šī funkcija darbojas. Tas ņem virkni no šūnas B1, pārvērš to par pareizo un atgriež vērtību šūnā A1.
StrConv - pārvērst virkni par lielajiem vai mazajiem burtiem
Izmantojot funkciju StrConv, varat arī pārvērst virkni par lielajiem vai mazajiem burtiem. Lai to izdarītu, jums vienkārši jāiestata otrais arguments uz vbUpperCase vai vbLowerCase:
| 1 | strTextConverted = StrConv (strText, vbUpperCase) |
| 1 | strTextConverted = StrConv (strText, vbLowerCase) |
VBA augšējā, apakšējā un pareizā lieta - lietu funkcijas piekļuvē
Visi iepriekš minētie piemēri Access VBA darbojas tieši tāpat kā programmā Excel VBA.
| 1234 | Privāts apakšklientsName_AfterUpdate ()"tas klienta nosaukuma lodziņā esošo tekstu pārvērtīs par lielajiem burtiemMe.ClientName = UCase (Me.ClientName)Beigu apakš |
