Пятница, 17.05.2024, 12:12
Всего понемногу...
Меню сайта
Категории
Функции [9]
Операторы [9]
Разное [10]
Переменные [1]
Числа [1]
Строки [2]
Трюки [0]
Примеры [0]
Поиск
Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Ваши данные:
 
Главная » Статьи » Visual Basic » Функции

Функции VB5 (U...Y)

---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.
Категория: Функции | Добавил: adelay (26.04.2013) | Автор: Funbit
Просмотров: 500 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
ADelay © 2024
Конструктор сайтов - uCoz