|
▼小僧 さん:
ご返信頂きまして、感謝しております!
お忙しいところ、本当に申し訳なく思っております。
フォーム上でもやりたいと思ったんで助かりました。
下記のやり方は、フォーム上でコンボボックスとテキストボックスが
存在して、コンボボックスをT_所属の[所属]を元に選択したら、自動的に
番号が入力される考えですよね。
>フォームのコントロールソースが「T_アドレス」で
>
>コンボボックス 「所属コンボ」
>テキストボックス 「番号テキスト」
>が存在すると仮定します。
>
>所属コンボ:
>コントロールソース:所属
>値集合ソース :SELECT T_所属.所属 FROM T_所属;
>
>番号テキスト:
>コントロールソース:番号
>
>として、
>
>Private Sub 所属コンボ_AfterUpdate()
> Me.番号テキスト.Value = DLookup("番号", "T_所属", _
> "[所属] = '" & 所属コンボ.Value & "'")
>End Sub
私がやりたいのはその逆でテーブルです。
つまり、小僧さんがフォーム上で実施した場合のやり方と同じですが、
T_アドレスの[所属]をコンボボックスで選択する。
テーブルをデザインビューで開いて、ルックアップのところに
表示コントロールがあるので、それをテキストからコンボに変更したんです。
そのコンボボックスは、T_所属の[所属]から選択するものとして、
選択したら、選択した内容にあわせて、番号を自動入力したいのです。
T_アドレス
ID 性 名 番号 所属 会社名 住所
1 100 A ・・・・
2 100 A
3 200 B
4 200 B
5 300 C
↑コンボボックスで選択(T_所属の[所属]から)
↑T_所属で定義された番号が自動入力
並び替えの時に役立つんで。
T_所属
番号 所属
100 A
200 B
300 C
400 D
500 E
テーブルのルックアップに
値集合タイプ:テーブル/クエリ
値集合ソース:SELECT [T_所属].[所属] FROM T_所属;
としたんですが、単純に所属だけ表示され、選択するだけになります。
番号は自動入力されません。それを実現したいのです。
小僧さんが記述して頂いたプログラムを、
SQL文で表現するとどのように記述するんでしょうか?
教えてください。宜しくおねがいしますー。
|
|