Ｐａｇｅ 375 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼F12キーの制御について ガチャピン 03/9/11(木) 14:11 ┗Re:F12キーの制御について こうちゃん 03/9/12(金) 11:49 ┗こうちゃんさん有難うございましたm(_ _)m ガチャピン 03/9/16(火) 21:20 ─────────────────────────────────────── ■題名 ： F12キーの制御について ■名前 ： ガチャピン ■日付 ： 03/9/11(木) 14:11 -------------------------------------------------------------------------
| いつもお世話になっております。 Access2000で開発しています。 そこで質問なのですが、 キーボードのF12を押したときに、 メッセージを出すように しているのですが、 その後、「名前を付けて保存」のダイアログボックスが 出力されます。 ファンクションキーを押されたときの 制御はどのようにすればよろしいのでしょうか？ Private Sub F12_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyF12 MsgBox "Ｆ１２押下" End Select End Sub どなたかご存知の方ご返答よろしくお願い致します。m(_ _)m |
| ガチャピンさん、こんにちは フォームのテキストボックス等のKeyDownイベントに設定しているのでしょうか？ であればKeyCodeを0に設定すれば、既定のコードはキャンセルされます。 こんな感じです・・ >Private Sub F12_KeyDown(KeyCode As Integer, Shift As Integer) > Select Case KeyCode > Case vbKeyF12 > MsgBox "Ｆ１２押下" > End Select KeyCode = 0 >End Sub |
| こうちゃんさんご返答有難うございます。 >フォームのテキストボックス等のKeyDownイベントに設定しているのでしょうか？ KeyDownイベントで設定しています。 >であればKeyCodeを0に設定すれば、既定のコードはキャンセルされます。 >こんな感じです・・ >>Private Sub F12_KeyDown(KeyCode As Integer, Shift As Integer) >> Select Case KeyCode >> Case vbKeyF12 >> MsgBox "Ｆ１２押下" >> End Select > KeyCode = 0 >>End Sub 上記方法でやりましたら、できました。 ご返答有難うございました。m(_ _)m また分からない事が多々あると思いますので、 そのときはよろしくお願い致します。 |