End Sub. Str(х) – преобразование числа в строку

UserForm1.Show

End

Str(х) – преобразование числа в строку

Text Box 1 – это объект поля ввода для числа A.

Text – свойство объекта Text Box 1.

a=Text Box1.Text означает: читать из поля ввода текст

5. Аналогично создать процедуры вычитания, умножения и деления двух чисел.

6. Для очистки полей ввода создать процедуру, предварительно щелкнув по кнопке Очистить

Private Sub Command Button 3 – Click ()

Text Box1.Text=” “

Text Box2.Text=” “

Text Box3.Text=” “

End Sub

7. Для выхода из программы используется оператор End. После двойного щелчка по кнопке Выход дополните процедуру оператором End.

Private Sub Command Button 4 – Click ()

End Sub

8. Нажмите кнопку Run на панели инструментов Visual Basic и протестируйте программу.

9. Для запуска диалога Простейший калькулятор нужно создать следующий макрос:

Sub StartrCalсul ()

с помощью команды Сервис \ Макрос \ Редактор VB – Insert – Моdul.

10. Для запуска макроса StartCalcul создать кнопку или команду в меню и назначить ей макрос StartCalcul.

Лабораторная работа № 26. Создание диалоговых окон

Цель работы: научиться создавать диалоговые окна и освоить работу с панелью инструментов «Формы».

1. Создание диалогового окна. Диалоговые окна используются для облегчения взаимодействия пользователя с программой. Для создания диалога щелкните правой кнопкой мыши на ярлыке рабочего листа, выберите Добавить …, затем опцию Окно диалога. В рабочую книгу будет вставлен новый лист Диалог 1 с заготовкой диалога и панелью Формы (элементов управления). Переименуйте лист Диалог 1 в Смета.

- Создать лист диалога

- Изменить размер диалогового окна. Для этого поднести указатель мыши к границе окна и, когда он примет вид выделить окно.

- Используя маркеры выделения, увеличить размер окна примерно в 2 раза. Используя команду Формат объекта контекстного меню, установить размер окна 7x12 см.

- Изменить заголовок окна. Для этого щелкните в области заголовка и введите новый заголовок Смета.

Дата добавления: 2014-12-27