ラベルと連結したテキストボックスの背景色を変える方法

環境：XP＆ACCESS2003
フォーム上にラベルと連結したテキストボックスがあります。
フォーム上のある連結テキストボックスの値を参照してラベルと連結したテキストボックスの背景色を変える方法が思い浮かびません。ご存知の方、教えてください。よろしくお願いします。

No.1 ベストアンサー 回答者： noname#22222 回答日時： 2006/04/14 12:50

次は、数量が０なら赤、０でなければ緑にするコードサンプルです。

Option Compare Database
Option Explicit

Private Sub Form_Current()
　　Me.数量.BackColor = Abs((Me.数量 = 0) * RGB(255, 0, 0) + (Me.数量 <> 0) * RGB(0, 255, 0))
End Sub

Private Sub 数量_AfterUpdate()
　　Me.数量.BackColor = Abs((Me.数量 = 0) * RGB(255, 0, 0) + (Me.数量 <> 0) * RGB(0, 255, 0))
End Sub

No.2 回答者： CHRONOS_0 回答日時： 2006/04/14 18:47

「ラベルと連結した」というのがどのような事を意味するのか分かりませんが

値に応じて背景色を変えたければVBAよりも条件付き書式の出番でしょうね
4色までなら簡単に出来ます

特に帳票フォームの場合は条件付き書式でないとレコード毎に色を変えられません