在 DB Open 上啟用禁用 Shift 鍵

此程式碼將關閉使用者在開啟資料庫時按住 Shift 鍵以跳過預設表單開啟並允許使用者訪問導航窗格和 VB 編輯器的功能。在 DB 中，你不希望使用者訪問其中任何一個（以及禁用當前資料庫選項中的特殊鍵的使用），此程式碼將有助於保持資料庫鎖定。

通常，下面的程式碼放在它自己的模組中，可以命名為 basEnableDisableShift 模組，但這只是一個建議，你可以將它放在你可能已經擁有的任何模組中。

要禁用 Shift 鍵，請在 VB Editor 螢幕中，在 Immediate 視窗中輸入’DisableShift’，然後按 Enter 鍵。然後，你將收到一條訊息，告知 Shift 鍵已被禁用。

要重新啟用 Shift 鍵，你將再次需要返回到 VB Editor 螢幕，在 Immediate 視窗中輸入’EnableShift’並按 Enter 鍵。你將在立即視窗中再次收到一條訊息，告知 Shift 鍵已啟用。

注意： 這不是啟用和禁用 Shift 鍵的簡單方法，但如果要將資料庫部署到不熟悉 MS Access 和 VBA 的使用者，則應該有助於阻止使用者訪問 VB 編輯器和/或或資料庫中的導航窗格。