LoginSignup
0
0

More than 5 years have passed since last update.

コンボボックスの中身を保持する方法

Posted at

コンボボックスで選択された情報がAccess(データベース)へ登録され、その情報を表示する一覧画面があります。一度登録された情報を更新するために、更新ボタンを作成し、ページ遷移した時に、元々登録されたいた情報を保持したまま表示させたいのですが、どのようにしたらいいですか?(変更しない情報もある場合手間を省くため)

コンボボックスには2種類あり、1種類はベタ打ちで選択肢を記述したもの、もう1種はAccessにあるデータマスタからSQLで作られています。

ベタ打ちの方は

Quadruple(strItem,strA,strB,strC,strD,flg,ByRef obj)
    select Case flg
      select "0"
          strCheckA = "selected"
      select "1"
          strCheckB = "selected"
      select "2"
          strCheckC = "selected"
      select "3"
          strCheckD = "selected"
    End select

という関数で、

Call Quadruple("Item01","","A","B","C",DbCur.Fields(0).Value,obj)

で呼び出しているのですが、これは登録された情報を維持しながら表示させることができています。
しかし、もう一つのコンボボックスが同じようにできません。

Combo(strItem,strTable,strSdate,intChange,ByRef obj)

という関数で、

Call Combo("Item02","データマスタ",2003/11/11",True,obj)

で呼び出しています。しかし表示されるのは空白のコンボボックスです。

DbCur.Fields(1).Value

をどこかに入れないといけないのはわかりますが、どのようにすればいいのかわかりません。
もし何かヒントでもわかる方いましたらアドバイスお願いします。

0
0
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
0
0