---U---
UBound(arrayname[, dimension]) - Возвращает число Long, содержащее максимально возможный индекс массива arrayname указанной размерности. Если вам не всё понятно, то смотрите пример.
Dim Upper
Dim MyArray(1 To 10, 5 To 15, 10 To 20) ' Объявляем массивы
Dim AnyArray(10)
Upper = UBound(MyArray, 1) ' Возвратит 10.
Upper = UBound(MyArray, 3) ' Возвратит 20.
Upper = UBound(AnyArray) ' Возвратит 10.
UCase(string) - Переводит строку в верхний регистр.
Dim LowerCase, UpperCase
LowerCase = "Hello World 1234" ' Строка для конвертирования
UpperCase = UCase(LowerCase) ' Возвратит "HELLO WORLD 1234".
---V---
Val(string) - Превращает строку в число.
Dim MyValue
MyValue = Val("2457") ' Возвратит 2457.
MyValue = Val(" 2 45 7") ' Возвратит 2457.
MyValue = Val("24 and 57") ' Возвратит 24.
MyValue = Val ("") ' Возвратит 0.
MyValue = Val ("laja") ' Возвратит 0.
VarType(varname) - Возвращает тип переменной varname. Возможные значения функции:
vbEmpty - Empty (Не инициализирована)
vbNull - Null (нет правильного значения)
vbInteger - Integer
vbLong - Long integer
vbSingle - Single
vbDouble - Double
vbCurrency - Currency
vbDate - Date значение
vbString - String
vbObject - Object
vbError - значение Error
vbBoolean - Boolean значение
vbVariant - Variant (используется только для Variant массивов)
vbDataObject - Объект доступа к данным
vbDecimal - десятичное число
vbByte - Byte
vbArray - массив
Dim IntVar, StrVar, DateVar, MyCheck
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
MyCheck = VarType(IntVar) ' Возвратит 2.
MyCheck = VarType(DateVar) ' Возвратит 7.
MyCheck = VarType(StrVar) ' Возвратит 8.
---W---
Weekday(date, [firstdayofweek]) - Возвращает день недели, которому соответствует указанная дата. Возможные значения фунции:
vbUseSystem = 0 Использует в качестве первого дня недели день, используемый в системе. (В Америке неделя начинается с Воскресенья, поэтому по умолчанию firstdayofweek = 1).
vbSunday = 1 Воскресенье
vbMonday = 2 Понедельник
vbTuesday = 3 Вторник
vbWednesday = 4 Среда
vbThursday = 5 Четверг
vbFriday = 6 Пятница
vbSaturday = 7 Суббота
Dim MyDate, MyWeekDay
MyDate = Date ' Присваиваем текущую дату
MyWeekDay = Weekday(MyDate, 0)
' MyWeekDay содержит сегодняшний день недели. Можете проверить :)
---Y---
Year(date) - Возвращает количество годов, содержащихся в параметре date.
Dim MyDate, MyYear
MyDate = #February 12, 1969# ' Присваиваем дату
MyYear = Year(MyDate) ' MyYear содержит 1969.
|