Access Tips #229 値集合ソースが空のコンボを使用不可にする方法

Access Tips


#229	値集合ソースが空のコンボを使用不可にする方法	フォーム、VBA
通常のコンボボックスでは、その値集合ソースにデータが１件もない場合、ドロップダウンすると次のような表示になります。これでも、項目の選択ができないのですから、実質的には使用不可と同じなのですが、コンボボックスコントロールの"Enabled/使用可能"プロパティを設定することによって、"使えない"ということをより明確に示すことができます。それには、フォームの"Load/読み込み時"イベントプロシージャなどにおいて、次のようなコードを実行します。「コンボ0」が対象となるコンボボックスの名前です。 Private Sub Form_Load() 'コンボボックスの項目数を調べる If Me!コンボ0.ListCount = 0 Then 'ゼロなら使用不可に設定 Me!コンボ0.Enabled = False End If End Sub 実行例：
\| Index \| Prev \| Next \|