Ši pamoka parodys, kaip naudotis UCASE, LCASE ir STRCONV funkcijomis VBA.
Dirbdami VBA, dažnai turite konvertuoti eilutes į mažąsias, didžiąsias arba tinkamas raides. Tai įmanoma naudojantUCase, LCase ir StrConv funkcijas.
Šios funkcijos yra svarbios manipuliuojant VBA eilutėmis, kaip ir VBA didžiosios ir mažosios raidės. Jei norite, kad VBA neskirtų didžiųjų ir mažųjų raidžių, turite pridėti Option Palyginti tekstą modulio viršuje. Daugiau apie tai galite sužinoti čia: Užkirsti kelią VBA didžiosios ir mažosios raidės
UCase - konvertuoti eilutę į didžiąsias raides
The UCase funkcija VBA konvertuoja visas eilutės raides į didžiąsias raides. Yra tik vienas argumentas, kuris gali būti eilutė, kintamasis su eilute arba langelio reikšmė. Ši funkcija dažnai naudojama, jei norite palyginti dvi eilutes. Čia yra UCase funkcijos kodas:
| 12345678 | „Dim strText“ kaip eilutėDim strTextUCase kaip eilutėstrText = "veikia didžiųjų raidžių funkcija"strTextUCase = UCase (strText)„MsgBox strTextUCase“ |
Pavyzdyje norime konvertuoti visas strText kintamasis didžiosiomis raidėmis ir priskirkite konvertuotą eilutę strTextUCase kintamasis. Pabaigoje mes iškviečiame pranešimų laukelį su konvertuota eilute:
LCase - konvertuokite eilutę į mažąsias raides
Jei norite visas eilutės raides paversti mažosiomis raidėmis, turite naudoti LCase funkcija. Ši funkcija turi vieną argumentą, tokį patį kaip UCase. Tai yra LCase funkcijos kodas:
| 12345678 | „Dim strText“ kaip eilutėDim strTextLCase kaip eilutėstrText = "VYKDOMAS mažosios raidės FUNKCIJA"strTextLCase = LCase (strText)„MsgBox strTextLCase“ |
Šiame pavyzdyje visas eilutės raides iš A1 paverčiame mažosiomis. Po to konvertuota eilutė priskiriama langeliui A1.
„StrConv“ - konvertuokite eilutę į tinkamą atvejį
The StrConv Ši funkcija leidžia jums paversti teksto eilutę į tinkamą raidę. Funkcija turi du argumentus. Pirmasis yra eilutė, kurią norite konvertuoti. Antrasis yra norimos konversijos tipas. Norėdami konvertuoti eilutę į tinkamą atvejį, turite ją nustatyti vbProperCase. Funkcijos kodas yra:
| 12345678 | „Dim strText“ kaip eilutėDim strTextProperCase kaip eilutėstrText = "veikia tinkama dėklo funkcija"strTextProperCase = StrConv (strText, vbProperCase)„MsgBox strTextProperCase“ |
Pavyzdyje pamatysite, kaip veikia ši funkcija. Ji paima eilutę iš langelio B1, paverčia ją tinkamomis raidėmis ir grąžina langelio A1 reikšmę.
„StrConv“ - konvertuokite eilutes į didžiąsias arba mažąsias raides
Naudodami funkciją „StrConv“, eilutę taip pat galite konvertuoti į didžiąsias arba mažąsias raides. Norėdami tai padaryti, jums tiesiog reikia nustatyti antrąjį argumentą į vbUpperCase arba vbLowerCase:
| 1 | strTextConverted = StrConv (strText, vbUpperCase) |
| 1 | strTextConverted = StrConv (strText, vbLowerCase) |
VBA didžioji, apatinė ir tinkamos raidės - prieigos prie didžiųjų raidžių funkcijos
Visi aukščiau pateikti pavyzdžiai „Access VBA“ veikia lygiai taip pat, kaip „Excel VBA“.
| 1234 | Privatus antrinis klientasName_AfterUpdate ()"tai konvertuos kliento pavadinimo lauke esantį tekstą į didžiąsias raidesMe.ClientName = UCase (Me.ClientName)Pabaiga Sub |
