Този урок ще покаже как да използвате функциите UCASE, LCASE и STRCONV във VBA.
Докато работите във VBA, често се налага да конвертирате низове в малки, големи или правилни букви. Това е възможно с помощта наUCase, LCase и StrConv функции.
Тези функции са важни при манипулиране на низове във VBA, какъвто е VBA различаващ главни от малки букви. Ако искате да направите VBA нечувствителен към регистъра, трябва да добавите Option Сравнете текст в горната част на вашия модул. Можете да научите повече за това тук: Предотвратете VBA регистър чувствителен
UCase - Конвертиране на низ в главни букви
The UCase функция във VBA преобразува всички букви на низ в главни букви. Има само един аргумент, който може да бъде низ, променлива с низ или стойност на клетка. Тази функция често се използва, ако искате да сравните два низа. Ето кода за функцията UCase:
| 12345678 | Dim strText As StringDim strTextUCase As StringstrText = "изпълнява функция с главни букви"strTextUCase = UCase (strText)MsgBox strTextUCase |
В примера искаме да преобразуваме всички букви на strText променлива към главни букви и присвояване на преобразувания низ на strTextUCase променлива. В края извикваме полето за съобщение с преобразувания низ:
LCase - Конвертиране на низ в малки букви
Ако искате да конвертирате всички букви от низ в малки букви, трябва да използвате LCase функция. Тази функция има един аргумент, същият като UCase. Това е кодът за функцията LCase:
| 12345678 | Dim strText As StringDim strTextLCase As StringstrText = "РАБОТА с малки букви ФУНКЦИЯ"strTextLCase = LCase (strText)MsgBox strTextLCase |
В този пример, ние преобразуваме всички букви на низ от A1 в малки букви. След това преобразуваният низ се присвоява на клетката A1.
StrConv - Конвертиране на низ в подходящ регистър
The StrConv функцията ви позволява да конвертирате низ от текст в подходящ регистър. Функцията има два аргумента. Първо е низът, който искате да конвертирате. Вторият е видът на преобразуването, който искате. За да преобразувате низ в подходящ регистър, трябва да го настроите на vbProperCase. Кодът на функцията е:
| 12345678 | Dim strText As StringЗатъмнете strTextProperCase като низstrText = "изпълнява правилна функция за регистър"strTextProperCase = StrConv (strText, vbProperCase)MsgBox strTextProperCase |
На примера ще видите как работи функцията. Той взема низа от клетката B1, преобразува го в правилен регистър и връща стойността в клетката A1.
StrConv - Конвертиране на низ в големи или малки букви
Използвайки функцията StrConv, можете също да конвертирате низ в главни или малки букви. За да направите това, просто трябва да зададете втория аргумент на vbUpperCase или vbLowerCase:
| 1 | strTextConverted = StrConv (strText, vbUpperCase) |
| 1 | strTextConverted = StrConv (strText, vbLowerCase) |
VBA Горна, долна и подходяща буква - Функции на случай в Access
Всички горепосочени примери работят абсолютно същото в Access VBA като в Excel VBA.
| 1234 | Частен под клиентName_AfterUpdate ()'това ще преобразува текста в полето за име на клиента в главни буквиMe.ClientName = UCase (Me.ClientName)End Sub |
