Руководство пользователя

  1. Описание.
    Каждый из фреймов этого документа создан с помощью последней версией конструктора "Михаил" и демонстрирует возможности конструктора.
  2. Назначение.
    Эта оперативная помощь по VBS предназначена для применения и изучения языка скриптов VBS. Применение языка осуществляется вставкой фрагментов языка и примеров в текст редактируемого скрипта и иллюстративным выполнением примеров. Для изучения языка приведенны элементы языка,фрагменты, примеры и комментарии.
  3. Порядок работы
  4. Teг SCRIPT
    Все тексты скриптов должны располагаться внутри этого тега, если вы работаете в окне редактирования "головы" или скриптов объекта "HTML". При этом вставка скрипт-кодов в тег SCRIPT осуществляется автоматически. Тексты скриптов-обработчиков событий могут располагаться в самих тегах.
    Примеры тега для VBSCRIPT:
    <SCRIPT LANGUAGE=VBSCRIPT>
    <!--
     ' Здесь размещаются скрипты на VBS.
     -->
    </SCRIPT>
    <SCRIPT LANGUAGE=VBS>
    <!--
     ' Здесь размещаются скрипты на VBS.
     -->
    </SCRIPT>
  5. ПРОЦЕДУРЫ VBS.
    Словом Rem начинаются комментарии в текстах примеров-шаблонов.
  6. Правила для имен переменных.
  7. Типы и подтипы данных.
    В VBS существует тоько один тип данных - вариант. Существуют следующие подтипы варианта:
  8. Присвоение значений.
    Имя_переменной=значение.
    Dev1=1234.56
    Dev2="1123"
    Dev3=False
  9. Присвоение и удаление ссылки
    Ссылка это указатель на объект, с помощью котрой осуществляется доступ к свойствам, методам и коллекциям объектов. Для более полного ознакомления с объектами используй "Оперативная помощь по HTML".
  10. Область действия.
    Все переменный, которые объявлены явно (Dim) или неявно (без Dim, присвоением значения), вне подпрограмм, или функций являются глобальными.
    Переменные, которые не совпадают по имени с глобальными и объявлены явно, или неявно, внутри подпрограммы или функции действуют только внутри их.
  11. Массивы.
  12. КОНСТАНТЫ.
  13. Константы системных цветов.
  14. Константы сравнения.
  15. Константы даты и времени.
  16. Константы форматов даты и времени.
  17. Строковые константы.
  18. Логические константы.
  19. Константы типа переменной.
    Тип переменной возвращается следующей функцией:
    VarType("Это строковая переменная,константа типа=vbString или 8.")
  20. Арифметические операторы
  21. Операторы сравнения.
    Cписок операторов сравнения и условия, при которых результат имеет значение True, False, Null:
    операторы True False Null
    <, less x<y x>=y x or y=Null
    <=, less or equal x<=y x>y x or y=Null
    >, more x>y x<=y x or y=Null
    >=, more or equal x>=y x<y x or y=Null
    =, equal x=y x<>y x or y=Null
    <>, not equally x<>y x=y x or y=Null
    РЕКОМЕНДАЦИЯ: При вставке скрипт-кода в объект HTML, в тег SCRIPT, не используй операторы сравнения < и >, взамен используй <= и >=. Это позволит вставке работать корректно.
  22. Оператор слияния строк.
    & - используется для слияния двух строковых выражений.
    msgbox "Hello !"&"Mr. X"
  23. УПРАВЛЯЮЩИЕ ОПЕРАТОРЫ.
  24. ОПЕРАТОРЫ ВЕТВЛЕНИЯ:
  25. If,,,Then.
    if условие then операторы,
    если условие имеет значение "истина", выполнить "операторы",если "ложь" ничего не делать.
    ПРИМЕР 1 - напечатать сообщение, применив односторчный оператор безусловно:
    If true Then Msgbox "В одну строку"
    if условие then
    операторы
    end if

    ПРИМЕР 2 - напечатать сообщение, применив многострочный оператор безусловно:
    If true Then
    Msgbox "В несколько строк"
    End if
  26. If,,,Then,,,Else.
    if условие then
    операторы_1
    else
    операторы_2
    end if
    ,
    если условие истино то, выполнить "операторы_1",если условие ложно, то выполнить "операторы_2".
    ПРИМЕР - переменной присвоить логичестий подтип, если значение перменной true выдать "Выражение истинно", иначе выдать "Выражение ложно":
    dev1=3>=5
    If dev1 then
    msgbox "Выражение истинно"
    else
    msgbox "Выражение ложно"
    end if
  27. If,,,Then,,,ElseIf.
    if условие_1 then
    операторы_1
    elseif условие_2 then
    операторы_1
    elseif условие_3 then
    операторы_1
    ...
    else
    операторы_N
    end if
    ,
    если "условие_1" истино то, выполнить "операторы_1",если "условие_1" ложно, то проверить "условие_2". Если "условие_2" истино, то выполнить "операторы_2", если "условие_2" ложно проверить "условие_3", и.т.д., если ни одно из условий не "истина", то выполнеить "операторы_N"
    ПРИМЕР - переменной присвоить значение, проанализировать значение переменной на вхождение в интервалы >=10,<=7 и выдать результат анализа:
    dev1=5
    If dev1>=10 then
    msgbox "dev1>=10"
    elseif  dev1<=7 Then
    msgbox "dev1<=7"
    else
    msgbox "ни одно условие не выполнено"
    end if
  28. Select Case.
    Select case выражение DEVY
    case выражение1
    операторы_1
    case выражение2,выражение3
    операторы_2
    ...
    case else
    операторы_N
    end select
    ,
    вычисляется значение выражения DEVY, для объяснения назовем это значение ZDEVY. Затем ZDEVY сравнивается с значением "выражени1", если они равны, то выполняются "операторы_1" и работа заканчивается, если не равны то, сравнивается ZDEVY с значениями "выражение2" и "выражение3". Если ZDEVY равно одному из сравниваемых значений, то выполняются "операторы_2" и работа заканчивается , если не равны, выполняются сравнения ZDEVY с одним, или несколькими значениями выражений в следующей строке и.т.д. Если ZDEVY не сравнилось ни с одним значением выражения в последующих строках case, то выполняются "операторы_N" и работа заканчивается,
    ПРИМЕР - анализировать значение переменной и выдать разные сообщения при выполнении следующих условий: значение переменной=1;значение переменной=2 или 3; значение переменной не равно ни 1 ни 2 ни 3:
    dev1=1
    Select Case dev1
    Case 1
    msgbox "Значение переменной равно 1"
    Case 2,3
    msgbox "Значение переменной равно 2 или 3"
    Case Else
    msgbox "Значение переменной любое кроме 1 или 2 или 3."
    End Select
  29. ОПЕРАТОРЫ ЦИКЛОВ:
  30. Do While,,,Loop.
    do while условие
    операторы
    loop
    ,
    выполнять операторы пока "условие" имеет значение "истина", если условие имеет значение "ложь", то цикл может не выполниться ни одного раза. Операнды, определяющие условие, должны меняться при выполнении операторов, в противном случае получается бесконечный цикл. Если возникло подозрение на бесконечный цикл, заверши работу нажатием ALT+CTRL+DEL, повторно запусти конструктор, проанализируй выполняемые циклы, вставь дополнительные отладочные условия выхода из цикла.
    ПРИМЕР - выполнить цикл 3 раза выдавая сообщение при каждом выполнении:
    dev=1
    Do while dev<=3
    msgbox "Выполнение "&dev&", всего выполнений 3."
    dev=dev+1
    Loop
  31. Do Until,,,Loop.
    do until условие
    операторы
    loop
    .
    Выполнять "операторы" пока условие не станет "истиной".
    Если условие имеет значение "истина", то цикл может не выполниться ни одного раза. Операнды, определяющие условие, должны меняться при выполнении операторов, в противном случае получается бесконечный цикл. Если возникло подозрение на бесконечный цикл, заверши работу нажатием ALT+CTRL+DEL, повторно запусти конструктор, проанализируй выполняемые циклы, вставь дополнительные отладочные условия выхода из цикла .
    ПРИМЕР - выполнить цикл 3 раза выдавая сообщение при каждом выполнении:
    dev=1
    Do until dev>=4
    msgbox "Выполнение "&dev&", всего выполнений 3."
    dev=dev+1
    Loop
  32. Do,,,Loop While.
    do
    операторы
    loop while условие
    .
    Выполнить "операторы", проверить условие и, если оно имеет значение "истина", выполнить "операторы". Далее действовать так, пока "условие" имеет значение "истина". Цикл будет выполнен как минимум один раз обязательно. Операнды, определяющие условие, должны меняться при выполнении операторов, в противном случае получается бесконечный цикл. Если возникло подозрение на бесконечный цикл, заверши работу нажатием ALT+CTRL+DEL, повторно запусти конструктор, проанализируй выполняемые циклы, вставь дополнительные отладочные условия выхода из цикла
    ПРИМЕР - выполнить цикл 3 раза выдавая сообщение при каждом выполнении:
    dev=1
    Do
    msgbox "Выполнение "&dev&", всего выполнений 3."
    dev=dev+1
    Loop While dev<=3
  33. Do,,,Loop Until.
    do
    операторы
    loop until условие
    .
    Выполнить "операторы", проверить "условие" и, если оно имеет значение "ложь", выполнить "операторы". Далее действовать так, пока "условие" имеет значение "ложь". Операнды, определяющие условие, должны меняться при выполнении операторов, в противном случае получается бесконечный цикл. Если возникло подозрение на бесконечный цикл, заверши работу нажатием ALT+CTRL+DEL, повторно запусти конструктор, проанализируй выполняемые циклы, вставь дополнительные отладочные условия выхода из цикла.
    ПРИМЕР - выполнить цикл 3 раза выдавая сообщение при каждом выполнении:
    dev=1
    Do
    msgbox "Выполнение "&dev&", всего выполнений 3."
    dev=dev+1
    Loop Until dev>=4
    В отличии от DoWhile,,,Loop при любом условии выполнится один раз.
  34. While,,,Wend
    while условие
    операторы
    wend

    Выполнять "операторы" пока "условие" имеет значение "истина". Операнды, определяющие условие, должны меняться при выполнении операторов, в противном случае получается бесконечный цикл. Если возникло подозрение на бесконечный цикл, заверши работу нажатием ALT+CTRL+DEL, повторно запусти конструктор, проанализируй выполняемые циклы, вставь дополнительные отладочные условия выхода из цикла.
    ПРИМЕР - выполнить цикл 3 раза выдавая сообщение при каждом выполнении:
    dev=1
    While dev<=3
    msgbox "Выполнение "&dev&", всего выполнений 3."
    dev=dev+1
    Wend
  35. For,,,Next.
    FOR переменная_цикла=начальное_значение TO конечное_значение STEP  шаг_изменения переменной_цикла
    операторы
    next
    .
    Выполнять "операторы" пока "переменная_цикла" не достигнет "конечное_значение". "Переменная_цикла" изменяется автоматически от "начальное_значение" до "конечное_значение" с шагом "шаг_изменения".
    ПРИМЕР - выполнить цикл 3 раза выдавая сообщение при каждом выполнении:
    for dev=1 to 3 step 1
    msgbox "Выполнение "&dev&", всего выполнений 3."
    next
  36. For Each,,,Next.
    FOR EACH ссылка_на_объект IN коллекция
    операторы
    next
    .
    Просмотреть все объекты "коллекция", при каждом просмотре выполнять "операторы".
    ПРИМЕР - перебрать все объекты "button" в документе с выдачей для каждого объекта его номера и начала html-кода:
    Set dev=document.all.tags("BUTTON")
    For Each devi In dev
    msgbox "Объект N "&devi.sourceindex&vbcr&" HTML-код: "&vbcr&left(devi.outerhtml,50)
    next
  37. FUNCTIONS VBS:
  38. FUNCTIONS OF ARRAY:
  39. LBound
    LBound(arrayname[, dimension]) - Returns the smallest available subscript for the indicated dimension of an array. Always returns 0.Arguments:
    • arrayname - Name of the array variable.
    • dimension - Whole number indicating which dimension's lower bound is returned. Use 1 for the first dimension, 2 for the second, and so on. If dimension is omitted, 1 is assumed.
  40. UBound
    UBound(arrayname[, dimension])-Returns the largest available subscript for the indicated dimension of an array. Arguments:
    • arrayname - name of the array variable.
    • dimension - Whole number indicating which dimension's upper bound is returned. Use 1 for the first dimension, 2 for the second, and so on. If dimension is omitted, 1 is assumed.
  41. FUNCTIONS OF TRANSFORMATION:
    Asc AscB AscW Chr ChrB
    ChrW CBool Cbyte CDbl Cint
    Clng CStr CSng Fix Hex
    Int Oct Sgn Round
  42. Asc
    Asc(string) Возвращает ANSI код первого символа в выражении символьного подтипа string. Если выражение string не символьного подтипа, то при выполнении возникает ошибка.
  43. AscB
    AscB(string) - возвращает первый байт из последовательности байтов выражения символьного или байтового выражения string.
  44. AscW
    AscW(string) - Возвращает Unicode (wide) код символа. Выполняется на 32-битовых платформах, использующих Unicode символы.
  45. Chr
    Chr(charcode) - возвращает ANSI символ по его числовому коду. Аргументом долно быть выражение числового подтипа.
  46. ChrB
    ChrB(charcode) - Возвращает ANSI символ по его байтовому коду. Аргументом должно быть выражение символьного или байтового подтипа.
  47. ChrW
    ChrW(code) - Возвращает ANSI символ полученный преобразованием из wide символа. Используется на 32-битовый поатформах.
  48. CBool
    CBool(expression) - Возвращает выражение, которое преобразовано к подтипу Boolean. Аргумент - любое выражение.
  49. Cbyte
    Cbyte(expression) - Возвращает выражение, которое преобразовано к подтипу Byte. Аргумент - любое выражение.
  50. CDbl
    CDbl(expression) - Возвращает выражение, которое преобразовано к подтипу Double. Аргумент - любое выражение одного из числового подтипа.
  51. Cint
    Cint(expression) Возвращает выражение, которое преобразовано к подтипу Integer. Аргумент - любое выражение одного из числового подтипа.
  52. Clng
    Clng(expression) Возвращает выражение, которое преобразовано к подтипу Long. Аргумент - любое выражение одного из числового подтипа.
  53. CStr
    CStr(expression) Возвращает выражение, которое преобразовано к подтипу String. Аргумент - любое допустимое выражение.
  54. CSng
    CSng(expression) Возвращает выражение, которое преобразовано к подтипу Single. Аргумент - любое выражение одного из числового подтипа.
  55. Fix
    Fix(number) - Возвращает целую часть числа. Аргумент - любое допустимое выражение одного из числовых подтипов. Если аргумент имеет значение Null, то возвращается значение Null.
  56. Hex
    Hex(number) - Возвращает строку, которая есть значение числа в шестнадцатиричной системе. Аргумент - допустимое выражение одного из числовых подтипов.
  57. Int
    Int(number) - Возвращает целую часть числа. Аргумент - любое допустимое выражение одного из числовых подтипов. Если аргумент имеет значение Null, то возвращается значение Null.
  58. Oct
    Oct(number) Возвращает строку, которая есть значение числа в восьмеричной системе. Аргумент - допустимое выражение одного из числовых подтипов.
  59. Round
    Round(expression[, numdecimalplaces]) - Возвращает число, округленное до заданной точности.
  60. Sgn
    Sgn(number) - Возвращает целое число в зависимости от знака аргумента. Аргумент - любое допустимое выражение одного из числовых подтипов.
    Результат выражения Возвращаемое значение
    0 0
    <0 -1
    >0 1
  61. FUNCTIONS OF DATE AND TIME:
    Date DateAdd DateDiff DatePart
    DateSerial DateValue Day Hour
    Minute Month MonthName Now
    Second Time TimeSerial TimeValue
    Weekday WeekdayName
  62. ФУНКЦИИ VBS.
    1. Преобразования.
      1. Asc("12345")- возвращает кодовый номер первого символа в строке
      2. AscB("12345")- возвращает кодовый номер первого байта в последовательности байтов.
      3. AscW("12345")- возвращает кодовый номер первого символа в строке кодов Wide.
      4. Chr(100)- возвращает символ по его коду.
      5. ChrB(100) - возвращает байт по коду.
      6. ChrW(100)- возвращает код wide по коду.
      7. CBool(-1)-преобразовывает тип переменной в логический тип.
      8. Cbyte("128")-преобразует тип переменной в тип байт.
      9. CDbl("12345")-преобразует тип переменной в тип двойной точности.
      10. Cint("12345")-преобразует тип переменной в тип целого числа.
      11. Clng("12345")-преобразует тип переменной в тип длинного целого числа.
      12. sng("12345")-преобразует тип переменной в тип числа обычной точности.
      13. CStr(25.25)-преобразует тип переменной в символный тип.
      14. Fix(17.11)-возвращает целую часть числа.
      15. Hex(16)-преобразует тип переменной в 16-ый тип.
      16. Int(17.23)-возвращает целую часть числа.
      17. Oct(17)-преобразует тип переменной в восьмеричный тип.
      18. Round(1.128,2)-округляет число до заданной точности.
      19. Csgn(-125)-возвращает целое число отражающее знак аргумента.
    2. Даты/Времени.
      1. Date()- возвращает текущую системную дату.
      2. DateAdd(интервал, количество, дата) - возвращает дату с добавлением или вычитанием "количества" временного "интервала" относительно "дата".Допустимы следующие значения интервала:
        1. DateAdd("yyyy",1,"01.01.2000") - год
        2. DateAdd("Q",1,"01.01.2000") - квартал
        3. DateAdd("m",1,"01.01.2000") - месяц
        4. DateAdd("y",1,"01.01.2000") - день года
        5. DateAdd("d",1,"01.01.2000") - день месяца
        6. DateAdd("w",1,"01.01.2000") - день недели
        7. DateAdd("H",1,"01.01.2000 00:00:00") - часы.
        8. DateAdd("N",1,"01.01.2000 00:00:00") - минуты.
        9. DateAdd("S",1,"01.01.2000 00:00:00") - секунды.
      3. DateDiff(интервал, date1, date2[, firstdayofweek[, firstweekofyear]])- возвращает число "интервал" между двумя датами "date1" "date2".
        Допустимы следующие значения интервала:
        1. DateDiff("yyyy","01.01.2000","01.01.2001") - год
        2. DateDiff("Q","01.01.2000","01.01.2001") - квартал
        3. DateDiff("m","01.01.2000","01.01.2001") - месяц
        4. DateDiff("y","01.01.2000","01.01.2001") - день года
        5. DateDiff("d","01.01.2000","01.01.2001") - день месяца
        6. DateDiff("w","01.01.2000","01.01.2001") - день недели
        7. DateDiff("H","01.01.2000","01.01.2001") - часы.
        8. DateDiff("N","01.01.2000","01.01.2001") - минуты.
        9. DateDiff("S","01.01.2000","01.01.2001") - секунды.
        Параметр firstdayofweek необязательный. Это константа, указывающая первый день недели.Допустимы следующие значения:
        1. VbSunday или 1 - Воскресенье (по умолчанию).
        2. VbMonday или 2 - Понедельник.
        3. VbTuesday или 3 - Вторник.
        4. VbWednesday или 4 - Среда.
        5. VbThursday или 5 - Четверг.
        6. VbFriday или 6 - Пятница.
        7. VbSaturday или 7 - Суббота
        Параметр firstweekofyear необязательный. Это константа, указывающая первую неделю года. Допустимы следующие значения:
        1. VbFirstJan1 или 1 Неделя, которая содержит 1 января (по умолчанию).
        2. VbFirstFourDays или 2 Первая неделя, которая содержит по крайней мере четыре дня нового года.
        3. VbFirstFullWeek или 3 Первая полная неделя года.
        Дополнительные сведения
        Функция DateDiff предназначена для определения числа указанных временных интервалов между двумя датами. Например, с помощью этой функции можно вычислить число дней между двумя датами или число недель между текущей датой и концом года. Для вычисления числа дней между датами date1 и date2 можно использовать временные интервалы типа день года ("y") или день месяца ("d"). Если interval задается как день недели ("w"), возвращается число недель между двумя датами. Если date1 соответствует понедельнику, подсчитывается число понедельников между date1 и date2. При этом date2 учитывается, а date1 нет. Если interval задается в неделях ("ww"), функция DateDiff возвращает число календарных недель между двумя датами, т.е. число воскресений между date1 и date2. При этом дата date2 учитывается (если ей соответствует воскресенье), а date1 нет (даже если ей соответствует воскресенье). Если date1 определяет дату, более позднюю, чем date2, возвращается отрицательное значение.
        Аргумент firstdayofweek влияет на вычисления, использующие временные интервалы типа "w" и "ww". Если дата задается как литерал даты, указанный год становится постоянной частью даты. Однако если дата заключается в прямые кавычки (" "), а год опущен, то при каждом вычислении выражения даты в него будет подставляться текущий год. Это позволяет написать код, который может использоваться в течение нескольких лет. При сравнении дат 31 декабря и 1 января следующего года функция DateDiff для интервала типа год ("yyyy") возвращает значение 1, хотя разница между датами составляет всего один день.
      4. DatePart(interval, date[,firstdayofweek[, firstweekofyear]]) - возвращает значение "interval" для заданной даты "date".
        Допустимы следующие значения интервала:
        1. DatePart("yyyy","01.01.2001") - год
        2. DatePart("Q","01.01.2001") - квартал
        3. DatePart("m","01.01.2001") - месяц
        4. DatePart("y","01.01.2001") - день года
        5. DatePart("d","01.01.2001") - день месяца
        6. DatePart("w","01.01.2001") - день недели
        7. DatePart("H","01.01.2001 01:00:00") - часы.
        8. DatePart("N","01.01.2001 01:01:00") - минуты.
        9. DatePart("S","01.01.2001 01:01:59") - секунды.
        Параметр firstdayofweek необязательный. Это константа, указывающая первый день недели.Допустимы следующие значения:
        1. VbSunday или 1 - Воскресенье (по умолчанию).
        2. VbMonday или 2 - Понедельник.
        3. VbTuesday или 3 - Вторник.
        4. VbWednesday или 4 - Среда.
        5. VbThursday или 5 - Четверг.
        6. VbFriday или 6 - Пятница.
        7. VbSaturday или 7 - Суббота
        Параметр firstweekofyear необязательный. Это константа, указывающая первую неделю года. Допустимы следующие значения:
        1. VbFirstJan1 или 1 - Неделя, которая содержит 1 января (по умолчанию).
        2. VbFirstFourDays или 2 - Первая неделя, которая содержит по крайней мере четыре дня нового года.
        3. VbFirstFullWeek или 3 - Первая полная неделя года.
        Дополнительные сведения.
        Функция DatePart предназначена для определения указанного компонента даты. Например, с помощью этой функции можно определить день недели или текущий час. Аргумент firstdayofweek влияет на вычисления, использующие временные интервалы типа "w" и "ww". Если дата задается как литерал даты, указанный год становится постоянной частью даты. Однако если дата заключается в прямые кавычки (" "), а год опущен, то при каждом вычислении выражения даты в него будет подставляться текущий год. Это позволяет написать код, который может использоваться в течение нескольких лет.
      5. DateSerial(2002,1,1)- возвращает начение аргумента в формате Date для заданных года месяца и дня.
      6. DateValue("01.01.2001")- возвращает значение аргумента в формате Date.
      7. Day(date())- возвращает от 1 до 31 аргумента типа даты.
      8. Hour(cdate("01.01.2002 23:10:12"))-возвращает значение часов.
      9. Minute(cdate("01.01.2002 23:10:12"))-возвращает минуты.
      10. Month(cdate("01.01.2002 23:10:12"))-возвращает название месяца.
      11. MonthName(12)-возвращает название месяца.
      12. Now()- возвращает текущую дату и время.
      13. Second(time())- возвращает секунды аргумента.
      14. Time()- возвращает текущую системную дату в фориате Data.
      15. TimeSerial(24,59,59)- возвращает в формате Data,для заданных: часа, минуты, секунды.
      16. TimeValue(time())- возвращает текущую системную дату.
      17. WeekDay(date())- возвращает номер дня недели.
      18. WeekDayName(3)- возвращает название дня недели.
      19. Year(date())- возвращает год.
    3. Математические.
      1. Atn(1)- возвращает арктангенс аргумента.
      2. Cos(1)- возвращает косинус аргумента.
      3. Exp(-2)- возвращает экспоненту в стемени аргумента.
      4. Log(10)- возвращает натуральный логарифм аргумента.
      5. Randomize()-запускает генератор случайных чисел.
      6. Rnd()-возвращает случайное число в интервале 0-1, если предварительно запущен генератор случайных чисел.
      7. Sin(0)-возвращает синус аргумента.
      8. Sqr(4)-возвращает квадратный корень аргумента.
      9. Tan(0)-возвращает тангенс аргумента.
    4. Управления объектами.
      1. CreateObject()-создает и возвращает ссылку на объект ActiveX.
      2. GetObject()-возвращает ссылку на объект ActiveX.
      3. LoadPicture()- возвращает графический объект.
    5. Коды интерпритатора.
      1. ScriptEngine() - возвращает основной, дополнительный номера версии интерпритатора.
      2. ScriptEngineMajorVersion() - возвращает основной номер версии интерпритатора.
      3. ScriptEngineMinorVersion() - возвращает дополнительный номер версии интерпритатора.
      4. ScriptEngineBuildVersion() - возвращает номер интерпритатора.
    6. Строковые.
      1. Filter() - возвращает массив, отобранный по заданному критерию из заданного массива строк.
        ПРИМЕР - из строки "1/2/3/4/5/abc/1" создать массив ращеплением по символу "/", из полученного массива сформировать массив включив в него только элементы с значением равным 1, покзать результат:
        devmas="1/2/3/4/5/abc/1"
        devmas1=split(devmas,"/")
        devmas2=filter(devmas1,1)
        msgbox join(devmas2)
      2. FormatCurrency(число) - возвращает число в формате денежной суммы, округляет до копейки.
        ПРИМЕР - посмотреть число в денежном формате:
        msgbox FormatCurrency(12.127)
      3. FormatDateTime(строка) - возвращает строку в формате даты и времени.
        ПРИМЕР - посмотреть строку в формате даты:
        msgbox FormatDateTime("01.01.2001 00:01:12")
      4. FormatNumber(строка_число) - возвращает строку как число.
        ПРИМЕР - посмотреть строку в формате числа:
        msgbox FormatNumber("123435,339")
      5. FormatPercent(число) - возвращает число как процент.
        ПРИМЕР - посмотреть число в формате процентов:
        msgbox Formatpercent(0.12)
      6. Instr(строка,подстрока) - возвращает позицию начала первого расположения подстроки внутри строки.
        ПРИМЕР - найти позицию пятерки в строке "1234567890":
        msgbox Instr("1234567890","5")
      7. InstrB(строка_байтов,подстрока_байтов) - возвращает позицию начала подстроки_байтов в строке байтов.
        ПРИМЕР - найти позицию байта пятерки в строке "1234567890":
        msgbox InstrB("1234567890","5")
      8. InstrRev(строка,подстрока) - возвращает позицию с конца строки начала подстроки в строке.
        ПРИМЕР - найти значение позиции девятки в строке "0987654321" и показать результат:
        msgbox InstrRev("1234567890","9")
      9. Join(массив) - возвращает строку как объединение всех строк массива.
        ПРИМЕР - расщепить строку "1/2/3/4/5" по символу "/", объединить полученный массив и показать результат:
        devmas="1/2/3/4/5"
        devmas1=split(devmas,"/")
        msgbox join(devmas1)
      10. Lcase(строка) - преобразует все символы строки в строчные символы.
        ПРИМЕР - преобразовать заглавные символы строки "HELLO !" в строчные и показать результат:
        msgbox Lcase("HELLO !")
      11. Left(строка) - возвращает заданное количество символов от начала строки.
        ПРИМЕР - получить из строки "abcde" строку из первых трех символов и показать результат:
        devleft=Left("abcde",3)
        msgbox devleft
      12. LeftB(строка_байтов) - возвращает заданное количество байтов от левого конца последовательности байтов.
        ПРИМЕР - преобразовать число 12345678 в 16 систему исчисления, показить первые четыре байта и показать само число в 16 системе:
        devleft1=hex(12345678)
        devleft2=leftb(devleft1,4)
        msgbox devleft2&"/"&devleft1
      13. Len(строка) - возвращает количество символов в строке.
        ПРИМЕР - показать число символов строки "abcde":
        msgbox Len("abcde")
      14. LenB(строка_байтов) - возвращает количество байтов в последовательности.
        ПРИМЕР - показать число байтов строки "abcde":
        msgbox LenB("abcde")
      15. Ltrim(строка) - удаляет пробелы в начале стоки.
        ПРИМЕР - удалить начальные пробелы строки " abcde" и показать результат:
        msgbox Ltrim(" abcde")
      16. Mid(строка,начало,количество) - возвращает заданное количество символов из заданного места строки.
        ПРИМЕР - из строки " abcde" взять два символа начиная с третьего и показать результат:
        msgbox Mid("abcde",3,2)
      17. MidB(байты,начало,количество) - возвращает заданное количество байтов из заданного места в последовательности байтов.
        ПРИМЕР - из строки " abcde" взять четыре байта начиная с третьего и показать результат:
        msgbox Midb("abcde",3,4)
      18. Replace(строка,подстрока1,подстрока2) - в всей стоке заменяет подстроку1 на подстроку2.
        ПРИМЕР - в строке "a/b/c/d/e" символ "/" заменить на символ "*" и показать результат:
        msgbox Replace("a/b/c/d/e","/","*")
      19. Right(строка,количество) - возвращает заданное количество символов с конца строки.
        ПРИМЕР - получить из строки "abcde" строку из последних трех символов и показать результат:
        devleft=right("abcde",3)
        msgbox devleft
      20. RightB(строка_байт,количество) - возвращает заданное количество байтов с конца последовательности.
        ПРИМЕР - преобразовать число 12345678 в 16 систему исчисления, показить последние четыре байта и показать само число в 16 системе:
        devleft1=hex(12345678)
        devleft2=rightb(devleft1,4)
        msgbox devleft2&"/"&devleft1
      21. Rtrim(строка) - удаляет конечные пробелы в строке.
        ПРИМЕР - удалить из строки "abcde " конечные пробелы и показать результат:
        msgbox rtrim("abcde ")
      22. Space(количество) - возвращает строку из заданного количества пробелов.
        ПРИМЕР - в строке "abcde" после первого символа добавить три пробела и показать результат:
        msgbox "a"&space(3)&"bcde"
      23. Split(строка) - расщепляет строку по заданной последовательности символов и возвращает одномерный массив из полученных осколков.
        ПРИМЕР - расщепить строку "1/2/3/4/5" по символу "/", объединить полученный массив и показать результат:
        devmas="1/2/3/4/5"
        devmas1=split(devmas,"/")
        msgbox join(devmas1)
      24. StrComp(строка1,строка2) - возвращает значение, отражающее результат сравнения заданных строк:
        • -1 если строка1 меньше чем строка2
        • 0 если строка1 равняется строка2
        • 1 если строка1 больше чем строка2
        • Null если строка1 или строка2 имеет значение Null
        ПРИМЕР - сравнить одинаковые строки и показать результат сравнения:
        msgbox StrComp("abc","abc")
      25. String(количество) - возвращает строку из заданного количества одного заданного символа.
        ПРИМЕР - показать строку из 10 символов "*":
        msgbox String(10,"*")
      26. StrReverse(строка) - возвращает стоку, у которой порядок символов, с начала в конец, заменен на порядок с конца к началу.
        ПРИМЕР - показать строку обратную строке символов "12345":
        msgbox StrReverse("12345")
      27. Trim(строка) - удаляет в строке начальные и конечные пробелы.
        ПРИМЕР - у строки строке символов " 12345 " удалить конечные пробелы и показать результат:
        devtrim=trim( "  12345  ")
        msgbox devtrim&" символов="&len(devtrim)
      28. Ucase(строка) - все символы в строке заменяет на заглавные.
        ПРИМЕР - преобразовать заглавные символы строки "hello !" в строчные и показать результат:
        msgbox Ucase("hello !")
    7. Проверки переменных.
      1. IsArray(имя_переменной) - возвращает True, если переменная, имя которой указано в параметре, есть массив, и False в противном случае.
      2. IsDate(имя_переменной) - возвращает True, если переменная, имя которой указано в параметре, имеет тип даты и False в противном случае.
      3. IsEmpty(имя_переменной) - возвращает True, если переменной, имя которой указано в параметре, было задано значение, и False в противном случае.
      4. IsNull(имя_переменной) - возвращает True, если переменная, имя которой указано в параметре, имеет некорректное значение, и False в противном случае.
      5. IsNumeric(имя_переменной) - возвращает True, если переменная, имя которой указано в параметре, имеет тип числа, и False в противном случае.
      6. IsObject(имя_переменной) - возвращает True, если переменная, имя которой указано в параметре, имеет тип объекта, и False в противном случае.
      7. VarType(имя_переменной) - возвращает тип переменной как число.
        Для просмотра чисел щелкни:
        Константы типа переменной.
  63. Объявление переменных.
    Dim dev1,dev2,dev3-объявляет явно одну, или несколько переменных.
  64. Обработка ошибок.
    ПРИМЕР - создать ошибку извлечением корня квадратного из отрицательного числа и выдать код ошибки:
    On Error Resume Next
    dev1=sqr(-2)
    if err<>0 then
    msgbox err
    end if
    Комментарий к примеру:
    строка1 - игнорировать ошибку
    строка2 - создаем ошибку
    строка3 - анализируем код ошибки и если ошибка есть
    строка4 - показываем ее код.
  65. ВВОД~ВЫВОД.
  66. msgbox.
    Выдает сообщение и может возвращать значение в зависимости от того какая кнопка была нажата.
    Заполни поля и щелкни нужную кнопку.
    Заголовок
    Содержание
    Таблица выбора вида MSGBOX
    Кнопки Выб
    рать
    Константа
    OK vbOkOnly или 0
    Ok,Cancel vbOkCancel или 1
    Abort,Retry,Ignore vbAbortRetryIgnore или 2
    Yes,No,Cancel vbYesNoCancel или 3
    Yes,NO vbYesNO или 4
    Retry,Cancel vbRetryCancel или 5
    активна первая vbDefaultbutton1 или 0
    активна вторая vbDefaultbutton2 или 256
    активна третья vbDefaultbutton3 или 512
    активна четвертая vbDefaultbutton4 или 768
    Без картинки .
    Важно vbCritical или 16
    Вопрос vbQuestion или 32
    Предупреждение vbExclamation или 48
    Информация vbInformation или 64
    Возвращаемые значения функции MSGBOX.
    (Нажата кнопка - Константа - Значение)
    1. OK -vbOK - 1
    2. Cancel - vbCancel - 2
    3. Abort - vbAbort - 3
    4. Retry - vbRetry - 4
    5. Ignore - vbIgnore - 5
    6. Yes - vbYes - 6
    7. No - vbNo - 7
  67. inputbox.
    Вводит текстовую строку.
    1. Заголовок........
    2. Инструкция.....
    3. По умолчанию
    4. Для расположения окна ввода по центру следующие пункты не вводить.
    5. X окна ввода...
    6. Y окна ввода...
  68. Комментарии.
    Комментарии в VBS являются ' или rem.
    ПРИМЕЧАНИЕ: комментарии в скрипте, который в теге запрещены.
  69. Принудительное объявление переменных.
    Option Explicit
    Для избежания ошибок с применением переменных рекомендуется в начале скрипта ввести этот операнд.При этом все переменные до их применения должны быть явно описаны операндом DIM.