• ベストアンサー

Access 2003 VBA について

 始めまして Access 初心者です。  ある、フォームのテキストボックスに入力した内容を元に、 コマンドボタンクリック時に、Aテーブル内容を検索し、テキストボックスに 入力した内容と一致しない場合にAテーブルに格納し 一致するレコードが見つかった場合は、エラーを表示したいのですが、 どのように記述すればいいのでしょうか? 駄文失礼します。

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

  • ベストアンサー
  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.1

テーブルのデザインでそのフィールドに インデックス(重複なし)を設定すれば済む話では? フォームで行いたいのなら テキストボックスの更新前処理に if dcount("*","テーブル名","フィールド名 ='" & me!テキストボックス名.text & "'") > 0 then msgbox "すでに登録あり" cancel = true end if とかで。

tomotomo2632
質問者

お礼

直ぐにお返事できなくて、すみませんでした。 次の日に、いろいろと検索したところ nicotinism様の書かれてるようにdcountが見つかりました。 お手数かけまして、すみません。 本当に有難うございました。