ВУЗ:
Составители:
Рубрика:
Таблица 10.2
Свойство Кнопка 1 Кнопка 2 Кнопка 3
Name CommandButton1 CommandButton2 Diagram
Caption Очистить
таблицу
Заполнить
таблицу
Построить
диаграмму
5) Выполнить двойной щелчок на клавише CommandButton1, в
результате откроется окно редактора кода, в котором будет помещена заго-
товка для процедуры обработки события Click объекта
CommandButton1. Внутри процедуры необходимо дописать следующий
код:
Private Sub CommandButton1_Click()
Range("A3:B24).ClearContents
ActiveSheet.ChartObjects.Delete
End Sub
Записанная процедура очищает ячейки таблицы в диапазоне ячеек
A3:B24 и удаляет диаграмму ChartObjects из рабочего листа.
6) Выполнить двойной щелчок на клавише CommandButton2, в
результате откроется окно редактора кода, в котором будет помещена заго-
товка для процедуры обработки события Click объекта
CommandButton2. Внутри процедуры необходимо дописать код, с
помощью которого происходит заполнение соответствующих ячеек
таблицы в диапазоне ячеек A3:B24.
Private Sub CommandButton2_Click()
X = Range("E2").Value
k = Range("E1").Value
For i = 3 To 24
Cells(i, 1).Value = X
Cells(i, 2).Value = X^k
X = X+Range("E3").Value
Next i
End Sub
7) Выполнить двойной щелчок на клавише Diagram и дописать
следующий код, в результате откроется окно редактора кода, в котором
будет помещена заготовка для процедуры обработки события Click объ-
Таблица 10.2
Свойство Кнопка 1 Кнопка 2 Кнопка 3
Name CommandButton1 CommandButton2 Diagram
Caption Очистить Заполнить Построить
таблицу таблицу диаграмму
5) Выполнить двойной щелчок на клавише CommandButton1, в
результате откроется окно редактора кода, в котором будет помещена заго-
товка для процедуры обработки события Click объекта
CommandButton1. Внутри процедуры необходимо дописать следующий
код:
Private Sub CommandButton1_Click()
Range("A3:B24).ClearContents
ActiveSheet.ChartObjects.Delete
End Sub
Записанная процедура очищает ячейки таблицы в диапазоне ячеек
A3:B24 и удаляет диаграмму ChartObjects из рабочего листа.
6) Выполнить двойной щелчок на клавише CommandButton2, в
результате откроется окно редактора кода, в котором будет помещена заго-
товка для процедуры обработки события Click объекта
CommandButton2. Внутри процедуры необходимо дописать код, с
помощью которого происходит заполнение соответствующих ячеек
таблицы в диапазоне ячеек A3:B24.
Private Sub CommandButton2_Click()
X = Range("E2").Value
k = Range("E1").Value
For i = 3 To 24
Cells(i, 1).Value = X
Cells(i, 2).Value = X^k
X = X+Range("E3").Value
Next i
End Sub
7) Выполнить двойной щелчок на клавише Diagram и дописать
следующий код, в результате откроется окно редактора кода, в котором
будет помещена заготовка для процедуры обработки события Click объ-
Страницы
- « первая
- ‹ предыдущая
- …
- 78
- 79
- 80
- 81
- 82
- …
- следующая ›
- последняя »
