お世話になります。舞と申します
早速ですが・・・
テーブル
M_地区
地区コード 担当者コード 担当タイプ |==========|===========|=============|
0001 10 1
0002 20 2
0003 30 3
M_職員
職員コード 職員姓 職員名 ホスト担当者コード |==========|======|=======|=================|
10 小沢 真弓 10
20 小野 寺愛 20
30 水野 真紀 30
画面構成:
□□→地区コード(テキスト)
□□→地区名称(テキスト)
□□→担当タイプ1(コンボボックス)
□□→担当タイプ2(コンボボックス)
□□→担当タイプ3(コンボボックス)
処理:
地区コードを変更時、地区名称、担当タイプ1,2,3がそれぞれ表示されるよう
にしたいのですが・・・
担当者タイプには担当者コード = ホスト担当者コードで対応した職員姓名を
表示したいのです。
例 地区コード,0001に変更した場合:担当タイプ1に小野真弓と表示される。
上記の動きをするようなプログラムを組みたいのですがどのようにしたら
いいでしょうか?ご指導お願い致します。
すいません、改行抜けてました;;
編集 削除1、 テーブルのDTのプログラム名 オラクル アクセル
2、 プログラムの種類---C 、 VB6 VB.net ---
を記入しないと、解らないと思います、
>1、 テーブルのDTのプログラム名 オラクル アクセル
>2、 プログラムの種類---C 、 VB6 VB.net ---
すいませんっ。
オラクルでVB6.0SP5です。
失礼しました。
sqlを作成し表示したら良いとおもいます。
編集 削除御返事遅れました。
SQLを使うまではわかります。
ただどのような条件でどのように表示すればいいのかがわからないのです。
SQLの書き方がわからないのですか?
それとも、VBの書き方が解らないのですか?
それともVBとSQLの区別が出来ませんか?
SQLは書きました。
ただ、ドロップダウンリストのコンボボックスに抽出した値を表示にはどうしたらいいでしょうか?
TextBoxのようにすると'Text'はプロパティは値の取得のみ可能といわれておちてしまうのですが・・・
イベントはLostFocusで作成し、SQLでも地区コード変更時、該当した担当タイプ1,2,3のデータはもってこれました。
Do Until SQL_DT.EOF
Combo001.AddItem Rs![職員姓] & Rs![ 職員名 ]
SQL_DT.MoveNext
Loop
DTが有るだけ、Comboに入れる。 --AddItem--
こんな感じでしょうか。
言い方が悪かったみたいですね。
コンボボックスにただ表示するのではなく、地区コード変更時に担当タイプ1,2,3に職員の名前が表示されるという事です。
説明不足で申し訳ありません。
>ただ、ドロップダウンリストのコンボボックスに抽出した値を表示にはどうしたらいいでしょうか?
>TextBoxのようにすると'Text'はプロパティは値の取得のみ可能といわれておちてしまうのですが・・・
ドロップダウンリストでリストにない値をTextに表示しようとするとあたりまえながらエラーになります。
そういう場合はドロップダウンコンボを使いましょう。
>コンボボックスにただ表示するのではなく、地区コード変更時に担当タイプ1,2,3に職員の名前が表示されるという事です。
データを持ってこれてるなら変更時に一度ClearしてAddItemすれば良いんじゃないですか?