• 締切済み

keypressイベントにて。

keypressイベントで押されたキーがenterキーで あるかどうか判断するにはどうすればよいですか? if KeyAscii=vbenter ではだめでした。

みんなの回答

  • TAGOSAKU7
  • ベストアンサー率65% (276/422)
回答No.2

参考URLはキーダウンイベントのKeyCodeパラメータの定数ですが・・・ キープレスと共通する部分が多いので、参考までに載せておきます。 解決してるようなので、ポイント不要です。 ハイエナ根性は嫌いなので。。。 ここを締め切らないのには、理由があるのでしょうか? 何かまだ質問があるとか?

参考URL:
http://www.microsoft.com/JAPAN/developer/library/Vbenlr98/vamsckeycodeconstants.htm
sakky_t
質問者

お礼

すみません。締め忘れてました・・・。

noname#191236
noname#191236
回答No.1

If KeyAscii = vbKeyReturn Then End If ちなみに、KeyAscii = 0 とすれば改行されません。 (押したキーは、入力されないという事です。) 以上、参考程度に。 m(_ _)m

sakky_t
質問者

お礼

さっそくありがとうございます。 無事なりました。 いそいでいたので助かりました。

関連するQ&A

  • KeyPressイベント

    こんにちは!! KeyPressイベントでBSキーとEnterキーのイベントを取得して、 いろいろな処理を書いているんですけど、 DelキーをBSキーと同じ処理、矢印キーをEnterキーと同じ処理にさせたいです。 それで質問なんですが、KeyPressイベントでDelキーと矢印キーのイベントを 取得する方法ってあるのでしょうか?? KeyDownかKeyUpイベントで取得するしかないのでしょうか?? ご存知の方がいらっしゃったら回答、よろしくお願いいたします。

  • keypressイベントでEnterキー(ascii=13)が認識できない

    VB6、Win2000で開発中です。 単純にkeypressイベントでEnterキーが認識できません。(特定のフォームのすべてのTextBoxでそうなります。)Enterキー以外のキーは認識してkeyasciiにアスキーコードが代入されるのですが、Enterキーだけ代入されません。複数のフォームがあって特定のフォームだけ認識しないのですが、まったく原因がわからず困っています。

  • タブキー押下時のイベントをひろいたい。

    テキストボックスにフォーカスがあり、TABキーが押された時のイベントをひろいたいのですが、KeyPressもKeyDownもイベントが発生しません。 (If KeyCode = vbKeyTab Then  MsgBox "タブキー" End If  If KeyAscii = vbKeyTab Then ~ のようなコードを記述してもメッセージが表示されない) ヘルプにはKeyDownでは発生しないという記述がありますが、KeyPressではイベントがひろえるようなことが書いてあるのにひろえないので困っています。 なにかよい方法はありませんでしょうか。 わかりにくい説明で申し訳ありませんが困ってます。 宜しくお願いします。

  • keypress

    Visual Basic について  keypress 関数について [F2]キーを押下しても keypress イベントは発生しません (1)プロパティの設定ではなく、コードでどのように記述したらいいのでしょうか? (2)それとも、できないのでしょうか? 以上、宜しくお願いします

  • VBA エンターキーでイベントに入りたい。

    テキストボックスにデータ入力後エンターキーの押下でイベントに入りたいのですが、下記のコーディングで[通過]メッセージが表示されません。英数字は通過しますが、エンターキーは動作停止します。 これと全く同じコーディングでVB6は正しく動きます。(ただし、Pvate Sub text1_KeyPress(KeyAscii As Integer)に変更してます。) <コーディング> Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) Msgbox "通過" If KeyAscii = vbKeyReturn Then KeyAscii = 0 End If End Sub これが出来ると、そのつどキーボードから手を離さずに済むので作業効率がグンとあがります。どうかよろしくご教示ください。Excel2003SP3

  • KeyPressイベントのビープ音

    VB2008です。 Text1でEnterを押すとText2にフォーカスを移す、という処理をしたいのですが、 Private Sub Text1_KeyPress(引数省略)  If e.Keychar=Chr(13) then   Text2.Focus  End If End Sub これだとビープ音が鳴ってしまいます。 鳴らないようにするには、どうしたらいいのでしょうか?

  • *keyPressが動作しません*

    今晩和、いつもお世話になっております。 質問させていただきます(><; いまゲームを作っていて、スタート画面からメニュー画面に移るときに「PUSH ENTER」と云うボタンを作り、 そのボタンをクリックしてもENTERキーを押しても画面が変わるように on(keyPress"<Enter>"){ gotoAndPlay("次ページ"); } on(release){ gotoAndPlay("次ページ"); } と書いてムービープレビューしてみたら無事にクリックでもENTERキーでも動いたのでほっとしたのですが… swfファイルやプロジェクタに書き出すと、キーが反応しなくなってしまうんです…||i orz i|| クリックではいけるのですけど;;;;; 素人質問かもしれませんが何卒宜しくお願いいたします(><。 補足が必要でしたら要求してやってください;;;

    • ベストアンサー
    • Flash
  • vb作成したらでbeep音が鳴ります。経験あるかたお願いします。

    KeyPressイベントを追加して、データ入力後にエンターキーを押すとbeep音が鳴ります。ほかではescキーも鳴りますが、その他は鳴らないで動くようです。 単純に新規作成から、Form1へtestテキストコントロールを追加して、以下の記述をしただけなのですが、どうしてなるのか原因がわかりません。 Private Sub test_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then test.text="ok" End If End Sub ←この次でbeep音! 環境はvb6.0、windows2000。 仕様なのでしょうか? ハード側の問題なのでしょうか? 経験あるかた宜しくお願い致します。

  • 特定の文字だけ太文字にするには・・

    簡易チャット作ってます。発言者の名前の部分だけ太文字にしようとしてい ます。 テキストボックス2に文を書いてエンターを押すとテキストボックス1に書 花子:~~~  と書き込まれるようにはできました。花子の部分 だけふと文字にするには?? Private Sub Text2_KeyPress(KeyAscii As Integer) If (KeyAscii = 13) Then Text1.Text = Text1.Text + "花子:" + Text2.Text + vbCrLf Text2.Text = "" KeyAscii = 0 End If End Sub

  • ASP.Net Enterキーで移動したいイベント

    大変お世話になっております。 Windowsフォームでの動作のようにASP.Net でも Enterキーにて次項目に移動したいと思い、いろいろと調べてみました。 <script language="javascript" type="text/javascript">   function ChgKeyCode() {     if (!(event.srcElement.type == "button" || event.srcElement.type == "submit")) {       if (event.keyCode == 13) {         event.keyCode = 9;       }     }   } </script> 上記スクリプトにて、EnterキーのコードをTabキーに変換してEnterでも次項目に移動できるようにしたのですが、これですと、TextBox にTextChangedイベントがあった場合にイベントが無視されてしまうのですが、どうすればよいでしょうか? Enterキーで次項目に移動しつつ、イベントも適応したいのですが、お知恵を拝借できればと存じます。 何卒よろしくお願いいたします。