即効テクニック |
サンプルでは、コンボボックスに指定された値によって、前景色と背景色を設定しています。
前景色は「ForeColorプロパティ」、背景色は「BackColorプロパティ」を使います。
フォームにコンボボックス「コンボ0」を配置して、プロパティシートの[イベント]タブを表示します。
[クリック時]のイベントプロシージャに次の処理を記述します。
Private Sub コンボ0_Click()
If コンボ0.Value = "a" Then
Me!コンボ0.ForeColor = RGB(0, 0, 0)
Me!コンボ0.BackColor = RGB(255, 0, 0)
Else
Me!コンボ0.ForeColor = RGB(0, 0, 255)
Me!コンボ0.BackColor = RGB(255, 255, 255)
End If
End Sub
コンボボックスのテキストボックスには、値が「a」の場合は、前景色が「黒」で背景色が「赤」、値が「a」以外の場合は、前景色が「青」で背景色が「白」で表示されます。