a VBA-ban végzett munka során gyakran át kell alakítania a karakterláncokat kis -, nagybetűs vagy megfelelő esetekre. Ez az UCase, LCase és StrConv függvények használatával lehetséges.
ezek a függvények fontosak a VBA karakterláncainak manipulálásakor, mivel a VBA kis-és nagybetűérzékeny. Ha szeretné, hogy a VBA kis-érzéketlen, meg kell adni a lehetőséget hasonlítsa össze a szöveget a tetején a modul. Erről itt tudhat meg többet: Prevent VBA kis-érzékeny
UCase-Convert String nagybetűs
a UCase függvény VBA átalakítja az összes betű egy húr nagybetűs. Csak egy argumentum van, amely lehet karakterlánc, változó karakterlánccal vagy cellaértékkel. Ezt a funkciót gyakran használják, ha két karakterláncot szeretne összehasonlítani. Itt van az UCase függvény kódja:
|
1
2
3
4
5
6
7
8
|
Dim strText mint String
Dim strTextUCase mint String
strText = “futó nagybetűs funkció”
strTextUCase = UCase (strText)
MsgBox strTextUCase
|
a példában az strText változó összes betűjét nagybetűre akarjuk konvertálni, az átalakított karakterláncot pedig a strTextUCase változóhoz rendeljük. A végén hívjuk az üzenetmezőt az átalakított karakterlánccal:
kép 1. Az UCase funkció használata VBA
LCase – karakterlánc konvertálása kisbetűvé
ha egy karakterlánc összes betűjét kisbetűkké szeretné konvertálni, akkor az LCase funkciót kell használnia. Ennek a függvénynek egy argumentuma van, ugyanaz, mint az UCase. Ez az LCase funkció kódja:
|
1
2
3
4
5
6
7
8
|
Dim strText mint String
Dim strTextLCase mint String
strText = “futó kisbetűs funkció”
strTextLCase = LCase (strText)
MsgBox strTextLCase
|
ebben a példában az A1 karakterlánc összes betűjét kisbetűvé alakítjuk. Ezt követően az átalakított karakterláncot az A1 cellához rendelik.
kép 2. Az LCase funkció használata a VBA-ban
StrConv-Convert String to Proper Case
az StrConv funkció lehetővé teszi, hogy konvertálni egy sor szöveget a megfelelő esetben. A függvénynek két argumentuma van. Az első a konvertálni kívánt karakterlánc. A második a kívánt konverzió típusa. Annak érdekében, hogy konvertálni egy karakterláncot a megfelelő esetben, meg kell állítani, hogy vbProperCase. A függvény kódja:
|
1
2
3
4
5
6
7
8
|
Dim strText As String
Dim strTextProperCase As String
strText = “running proper case function”
strTextProperCase = StrConv(strText, vbProperCase)
MsgBox strTextProperCase
|
You will see on the example how the function works. Elveszi a karakterláncot a B1 cellából, átalakítja a megfelelő esetté, és visszaadja az A1 cellában lévő értéket.
kép 3. Az StrConv funkció használata a VBA-ban
StrConv-karakterlánc konvertálása kis-vagy nagybetűre
az StrConv funkció segítségével egy karakterláncot felső vagy alsó betűkre is konvertálhat. Ehhez csak be kell állítania a második argumentumot a vbUpperCase vagy a vbLowerCase értékre:
|
1
|
strTextConverted = StrConv (strText, vbUpperCase)
|
|
1
|
strTextConverted = StrConv (strText, vbLowerCase)
|
VBA felső, alsó és megfelelő Case – Case függvények az Access
alkalmazásban a fenti példák mindegyike pontosan ugyanúgy működik az Access VBA – ban, mint az Excel VBA-ban.
|
1
2
3
4
|
Privát Sub ClientName_AfterUpdate()
‘ez a konvertálja a szöveget az ügyfél neve mezőbe, hogy nagybetűs
Nekem.ClientName = UCase(Engem.ClientName)
End Sub
|
