|
>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
と記述してみましたが、テキストボックス「グループ表示」の中は空欄のままです。
どこを直したらよいかご教示頂けないでしょうか?
|
|