Как перехватить встроенную процедуру поиска?

Question

В моем проекте доступа у меня есть обычная процедура поиска.

Теперь я хочу искоренить встроенную процедуру поиска, чтобы пользователь не пытался ее использовать.

Поэтому у меня есть две задачи acccomplish:

1. перехватывать Ctrl + F горячая клавиша
2. Удалить кнопку поиска на ленте.

На моей главной форме у меня есть Key Preview включен, и я знаю, как detect keypresses, но я не уверен, как обнаружить CTRl ключ.

Теперь что мне делать?

Answer 1

Вы можете проверить, Shift = 2. Значение Shift будет 1, если нажать Shift, 2, если нажать Ctrl, 4, если нажать Alt, сумма этих значений, если нажаты две или три из этих кнопок, или 0, если ни одна из них не нажата. Так что ваш If Заявление должно выглядеть следующим образом:

If KeyCode = vbKeyF and Shift = 2 then 
    KeyCode = 0 
End If 

Answer 2

Если вы хотите отключить (Ctrl + F) везде во всей базе данных вы можете сделать следующее:

Создать макрос «AutoKeys»

После того, как вы создали этот макрос, дважды щелкните «Submacro» в каталоге действий

Имя, которое Submacro «^ F»

Оставьте действие пустой

В основном это должно предотвратить ( Ctrl + F) от работы на какой-либо форме в базе данных. Кроме того, вы должны иметь возможность создавать другие субмакросы для других комбинаций клавиш, которые вы хотите контролировать.

Я никогда не использовал это перед собой и просто проверил его ненадолго, и он работал нормально. Хотя я не могу ни потворствовать, ни осуждать его в отношении долгосрочного использования.

Примечание: Это было протестировано в MS Access 2010, поэтому вам, возможно, придется приспособиться к вашей версии.