Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


5372 / 9994 ←次へ | 前へ→

【7847】Re:フォーム内での値参照
発言  まさ7251  - 06/5/22(月) 19:00 -

引用なし
パスワード
   >テキストボックス「グループ表示」のコントロールソースに
>=DLookUp("グループ","バンド","コード1=" & [CD])と入力したらできたのですが、実際には、「バンド」というテーブルの中には、コード1、コード2、コード3・・・というようにフィールドが12個あり、その複数フィールドのどこかに「CD」と一致するものがあり、それに対応する「グループ」を表示しなければいけません。
>
>DLookUpをORでつなげようとしたら、エラーになってしまうので、

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

これって、エラーでませんか?

とりあえず、Databaseに関しての記述がない。
Rst への代入が間違っています。
386 hits

【7839】フォーム内での値参照 Satsuki 06/5/19(金) 16:55 質問
【7841】Re:フォーム内での値参照 まさ7251 06/5/19(金) 23:48 回答
【7842】Re:フォーム内での値参照 Satsuki 06/5/20(土) 11:56 お礼
【7845】Re:フォーム内での値参照 Satsuki 06/5/22(月) 15:42 質問
【7847】Re:フォーム内での値参照 まさ7251 06/5/22(月) 19:00 発言
【7849】Re:フォーム内での値参照 Satsuki 06/5/23(火) 10:43 お礼

5372 / 9994 ←次へ | 前へ→
ページ:  ┃  記事番号:
1078228
(SS)C-BOARD v3.8 is Free