Dim lngRed As Long, lngYellow As Long, lngWhite As Long
lngRed = RGB(255, 0, 0)
lngBlack = RGB(0, 0, 0)
lngYellow = RGB(255, 255, 0)
lngWhite = RGB(255, 255, 255)
If Me.cboPartnerId.Column(16) = "" Or IsNull(Me.cboPartnerId.Column(16)) Then
Me.earlybtn.Enabled = True
Else
Me.earlybtn.Enabled = False
Me.ActualBalance.Value = owe
Me!DrawDate.BackColor = lngRed
Me!ActualBalance.BackColor = lngRed
End If
color wont change. am i even going about this thee right way ?
lngRed = RGB(255, 0, 0)
lngBlack = RGB(0, 0, 0)
lngYellow = RGB(255, 255, 0)
lngWhite = RGB(255, 255, 255)
If Me.cboPartnerId.Column(16) = "" Or IsNull(Me.cboPartnerId.Column(16)) Then
Me.earlybtn.Enabled = True
Else
Me.earlybtn.Enabled = False
Me.ActualBalance.Value = owe
Me!DrawDate.BackColor = lngRed
Me!ActualBalance.BackColor = lngRed
End If
color wont change. am i even going about this thee right way ?