Создание пользовательских форм в Visual Basic for Applications. Любин А.Н. - 32 стр.

UptoLike

ВУЗ: 

МАМИ | Москва

Составители: 

Рубрика: 

32
Interval не чувствителен к регистру букв. Литерал должен быть
заключен в кавычки. Для вычисления дней между двумя датами
можно использовать значение интервала дня:"y" или "d";
Date1 - обязательный аргумент типа Variant(Date) или литерал
даты - первая календарная дата при вычислении разности дат;
Date2 - обязательный аргумент типа Variant(Date) или литерал
даты - вторая календарная дата при вычислении разности дат;
FirstDayOfWeek - необязательный аргумент типа Long, опре-
деляющего день недели, допускается использование констант;
vbUseSystem=0 - используется значение национальных сис-
темных установок:
vbSunday=1 - воскресенье(по умолчанию),
vbMonday=2 - понедельник,
vbTuesday=3 - вторник,
vbWednesday=4 - среда,
vbThursday=5 - четверг,
vbFriday=6 - пятница,
vbSaturday - суббота;
FirstWeekOfYear - необязательный аргумент - числовая кон-
станта, указывающая, какой день недели считать первым;
vbUseSystem=0 используется системная информация;
vbFirstJan1=1 неделя, содержащая 1 января;
vbFirstFourDays=2 первая неделя, содержащая как минимум 4
дня нового года;
vbFirstFullWeek=3 Первая полная неделя года.
Пример.
' Вычислить сколько дней осталось до 21 века
Dim Today as Date ' сегодняшний день
Dim Millenium As Date ' 1 день 21 века 
   Interval не чувствителен к регистру букв. Литерал должен быть
заключен в кавычки. Для вычисления дней между двумя датами
можно использовать значение интервала дня:"y" или "d";
    Date1 - обязательный аргумент типа Variant(Date) или литерал
даты - первая календарная дата при вычислении разности дат;
    Date2 - обязательный аргумент типа Variant(Date) или литерал
даты - вторая календарная дата при вычислении разности дат;
    FirstDayOfWeek - необязательный аргумент типа Long, опре-
деляющего день недели, допускается использование констант;
    vbUseSystem=0 - используется значение национальных сис-
темных установок:
   vbSunday=1 - воскресенье(по умолчанию),
   vbMonday=2 - понедельник,
   vbTuesday=3 - вторник,
   vbWednesday=4 - среда,
   vbThursday=5 - четверг,
   vbFriday=6 - пятница,
   vbSaturday - суббота;
   FirstWeekOfYear - необязательный аргумент - числовая кон-
станта, указывающая, какой день недели считать первым;
    vbUseSystem=0 используется системная информация;
    vbFirstJan1=1 неделя, содержащая 1 января;
    vbFirstFourDays=2 первая неделя, содержащая как минимум 4
дня нового года;
    vbFirstFullWeek=3 Первая полная неделя года.

   Пример.

    ' Вычислить сколько дней осталось до 21 века
   Dim Today as Date     ' сегодняшний день
   Dim Millenium As Date ' 1 день 21 века
                               32

Страницы