АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция

Преобразование данных

Читайте также:
  1. Access. Базы данных. Определение ключей и составление запросов.
  2. Decide which answer А, В, С or D best fits each space. Подумайте, какие из предложенных ответов лучше подходят для данных выражений.
  3. Decide which answer А, В, С or D best fits each space. Подумайте, какие из предложенных ответов лучше подходят для данных выражений.
  4. I I I. Преобразование тригонометрических выражений.
  5. I. Разработка структуры базы данных.
  6. I.5.3. Подготовка данных для задачи линейного программирования
  7. I.5.7. Mодификация (изменение) данных задачи
  8. III. Векторное произведение векторов, заданных координатами
  9. ODBC - открытый интерфейс к базам данных на платформе Microsoft Windows — до 15 мин.
  10. XVIII Преобразование те карст в созерцанием
  11. Абстрактные структуры данных
  12. Автоматизация обработки кадастровых данных

 

При написании кода программы часто возникает потребность ввести в строковую переменную символ, которого нет на клавиатуре, но ANSI-код которого известен, преобразовать действительное число в целое, превратить строку в число или наоборот и т.д. Для этих целей VBA содержит ряд функций, перечень которых приведен в таблице 2.1

 

Таблица 2.1 – Перечень ключевых слов и функций, связанных с

преобразованием данных

Действие по преобразованию Ключевые слова, функции
кода ANSI в строку Chr
регистра букв Format, LCase, Ucase
даты в порядковый номер DateSerial, DateValue
в другую систему счисления Hex, Oct
Числа в строку Format, Str
одного типа данных в другой CBool, CByte, CCur, CDate, CDbl, CDec, CInt, CLng, CSng, CStr, CVar, CVErr, Fix, Int
порядкового номера в дату Day, Month, Weekday, Year
порядкового номера во время Hour, Minute, Second
строки в код ASCII Asc
строки в число Val
времени в порядковый номер TimeSerial, TimeValue

 

В качестве примера перевода кода ANSI в строку приведем добавление к строковой переменной символа перевода строки, имеющий код 10:

Dim a As String, b As String

a = b & Chr(10)

 

Функции Int и Fix

Возвращают значение типа, совпадающего с типом аргумента, которое содержит целую часть числа.

 

Синтаксис:

 

Int(число)

Fix(число)

 

Обязательный аргумент число представляет значение типа Double или любое допустимое числовое выражение. Если число имеет значение Null, возвращается Null.

Обе функции Int и Fix отбрасывают дробную часть числа и возвращают целое значение. Различие между ними состоит в том, что для отрицательного значения аргумента число функция Int возвращает ближайшее отрицательное целое число, меньшее либо равное указанному, а Fix – ближайшее отрицательное целое число, большее либо равное указанному. Например, функция Int преобразует –8,4 в -9, а функция Fix преобразует -8,4 в -8.

Выражение Fix(число) эквивалентно следующему:

Sgn(число) * Int(Abs(число))

В данном примере показано, как функции Int и Fix возвращают целые части чисел. В случае отрицательного аргумента Int возвращает ближайшее отрицательное целое число, меньшее либо равное указанному, а Fix – ближайшее отрицательное целое число, большее либо равное указанному.

Dim MyNumber

MyNumber = Int(99.8) ' Возвращает 99.

MyNumber = Fix(99.2) ' Возвращает 99.

MyNumber = Int(-99.8) ' Возвращает -100.

MyNumber = Fix(-99.8) ' Возвращает -99.

MyNumber = Int(-99.2) ' Возвращает -100.

MyNumber = Fix(-99.2) ' Возвращает -99.

 


1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 |

Поиск по сайту:

Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.004 сек.)