Тип с двойна променлива
VBA Двойна тип данни се използва за съхраняване на числа, които изискват десетични знаци. Той може да съхранява от -1.79769313486231E308 до -4.94065645841247E -324 за отрицателни стойности и 4.94065645841247E -324 до 1.79769313486232E308 за положителни стойности.
За да декларирате двойна променлива, използвате оператора Dim (съкращение от Dimension):
| 1 | Dim dblA като Double |
След това, за да присвоите стойност на променлива, просто използвайте знака за равенство:
| 1 | dlbA = 3658,25 |
Поставянето на това в процедура изглежда така:
| 12345678 | Sub dblExample ()'декларирайте двойната променливаDim dblA като Double'попълнете двойната променливаdblA = 3658,25'покажете полето за съобщенияMsgBox dblAEnd Sub |
Ако изпълните горния код, ще се покаже следното поле със съобщение.
Единичен тип данни
Типът единични данни е само по -кратка версия на двоен тип данни. Поради този факт, той може да повлияе на закръгляването, когато се използва в процедура, тъй като единичният тип данни ще се закръгли до 4 десетични знака, докато двойният тип данни ще се закръгли до 12 десетични знака. Ако нямате нужда от двоен тип данни, можете да използвате единичен тип данни
Вътрешни или дълги типове данни
Ако не се нуждаете от десетична запетая, можете да използвате типа данни Int или Long.
| 1 | Dim intA като Integer |
| 1 | Dim lngB като Long |
Декларирайте двойна променлива на модулно или глобално ниво
В предишните примери декларирахме двойната променлива в рамките на процедура. Променливите, декларирани с процедура, могат да се използват само в рамките на тази процедура.
Вместо това можете да декларирате двойни променливи на модулно или глобално ниво.
Модулно ниво
Ниво на модул променливите се декларират в горната част на кодовите модули с Дим изявление.
Тези променливи могат да се използват с всяка процедура в този кодов модул.
Глобално ниво
Глобално ниво променливите също се декларират в горната част на кодовите модули. Въпреки това, вместо да използвате Дим изявление, използвайте Обществен изявление, което показва, че променливата Double е достъпна за използване във вашия VBA проект.
| 1 | Публичен DblA като двоен |
Ако трябва да декларирате двойната променлива на ниво модул и след това да се опитате да я използвате в друг модул, ще възникне грешка.
Ако обаче сте използвали ключовата дума Public за деклариране на двойната променлива, грешката няма да възникне и процедурата ще работи перфектно.
Форматирайте двойно съхранено като низ
Може да има момент, в който искате да форматирате двоен тип данни в низ - например може да искате да покажете символ на валута и да закръглите числото до 2 знака след десетичната запетая.
За да постигнете това, използвайте функцията Форматиране.
Следващата процедура
| 1234567891011 | Sub TestDoubleToCurrencyString ()'декларирайте низовата променливаDim strМани като низ'декларирайте двойното и попълнете стойносттаDim dblValue As DoubledblValue = 44055.256'конвертирате двойното в низ с символ на валута с 2 десетични знакаstrMoney = Формат (dblValue, "$#, ## 0.00")'вижте резултатаMsgBox strMoneyEnd Sub |
ще върне този резултат:
По същия начин може да искате да покажете номер като форматиран телефонен номер.
Тази процедура:
| 1234567891011 | Sub TestDoubleToPhone ()'декларирайте низовата променливаDim strPhone As String'декларирайте двойното и попълнете стойносттаDim dblValue As DoubledblValue = 555968541'конвертирате двойното в низ със символ на валутаstrPhone = Формат (dblValue, "(000) -000 0000")'вижте резултатаMsgBox strPhoneEnd Sub |
ще върне този резултат:
