コンボボックスに表示させた以外のデータ項目をファイルに書き込むには？ (ID:105517)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 今は次のような感じで（おおざっぱで、すごい省略してますが） コンボに商品名をセットしていると思います。 combo1.clear set rs = openrecordset("select * from 商品マスタ") do while rs.eof = false combo1.additem rs.fields("商品名").value rs.movenext loop これを dim s商品コード() combo1.clear set rs = db.openrecordset("select * from 商品マスタ") redim s商品コード(rs.recordcount - 1) do while rs.eof = false combo1.additem rs.fields("商品名").value s商品コード(i) = rs.fields("商品コード").value rs.movenext loop のような感じにして、 コンボで選択されている商品名の商品コードを知りたい場合は s商品コード(combo1.listindex) という感じです。