コンボボックスのドロップダウンリストの何番目の項目を規定値として
初期表示するかを設定する方法を紹介します。

●準備●

　フォームにコンボボックスを配置します。
コンボボックスの名前は「コンボ0」とします。

●手順●

(1)コンボボックスのプロパティシートを表示します。

(2)[データ]タブで次のように設定します。

　[値集合タイプ]　→　値リスト
　[値集合ソース]　→　a;b;c;d
　[規定値]　→　[コンボ0].[itemdata](2)

(3)フォームを保存して開くと、コンボボックスに規定値「c」
　 が表示されます。

●補足●

　ここでは、コンボボックスやリストボックスに含まれるすべての
項目を 1 つずつ順番に取得できる「ItemDataプロパティ」という
VBAを利用しています。

　最初の項目のインデックス（番号）は0になるので、例えば、
6番目の項目を取得するには5を指定します。