|
|
|
новичок
участник
Last Login: 17.11.2001 23:46
Сообщ.: 1,
Visits: 12
|
|
Есть две Формы: Forma1 и Forma2
Нужно в Forma1 создать Sub, которая открывала бы форму Forma2
В Forma2 заполняются неск. полей и нужно ОПЯТЬ ВЕРНУТЬСЯ в Forma1 в ТУ ЖЕ Sub и ПРОДОЛЖИТЬ выполнение Sub.
|
|
|
|
|
Forum Member
участник
Last Login: 28.06.2002 21:38
Сообщ.: 47,
Visits: 518
|
|
| сделай подчиненную форму модальной
|
|
|
|
|
Forum Member
участник
Last Login: 15.01.2003 17:00
Сообщ.: 27,
Visits: 298
|
|
| такая же проблема и у меня - модальная форма не помогает - разве что делать обработку в подчиненной форме для управления основной .... но вот если подчиненная форма должна быть универсальной ... тогда просложнее
|
|
|
|
|
Forum Member
участник
Last Login: 09.08.2004 19:58
Сообщ.: 36,
Visits: 397
|
|
Здрасте
Наверняка есть и более лучшие способы но мне в голову вот что пришло чтоб долго не думать
public test as boolean - это в модуле
и формы
Private Sub Form_Load()
DoCmd.OpenForm "form2", , , , , acHidden
test = True
End Sub
Private Sub Кнопка0_Click()
DoCmd.OpenForm "form2", , , , , acWindowNormal
Forms!form2.SetFocus
While test
DoEvents
Wend
MsgBox "hi"
End Sub
вторая
Private Sub Form_Close()
test = False
End Sub
|
|
|
|