Страница: 1 |
на форме 2 объекта, необходимо, чтобы каждый из этих объектов по клику вызывал модальную форму (для задания новых данных или свойств того объкта, от которого вызвана эта форма). как это сделать? P.S. короче - при клике нужно распознавать какой объект вызвал эту форму. Помогите пж-ста!
Можно сделать так... 'Form1 Private Sub Command1_Click() Form2.Tag = Command1.Name Form2.Show vbModal, Form1 End Sub Private Sub Command2_Click() Form2.Tag = Command2.Name Form2.Show vbModal, Form1 End Sub 'Form2 Private Sub Form_Activate() Me.Label1.Caption = Me.Tag End Sub Страница: 1 |
Вопрос: запустить одну форму от разных объектов
Добавлено: 22.02.04 00:00
Автор вопроса: night-roll
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Chill
ICQ: 554200
Вопросов: 101
Ответов: 343
Профиль | | #1
Добавлено: 22.02.04 01:41