質問: access テキストボックスの値取得 いつもお世話になりますm(_ _)m access vbaをかじり始めた「超・初心者」です(^^;) フォームの画面にテキストボックスを作成し、そこに入力した値を取得したいのですが、どのようにすればよろしいのでしょうか?別に置いたコマンドボタンをクリックすると取得するようにしたいのです。 気軽に、コマンドボタンのイベントプロシージャに、 ----- dim rec as variant rec=textbox1.text 'recは、「テキストボックス1」に入力した値 ----- なんてやってみたんですが、全然ダメで、いろいろ検索してもさっぱり分かりません。 あほくさいほど初歩的な質問で恐縮ですが、なにとぞよろしくお願いいたしますm(_ _)m xp+access2003です。
回答: 多分、至極簡単なところの見落としのような気がするのですが 直接触れる事が出来ないので、隔靴掻痒の感。 前回のレスで誤解を与えてしまうような表現がありましたので訂正。 > 編集タブの「変数の宣言を強制する」にチェックが入ってなかったら > 入れてみてください > option explicit ←これが各モジュールの頭(二行目)にあれば不要です。 変数の宣言を強制する」にチェックが入っていれば 自動的に各モジュールの先頭に「option explicit 」が自動的に挿入されますので (チェックは)「不要です。」という意味です。 こんな風であればok option compare database option explicit private sub cmd1_click() 'あーたらこーたら end sub private sub form_open(cancel as integer) '処理 end sub 本題に戻ります。 コマンドボタンの所のコードを丸ごとアップしてあったら良かったのですが (次回のアップを希望) dim rec as variant msgbox me!textbox1 '追加 rec=me!textbox1 で 何を言ってきます?