• ベストアンサー

アクセスのフォーム上にあるテキストボックスについて

いつもお世話になります。 OS:XP、Access2003です。 テキストボックスに何か入力された後にエンターキーが 押されたときのイベントをひろいたいのですが、 テキストボックスのプロパティで表示されるイベント にはないようです。 エンターキーが押された場合のイベントはひろえる のでしょうか? よろしくお願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
  • bonaron
  • ベストアンサー率64% (482/745)
回答No.1

「キー入力時」イベントでひろえます。 Private Sub テキスト1_KeyPress(KeyAscii As Integer)   Debug.Print KeyAscii   If KeyAscii = 13 Then     MsgBox "エンターキー"   End If End Sub

sansan33311
質問者

お礼

ありがとうございました。 上記コードを書いてみました。 しかし、他のキー(例えばAとかB)の入力は 拾えましたが、エンターキーだけはなぜか 拾えませんでした。 ブレイクポイントを設定しても、エンターの ときだけ、止まらなかったのです。 お手数ですが、なぜなのかご返答いただければ 助かります。

sansan33311
質問者

補足

ごめんなさい。 勘違いでした。 教えていただいたコードで拾えました。

その他の回答 (1)

  • CHRONOS_0
  • ベストアンサー率54% (457/838)
回答No.2

何か入力された後なら 普通に更新後イベントでいいのでは Enterだけの入力も拾いたければNo1さんの回答になりますが

sansan33311
質問者

お礼

ありがとうございました。 エンターだけを拾いたいので、、、

関連するQ&A

  • アクセスのフォーム上のテキストボックスについて

    アクセスのフォーム上のテキストボックスについて フォーム上のテキストボックスに直接数字を入力しようとしています。ただ、このテキストボックスのコントロールソースはフォームのレコードソースと違うものです。 この状況でテキストボックスに数値を直接入力しようとすると、『コントロールソースに連結しているので、編集できません。』と表示され、入力出来ません。 どうすれば、解決できるのかご存知の方、教えて下さい。宜しくお願いします。

  • Access VBA のテキストボックスの記載について

    ACCESS VBA の記載方法について質問です。 テキストボックスの名前を Nenrei とします。ここには必ず数字を入力させたく、何も入れずにエンターキーを押した場合はエラー表示をさせたいと考えています。  If me.T1="" then msgbox "年齢が入力されていません。" End If としますが、空打ちしてもエラー表示が出てきません。 プロパティでT1の書式を数値に変えて、  If me.T1=0 then msgbox "年齢が入力されていません。" End If としても結果は同じです。 どうすればよいか、教えてください。

  • access テキストボックスの値取得

    いつもお世話になりますm(_ _)m access VBAをかじり始めた「超・初心者」です(^^;) フォームの画面にテキストボックスを作成し、そこに入力した値を取得したいのですが、どのようにすればよろしいのでしょうか?別に置いたコマンドボタンをクリックすると取得するようにしたいのです。 気軽に、コマンドボタンのイベントプロシージャに、 ----- dim rec as variant rec=textbox1.text   'recは、「テキストボックス1」に入力した値 ----- なんてやってみたんですが、全然ダメで、いろいろ検索してもさっぱり分かりません。 あほくさいほど初歩的な質問で恐縮ですが、なにとぞよろしくお願いいたしますm(_ _)m xp+access2003です。

  • アクセス非連結フォームのテキストボックスの制御

    いつも楽しく勉強させていただいております。 Access2007、win7で前任者が作ったものを元に類似のシステムを作ることとなりました。 その中にあるフォームで私にとってよくわからないものがあります。 そのシステムとは検索条件を入力し、条件に一致したレコードを表示するというものです。 条件を設定するフォームはレコードソースプロパティは空白、つまり非連結のフォームです。 したがって検索条件を入力するテキストボックスのコントロールソースプロパティも空白です。 こういった場合「入力する値は数字だけに限定」といった制御をするなら、入力規則プロパティを設定するか、更新前のイベントでコードを書くかするものだと思っていました。 ところがこのフォームにはそれらしき設定がまるでないのです。 それなのに数字以外の値、たとえば"a"などを入力すると 「このフィールドに入力した値が正しくありません。たとえば、数値型のフィールドに文字列を入力しました。」というメッセージをちゃんと表示し、誤った入力を受け付けません。 どなたかこの謎を解明してくださるとうれしいのですが。 前任者に直接聞けるといいのですが、その人は派遣社員でして契約終了後は連絡が取れないのです。

  • アクセスフォームで2つを結合テキストボックス

    アクセス2000を使っています。 フォームで2つのテキストボックスの内容を並べて表示するテキストボックスを作成するには、どのようにコントロールソースに入力したら良いでしょうか? =[フィールド名]&[フィールド名] ではErrorやName?、「-1」などが表示されてしまいました。 (&の前後に半角空白を入れたりしました。) よろしくお願いいたします。

  • ACCESSのフォーム(テキストボックス)について

    テキストボックスに入力された文字が多いと、下方が隠れて見えなくなってしまいますが、 テキストボックス内部をいちいちスクロールするのではなく、テキストボックスがアクティブになったら、 中のテキストをポップアップのように表示させる機能(か、VBA)ってあるのでしょうか。 テキストボックスsetfocusで、フィールドをラベルに渡す??? できるだけわかりやすいように書いたつもりです。 でも、わかりにくかったら、すんません!

  • フォームのテキストボックスで・・。

    数字を入力し次のテキストボックスに移るときに自動的に「:」をつけた形にしてaccess上に記憶させるというものを作ってます。たとえばフォームのテキストで「1300」といれたら次のテキストボックスに移るときに自動的に「13:00」とテキストボックスに収められそれをaccess上に残すという形です。うまくいかずに困ってまして大変説明が曖昧ですがどなたか回答くださいますようお願いします。

  • Access2007、フォームのテキストボックスのサイズ調整に関して

    いつもお世話になっております。 Access2007で、データ型がメモ型のフィールドをフォームにした時、最初に指定したテキストボックスのサイズを超える時に、自動でテキストボックスの大きさを変えることはできるのでしょうか?

  • テキストボックスがなくなる!?

    更新前処理のイベントプロシージャで、入力すればテキストボックス表示・未入力ならばテキストボックス非表示に設定しました。そのときはうまくいくのですが、いったんフォームを閉じて新たに開けると、入力しているのに元のテキストボックスしか表示されていなくて、でも、レコードのデータは消えてないのです。このほかに設定しないとだめなんですか?

  • Accessフォームのテキストボックス規定値について教えてください。

    Accessフォームのテキストボックス規定値について教えてください。 初期値に先月を2桁(04)で表示させていです。 規定値に=Month(Date()-1)-1を入力すると、 先月の4月の4が表示されるため04と表示する方法を教えてください。