Строковые функции Chr(код_символа)Chr Asc(строка)Asc Len(строка) Mid(Строка, начало [,длина]) Left(строка, длина) Right(строка, длина) Ltrim(строка) Rtrim(строка) Trim(строка)
Именованные константы VBA ConstantValueDescription vbKeyLButton0x1Left mouse button vbKeyRButton0x2Right mouse button vbKeyCancel0x3CANCEL key vbKeyMButton0x4Middle mouse button vbKeyBack0x8BACKSPACE key vbKeyTab0x9TAB key
Строковые функции STRING(число,символ) Space(число) InStr([старт, ]строка 1, строка 2[, режим]) InStrRev(строка 1,строка 2[, старт[, режим]]) StrComp (строка 1, строка 2[, режим]) vbUseCompareOption -1 vbBinaryCompare 0 vbTextCompare 1 vbDatabaseCompare 2
Строковые функции STR(выражение) Val(строка) Lcase(строка) Ucase(строка) Format(выражение[, формат[, fпервый день недели[, первая неделя года]]])
Примеры форматирования MyTime = #17:04:23# MyDate = # # MyStr = Format(MyTime, "h:m:s") ' Returns "17:4:23". MyStr = Format(MyTime, "hh:mm:ss AMPM") ' Returns "05:04:23 PM". MyStr = Format(MyDate, "dddd, mmmm d yyyy") ' Returns «среда, март ". MyStr = Format(23) ' Returns "23". MyStr = Format(5459.4, "##,##0.00") ' Returns "5,459.40". MyStr = Format(334.9, "###0.00") ' Returns "334.90". MyStr = Format(5, "0.00%") ' Returns "500.00%". MyStr = Format(«ПРИВЕТ", "<") ' Returns «привет». MyStr = Format(«Пришла весна", ">") ' Returns «ПРИШЛА ВЕСНА».
Функции проверки типа TypeName(varname) VarType(varname)
String returnedVariable ByteByte value Integer LongLong integer SingleSingle-precision floating-point number DoubleDouble-precision floating-point number CurrencyCurrency value DecimalDecimal value DateDate value String BooleanBoolean value ErrorAn error value EmptyUninitialized NullNo valid data ObjectAn object UnknownAn object whose type is unknown NothingObject variable that doesn't refer to an object
ConstantValueDescription vbEmpty0EmptyEmpty (uninitialized) vbNull1NullNull (no valid data) vbInteger2Integer vbLong3Long integer vbSingle4Single-precision floating-point number vbDouble5Double-precision floating-point number vbCurrency6Currency value vbDate7Date value vbString8String vbObject9Object vbError10Error value vbBoolean11Boolean value vbVariant12Variant (used only with arrays of variants)arrays vbDataObject13A data access object vbDecimal14Decimal value vbByte17Byte value vbArray8192Array
Функции преобразования CBool(выражение) CByte(выражение) CCur(выражение) CDate(выражение) CDbl(выражение) CDec(выражение) CInt(выражение) CLng(выражение) CSng(выражение) CStr(выражение) CVar(выражение
FunctionReturn Type CBoolBoolean CByteByte CCurCurrency CDateDate CDblDouble CDecDecimal CIntInteger CLngLong CSngSingle CStrString CVarVariant
Функции преобразования Функция ВОЗВРАЩАЕМОЕДиапозон CBoolBooleanAny valid string or numeric expression. CByteByte0 to 255. CCurCurrency- 922,337,203,685, to 922,337,203,685, CDateDateAny valid date expression.date expression CDblDouble
Именованные константы VBA ConstantValueDescription vbKeyLButton0x1Left mouse button vbKeyRButton0x2Right mouse button vbKeyCancel0x3CANCEL key vbKeyMButton0x4Middle mouse button vbKeyBack0x8BACKSPACE key vbKeyTab0x9TAB key
Окно сообщений MsgBox(текст_сообщения[, тип_кнопки] [, заголовок] [, helpfile, контекст]) Тип_кнопки - числовое выражение, определяющее число и тип кнопок, стиль пиктограммы, кнопку по умолчанию и модальность диалогового окна
Пример
Public Sub tryu() Dim Msg As String Dim Title As String Msg = Программа" Title = «Пример окна сообщения" Call MsgBox(Msg,, Title) End Sub
Пример
Public Sub tryu1() Dim F As Integer If MsgBox(«Расход > Прихода" + Chr(10) + Chr(13) + «Продолжить выполнение программы?", vbQuestion + vbYesNo, "ÏПример") = vbOK Then F = 0 End If End Sub
Число и тип кнопок Константа Знач.Пояснение vbOKOnly0Вывод только кнопки OK vbOKCancel1Вывод OK и Cancel. vbAbortRetryI2Вывод Abort, Retry, и Ignore. vbYesNoCanc3Вывод Yes, No, и Cancel vbYesNo4Вывод Yes и No vbRetryCancel5Вывод Retry and Cancel
Стиль пиктограммы Константа Знач.Пояснение vbCritical1616Критическая ошибка vbQuestion32Предупреждающи й запрос vbExclamtion48Предупреждающе е сообщение vbInformation64Информационное сообщение
Кнопка по умолчанию Константа Знач По умолчанию vbDefaultButton10Первая vbDefaultButton2256Вторая vbDefaultButton3512Третья
Стиль диалогового окна Константа Знач vbApplicationModal0 vbSystemModal256
Коды возвращаемых значений Константа Знач.Пояснение vbOK1Ок vbCancel2Отмена vbAbort3Прекратить vbRetry4Повториь vbIgnore5Игнорировать vbYes6Да vbNo7Нет
Диалоговое окно ввода InputBox(текст_сообщения[, заголовок] [,Значение_по_умолчанию] [, xпозиция ] [,yпозиция[, helpfile, контекст])