|
Макрокоманда |
|
ОткрытьЗапрос (Z_visel; Таблица; Изменение |
|
ОткрытьЗапрос (Z_visel_otl2; Таблица; Изменение) |
|
ОткрытьЗапрос (z_obnov_visel; Таблица; Изменение) |
|
ОбновитьОбъект (Форма, F_main) |
3) У формі «Sdan _ nomer» створити кнопку «Виселення». До події «Натиснення» цієї кнопки прив'язати макрос «M _ udal».
7.2 Реалізація алгоритмів засобамиVisualBasic
PrivateSubf1_AfterUpdate()
Forms! [F_main]! [f_nomer].Requery
Forms! [F_main]! [f2].Requery
End Sub
Private Sub f2_AfterUpdate()
Forms! [F_main]! [f_nomer].Requery
End Sub
Private Sub f3_AfterUpdate()
Forms! [F_main]! [f_nomer].Requery
End Sub
Private Sub k1_AfterUpdate()
Forms! [F_main]! [Z_ludi].Requery
End Sub
Private Sub k2_AfterUpdate()
Forms! [F_main]! [f_uslug].Requery
End Sub
Private Sub Зарегистрировать_Click()
On Error GoTo Err_Зарегистрировать_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = «f_otdih»