Создание модулей работы кнопок формы приложения
Работа кнопки Выдать справку состоит в считывании введенной информации в текстовые поля формы приложения, передаче их значений переменным формы шаблона документа с дальнейшим выводом информации в шаблон документа.
Option Explicit
Private Sub CommandButton1_Click()
фамилия = фам1
имя = имя1
отчество = отчество1
группа = групп1
месяц_опл = месяц
сумма_опл = сумма
фио_бух = бух
дата_опл = дата
Call Печать
End Sub
Процедуры присваивания переменным формы приложения введенных значений в текстовые поля формы.
Private Sub textBox1_change()
фам1 = TextBox1.Value
End Sub
Private Sub textBox2_change()
имя1 = TextBox2.Value
End Sub
Private Sub textBox3_change()
отчество1 = TextBox3.Value
End Sub
Private Sub textBox4_change()
групп1 = TextBox4.Value
End Sub
Private Sub textBox5_change()
месяц = TextBox5.Value
End Sub
Private Sub textBox6_change()
сумма = TextBox6.Value
End Sub
Private Sub textBox7_change()
бух = TextBox7.Value
End Sub
Private Sub textBox8_change()
дата = TextBox8.Value
End Sub
Откомпилируйте программу и запустите на проверку.
Задача на закрепление материала
Пример 40. Разработать форму бланка почтового перевода для облегчения труда сотрудников, связанных с частым оформлением денежных переводов.
Готовый шаблон документа и форма даются на рис. 90 и 91.
Рис. 90.Пример упрощенного бланка почтового перевода с текстовыми изменяющимися полями (шаблон документа)
Рис. 91.Форма Рассылка в режиме выполнения для примера 40
Часть III
Программирование на VBA в Excel
Глава 7
Особенности использования VBA в Excel
Дата добавления: 2016-04-14; просмотров: 634;