テキストボックス上でEnterボタン制御
- カテゴリ：パソコン/インターネット
- 2011/08/12 04:08:50
---------------------------------------------
Private Sub 店舗名_GotFocus()
Application.SetOption "move after enter", 0
End Sub
---------------------------------------------
Private Sub 店舗名_LostFocus()
Application.SetOption "move after enter", 1
End Sub
---------------------------------------------
状況:
新店登録画面にて店舗名を入力するテキストボックスに項目入力後、
"登録"コマンドボタンを押さずに"Enter"ボタンを押下すると、
テーブル上、店舗コードがダブっていてもDBに登録されてしまう件。
店舗名を入力するテキストボックスに対して以上のVBAを登録することで解決。
※特定のテキストボックスにてEnterボタンを押したとき、フォーカスを移動させない？？？
