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

UptoLike

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

80
Public Const Color As String = "Blue"
Константы уровня проекта доступны во всех модулях проекта, в котором они
описаны.
3.5.3. Объектные переменные
Объектная переменная используется для ссылки на объект. Когда Вы немного
разберетесь в языке VBA, то поймете неоценимую пользу таких переменных: они
позволяют существенно сократить тексты программ. Код, написанный с их
помощью, легче читается и гораздо быстрее выполняется.
Объектные переменные объявляются и задаются немного иначе, чем остальные.
Во фрагменте кода, показанном ниже, приведены инструкции объявления и
присваивания.
Dim R1 As Object
Set R1 = Worksheets(1). Range("A1")
Set ключевое слово для присваивания значения объектной переменной,
R1 имя переменной,
Worksheets(l).Range("Al") объект, присваиваемый переменной R1.
Рассмотрим на примере, что можно делать с переменной типа Object. Зададим с
помощью переменных типа Object и Long свойство Value объекта Range, которое
затем отображается в информационном окне.
Sub Pro11()
Dim N2 As Long
N2 = 100000
Dim R1 As Object
Set R1 = Worksheets(1).Range("A1")
R1.Value = N2
MsgBox R1.Value
End Sub
Здесь переменная R1 равна диапазону Worksheets(1).Range("A1"), в который
сначала заносится значение переменной N2, а затем оно выводится в окне MsgBox.
3.6. Оконный ввод-вывод данных
3.6.1. Функция InputBox
Функция InputBox предназначена для ввода информации в диалоговом окне и
передачи ее в переменную VBA.
Ожидает нажатия пользователем кнопки Ok или Cancel. Аргументы функции
перечислены ниже, а их назначение дано в табл. 3.6.
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])