Введение в информатику. Хамухин А.А. - 84 стр.

UptoLike

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

83
Таблица 3.9
Возвращаемые значения функции MsgBox
Константа
Значение
Нажатая кнопка
vbOK
1
OK
vbCancel
2
Cancel
vbAbort
3
Abort
vbRetry
4
Retry
vbIgnore
5
Ignore
vbYes
6
Yes
vbNo
7
No
Два варианта использования функции MsgBox приведены в примере:
Private Sub Pro13()
Sum = 0
o1 = MsgBox ("Является ли макрос программой?", 3, "Вопрос 1")
If o1 = 6 Then Sum = Sum + 10
'***********************************************************
o2 = InputBox("Как называется программа VBA?", "Вопрос 2", "нет")
If o2 = "макрос" Then Sum = Sum + 10
'***********************************************************
If Sum >= 20 Then
Call MsgBox("Вы набрали " & Sum & " баллов.", 0,"Результаты")
Else
Call MsgBox("Вы набрали " & Sum & " баллов. Этого мало.", 0,
"Результаты")
End If
End Sub
В первом случае MsgBox используется как функция для того, чтобы
определить, какую кнопку нажал пользователь, во втором случае MsgBox
используется как процедура для вывода результатов в окне.
3.7. Массивы
Массивы VBA и других языков программирования весьма схожи; они
незаменимы при работе с большими объемами данных. Попросту говоря, массив
это переменная, содержащая несколько значений, или еще проще
пронумерованная группа значений одного и того же типа. Если обычные