LEADERSOFT.ru Разработка на заказ программ и сайтов
ЕСЛИ БАЗА ВАМ НУЖНА В ЛИДЕРСОФТ ЗАЙДИ СПЕРВА!
Все примеры Microsoft Access - VBA


















































24. Если у вас в форме используется несколько таблиц, то связать их можно с мпомощью этого программного кода

Все примеры Microsoft Access
Public Sub Form_Current()
    On Error GoTo 999
    With Me.Parent.Пример_24_2.Form
        .Filter = "Код=" & Me.Код
        .FilterOn = True
    End With
    Exit Sub
999:
    Err.Clear
End Sub