Перестали работать кнопки в форме

Добрый день!

После очередного обновления (похоже, т.к. других причин выявить не удалось)
перестали работать кнопки:
1. поиск
---
Private Sub найти_Click()
On Error GoTo Err_найти_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_найти_Click:
Exit Sub

Err_найти_Click:
MsgBox Err.Description
Resume Exit_найти_Click

End Sub
---

и 2. вызов формы
---
Private Sub Кнопка57_Click()
DoCmd.OpenForm "<название>", acFormDS

End Sub
---

Ошибка: Procedure declaration does not match description of event or procedure having the same name

Также подчинённая форма не привязывается..


Может кто-нибудь определить, почему ошибка возникает? Пару дней назад всё работало.

Спасибо!

А что на что обновляли-то?

Drift3r,

В вашей форме есть еще обработка событий (кроме приведенных тут)? Компиляцию сделайте - у вас какая-то процедура обработки записана с неправильным количеством или типом параметров.

Проверьте, может кто переименовал кнопку и она осталась не без процедуры.

Дело в том, что обновления устанавливаются автоматически (на работе).

Вероятность что я что-либо изменил маленькая, но есть. Больше никто к файлу доступа не имеет.

компиляцию попробую..

Добрый день!

Прогнал компиляцию,
оказалось, что сбоили неиспользуемые процедуры (недописанные). После их уничтожения всё заработало снова.


Напоследок небольшой вопрос - каким свойством или методом переключить фид формы с табличного на обычный? defaultview нашел, а currentview не поддаётся изменениям..