アクセスでフォーム間のリンク？

質問

こんにちは、どなたかご助力をお願いします。

　アクセス97でデーターベースを作成していて、フォームから入力できるようにしたいと思っています。

　店の経営者がＳさんからＴさんに変わったとき、店名や店にある商品はそのままですが、経営者ＩＤが変わるので、それを入力する必要があります。

　フォームＡを立ち上げて、Ｓさんの店を検索します。
　次にコマンドボタンのクリック１つでフォームＢ（新規入力用、形式はフォームＡと同じ）が立ち上がります。・・・ここまではできました。

　そして開いたフォームＢには、既にＳさんの時と同じ店名や商品名が記入されていて（フォームＡの商品のデータなどをそのまま反映させる）、Ｔさんの経営者ＩＤだけを入力するようにしたいのですが、できないものでしょうか？

　よろしくお願いします。

回答No.3

ssssssssss · ベストアンサー

どうも、sssssssです。

＞コンパイルエラー
＞修正候補：ステートメントの最後

のエラーですが、これはプログラムの文自体に誤りがあります。
一応、サンプル内には問題なところはないと思うのですが...

Private Sub Form_Load()

　　me.txtShop.text = FormA.txtShop.text
　　　　　(1)　　　　　　　(2)　　　(3)

End Sub

実際にはモジュール内には上記のようなコードが記述されると思います。
(1)にはフォームＢ上に表示させたいテキストボックスのオブジェクト名、
(2)にはフォームＡのオブジェクト名、
(3)にはフォームＡ上のテキストボックスのオブジェクト名を入力しなければなりません。

各オブジェクト名はオブジェクトを右クリック→プロパティ→その他タブ→名前
の項目を使用します。
ただし、オブジェクト名称を間違えている場合はプログラムを実行すると”メソッドまたはデータメンバが見つかりません。”と出ます。

最初に述べたようにCARPKAIJIさんが躓いている所はコードの記述の問題です。
これ以上は直接見てみるか、CARPKAIJIさんの書いたコードを全て見せてもらうなどしないと指摘できません。

とりあえず、カーソルを別の行に移してもエラーが出ないようにいろいろ試してみてください。また、ダメなようでしたら助言をいたしますので。

では、頑張って下さい。

お礼

ありがとうございます。できました！

　たぶんですが、原因は私がテキストボックスの名前に「-」というマイナス記号の半角を使っていたのが原因だと思います。この記号はVBAでははじかれてしまうのでしょうか？
全てのテキストボックスの「-」を「_」に変えたらできるようになりました。

　ssss・・・さんのおかげです。ありがとうございました。

回答No.2

ssssssssss

どうも、ssssssssです。

＞フォームＢのプロパティのイベントプロシージャを設定するのは、「更新前処理」でよろしいのですか？それとも「開く時」でしょうか？

フォームＢの入力が1回行われる度にフォームＢを閉じるような仕様であればフォームＢの開く時、もしくは読み込み時でＯＫだと思います。

しかし、フォームＡとフォームＢを開いたまま何度も更新を行いたいのであれば、フォームＡのレコード移動時に先ほどのコードを入力する必要があります。ただ、この場合meの使い方に注意して下さいね。meはアクティブになってるフォームを指すオブジェクト名です。

では、頑張って下さい。

補足

お返事遅くなってすみません。
しばらく取り掛かることができずにいて、先日行ってみたのですが、やはりできずにいます。

me.txtShop.text = FormA.txtShop.text

のモジュールを入れると、

コンパイルエラー
修正候補：ステートメントの最後

というメッセージボックスが表示され、モジュールの文字が赤くなり、textがエラーだと出ます。

何が原因かおわかりでしょうか？

回答No.1

ssssssssss

フォームＢのプロパティでフォームロードのイベントに

me.txtShop.text = FormA.txtShop.text
　　　　　　　　：
　　　　　　　　：

のようなコードを各項目ごとに書けばＯＫだと思います。

ちなみに
meはフォームＢのオブジェクト名
FormAはフォームＡのオブジェクト名
txtShopは店名が表示されるテキストボックス名
textはテキストボックスオブジェクトのプロパティです。

こんなんで解りますでしょうか？

補足

ご回答ありがとうございます。

もう一息でできると思うのですが、
フォームＢのプロパティのイベントプロシージャを設定するのは、「更新前処理」でよろしいのですか？それとも「開く時」でしょうか？

よろしくお願いします。