Доброго времени суток.
Пара вопросов:
1. В аксесе есть возможность настраивать параметры запуска. Случайно выделил не то что надо (стандартные опции меню запртил). В результате хочу их вернуть, но... неоткуда. Вкладка сервис (Tools) исчезла =(
2. Есть форма. при ее закрытии я проверяю есть ли еще какие то открытые формы. Если нету - ее надо снова открыть или не позволить ей закрытся. Это возможно ?
Изначально писалось как :
Код:
Private Sub Form_Close()
If All_Not_Loaded() Then
DoCmd.OpenForm "start_form"
End If
End Sub
Function All_Not_Loaded() As Boolean
Dim res As Boolean
res = False
For Each i In Forms
If IsLoaded(i.name) Then
res = True
End If
Next i
All_Not_Loaded = res
End Function
но в таком виде не работает
Подскажите как с этим боротся, пожалуста.
С уважением. Ворон.
C 1. выяснил достаточно удерживая shift запустить =)
Подскажите 2е ?