| 
    
     |  | >DLookUpでやるしかないかと思いますが、 >具体的にどのように試してみて、どううまくいかないのでしょうか?
 >とりあえず、ヘルプには、説明、使用例が載ってると思いますので、
 >そちらを確認してみてください。
 
 まさ7251さんありがとうございました。
 Dlookupを使ったらできました。
 
 ところで次の段階でまた行き詰ってしまいました。
 具体的には、フォーム「表示」(データソース「選択」)のテキストボックス「CD」の値を参照し、テーブル「バンド」の中の「コード1」と照らし合わせて、「グループ」の値をテキストボックス「グループ表示」に表示するという形にやり直しました。
 
 テキストボックス「グループ表示」のコントロールソースに
 =DLookUp("グループ","バンド","コード1=" & [CD])と入力したらできたのですが、実際には、「バンド」というテーブルの中には、コード1、コード2、コード3・・・というようにフィールドが12個あり、その複数フィールドのどこかに「CD」と一致するものがあり、それに対応する「グループ」を表示しなければいけません。
 
 DLookUpをORでつなげようとしたら、エラーになってしまうので、
 どこかのページを参考にして、今度はテキストボックス「CD」の更新後処理のイベントプロジージャに
 Private Sub CD_AfterUpdate()
 Dim Rst as DAO.Recordset
 
 S = Me.CD
 Set Rst = バンド
 Rst.MoveFirst
 
 Rst.FindFirst"[コード1] = '" & S & "'"
 Me![グループ表示] = "グループ"
 If Rst.NoMatch Then
 Rst.FindFirst"[コード2] = '" & S & "'"
 Me![グループ表示] = "グループ"
 If Rst.NoMatch Then
 Rst.FindFirst"[コード3] = '" & S & "'"
 Me![グループ表示] = "グループ"
 ・
 ・
 ・
 End If
 
 End Sub
 
 と記述してみましたが、テキストボックス「グループ表示」の中は空欄のままです。
 どこを直したらよいかご教示頂けないでしょうか?
 
 |  |