質問: access2000 フォームからレコード検索 access2000で質問です。 「顧客テーブル」を作ります。 顧客テーブルには以下のフィールドを設けます。 顧客id(主キー) 名前 tel 住所 変更住所 顧客idから住所まではすでにデータが入っています。 「変更住所」に新しくデータを入れていきます。 その際に、フォームを利用したいと思っていますが、 新規フォーム(何もデータが入っていない)に顧客idを入れたら、すでに顧客テーブルに入力されている名前、tel、住所がパッと表示され、変更住所だけが空欄で表示されるようなフォームを作りたいと思います。 どのような方法がありますでしょうか? ぜひお知恵を貸してください。よろしくお願いいたします。
回答: すいません。顧客idの更新後の[イベント プロシージャ]が 間違っていましたので訂正いたします。 me!名前 = null: me!tel = null: me!住所 = null: me!変更住所 = null dim db as database, trm as recordset, tyuusitu as string set db = currentdb set trm = db.openrecordset("顧客テーブル", dbopendynaset) tyuusitu = "顧客id='" & me![顧客id] & "'" trm.findfirst tyuusitu docmd.gotocontrol "変更住所" if isnull(me![顧客id]) then me![顧客id] = 0 docmd.findrecord me!顧客id, acentire, true, , true, , true if me!顧客id <> trm!顧客id then msgbox "no." & me!顧客id & " の顧客id が見つかりません。@ 顧客idを確認して下さい。@", vbcritical, "検索顧客idエラー": me!顧客id = null: me!名前 = null: me!tel = null: me!住所 = null: docmd.gotocontrol "顧客id": exit sub me![名前] = trm![名前]: me![tel] = trm![tel]: me![住所] = trm![住所] trm.close