Основы офисного программирования и язык VBA

Упражнение 1:

Номер 1

Сколько операторов разрешается располагать в одной строке в VBA?

Ответ:

(1) несколько

(2) один

(3) два

Номер 2

Как разделяются между собой операторы, стоящие в одной строке в VBA?

Ответ:

(1) точкой с запятой

(2) подчеркиванием

(3) двоеточием

(4) знаком &

(5) пробел-подчеркивание

Номер 3

Как можно продолжить оператор на следующую строку в VBA?

Ответ:

(1) точкой с запятой

(2) подчеркиванием

(3) двоеточием

(4) знаком &

(5) пробел-подчеркивание

Упражнение 2:

Номер 1

Как обозначаются комментарии в VBA?

Ответ:

(1) комментарий начинается знаком //

(2) комментарий начинается знаком точка с запятой

(3) комментарий начинается знаком апострофа (‘)

(4) комментарий начинается знаком &

(5) комментарий начинается ключевым словом Rem

Номер 2

С помощью какого оператора происходит "обычное" присвоение значения выражения переменной или свойству?

Ответ:

(1) Let

(2) LSet

(3) RSet

(4) :=

(5) Set

Номер 3

С помощью какого оператора происходит присваивание значения строковой переменной с выравниванием справа?

Ответ:

(1) Let

(2) LSet

(3) RSet

(4) :=

(5) Set

Упражнение 3:

Номер 1

Какой оператор производит разбор случаев и в зависимости от значения анализируемого выражения выбирает и исполняет одну из последовательностей операторов?

Ответ:

(1) If

(2) Select Case

(3) Set

(4) Let

Номер 2

Какой оператор является оператором управления вычислениями и позволяет выбирать и выполнять действия в зависимости от истинности некоторого условия?

Ответ:

(1) If

(2) Select Case

(3) Set

(4) Let

Номер 3

Какой оператор применим при работе с объектами, устанавливает ссылку на вновь созданный или существующий объект?

Ответ:

(1) Let

(2) LSet

(3) RSet

(4) :=

(5) Set

Упражнение 4:

Номер 1

Какой цикл позволяет повторять группу операторов заданное число раз?

Ответ:

(1) For Next

(2) Do...Loop

(3) While...Wend

(4) For Each...Next

Номер 2

Какой цикл повторяет блок операторов, пока заданное условие является истинным или пока оно не станет истинным

Ответ:

(1) For Next

(2) Do...Loop

(3) While...Wend

(4) For Each...Next

Номер 3

Какой цикл повторяет выполнение последовательности операторов, пока заданное условие не станет ложным?

Ответ:

(1) For Next

(2) Do...Loop

(3) While...Wend

(4) For Each...Next

Упражнение 5:

Номер 1

Какой оператор языка VBA изменяет текущий диск?

Ответ:

(1) ChDrive

(2) ChDir

(3) MkDir

(4) Name

(5) RmDir

Номер 2

Какой оператор языка VBA создает каталог?

Ответ:

(1) ChDrive

(2) ChDir

(3) MkDir

(4) Name

(5) RmDir

Номер 3

Какой оператор языка VBA удаляет каталог?

Ответ:

(1) ChDrive

(2) ChDir

(3) MkDir

(4) Name

(5) RmDir

Упражнение 6:

Номер 1

После выполнения команд 
ChDrive "С": ChDir "D:\TMP" какой диск будет текущим?

Ответ:

(1) С

(2) D

(3) ни один из них

Номер 2

Что произойдет после выполнения команды 
SetAttr ABC.doc, VbHidden?

Ответ:

(1) файл ABC.doc станет доступным только для чтения

(2) файл ABC.doc станет системным

(3) файл ABC.doc станет скрытым

(4) файл ABC.doc станет недоступным только для чтения

Номер 3

Что произойдет после выполнения команды 
SetAttr ABC.doc, vbReadOnly?

Ответ:

(1) файл ABC.doc станет доступным только для чтения

(2) файл ABC.doc станет системным

(3) файл ABC.doc станет скрытым

(4) файл ABC.doc станет недоступным только для чтения

Упражнение 7:

Номер 1

Что произойдет, если сменить атрибут у открытого файла?

Ответ:

(1) файл изменит атрибут

(2) будет выдано сообщение об ошибке

(3) ничего не произойдет

Номер 2

Что произойдет, если сменить атрибут у закрытого файла?

Ответ:

(1) файл изменит атрибут

(2) будет выдано сообщение об ошибке

(3) ничего не произойдет

Номер 3

Что произойдет, если копировать открытый файл?

Ответ:

(1) файл будет скопирован

(2) будет выдано сообщение об ошибке

(3) ничего не произойдет

Упражнение 8:

Номер 1

With NewAcquaintance
 .Name = "Елена"
 .Age= 40
 .Height = 168
 With .LastMeeting
  .Place= "библиотека"	
  .Date= #08/03/99#
 End With
End With
Какое будет полное имя у объекта .Place?

Ответ:

(1) LastMeeting .Place

(2) Height.Place

(3) NewAcquaintance.LastMeeting.Place

Номер 2

With NewAcquaintance
 .Name = "Елена"
 .Age= 40
 .Height = 168
 With .LastMeeting
  .Place= "библиотека" 
  .Date= #08/03/99#
 End With
End With
Какое будет полное имя у объекта .Date?

Ответ:

(1) LastMeeting . Date

(2) Height. Date

(3) NewAcquaintance.LastMeeting. Date

Номер 3

With NewAcquaintance
 .Name = "Елена"
 .Age= 40
 .Height = 168
 With .LastMeeting
  .Place= "библиотека" 
  .Date= #08/03/99#
 End With
End With
Какое будет полное имя у объекта .Age?

Ответ:

(1) LastMeeting . .Age

(2) Height.Age

(3) NewAcquaintance. .Age

Упражнение 9:

Номер 1

Какой оператор может подавать звуковой сигнал?

Ответ:

(1) With

(2) Beep

(3) Date

(4) Time

(5) SendKeys

Номер 2

Какой оператор может изменять системную дату?

Ответ:

(1) With

(2) Beep

(3) Date

(4) Time

(5) SendKeys

Номер 3

Какой оператор может устанавливать системное время?

Ответ:

(1) With

(2) Beep

(3) Date

(4) Time

(5) SendKeys

Упражнение 10:

Номер 1

Какой клавише соответствует код {PGUP}?

Ответ:

(1) Ctrl

(2) PAGE DOWN

(3) PAGE UP

(4) Alt

(5) ENTER

Номер 2

Какой клавише соответствует код %?

Ответ:

(1) Ctrl

(2) PAGE DOWN

(3) PAGE UP

(4) Alt

(5) ENTER

Номер 3

Какой клавише соответствует код ^?

Ответ:

(1) Ctrl

(2) PAGE DOWN

(3) PAGE UP

(4) Alt

(5) ENTER

Основы офисного программирования и язык VBA - тест 7