質問: access2000 コンボボックスで初期値を表示したい access2000のコンボボックスで if cmbboxa.listcount > 0 then cmbboxa=(cmbboxaの先頭の値) end if というのを実行したいのですが、 cmbboxaの先頭を指定する方法がわかりません。 listindex(0)で指定できるのかと思ったのですが、 エラーが発生してうまくいきません。 どなたか、よろしくお願いいたします。 なお、cmbboxaのrowsourceは、 他のコンボボックスで指定した値によって、変更されます。 検索で調べましたが、見つかりませんでした。
回答: 特に「先頭の」と意識しなくても大丈夫みたいです。 他のコンボボックスで値を指定したときのイベント内に、以下の処理を記述してください。 with me.cmbboxa .rowsource = "クエリ1" .requery .value = dlookup("フィールド1", "クエリ1", true) end with クエリ名、フィールド名は適宜変更してください。 要するに、rowsourceで指定したのと同じレコードセットに対してdlookupでフィールドを持ってきているだけです。 頑張ってくださいヽ(^。^)ノ