Format event in reports 2

[primerov]

I have a report enumerating the invoices per customer.In the Format event
of the report i have put the condition that if the control called invoicenumber
is 0, then the control CompanyName must be red.I receive no error message
but the control CompanyName is not made red.
What is the error in my command ?


Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me![invoicenumber] = 0 Then
Me![CompanyName].ForeColor = 255
End If
End Sub

 

[ZmrAbdulla]

Hi,
Try changing this

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me![invoicenumber] = 0 Then
Me![CompanyName].ForeColor = VbRed
End If
End Sub

Regards


Zameer Abdulla

http://www.geocities.com/zameerabd/

http://www.mtkhoory.com

 

[CosmoKramer]

You are also going to want to continue the code to reset the color back when [invoicenumber] <>0 :

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me![invoicenumber] = 0 Then
   Me![CompanyName].ForeColor = VbRed
Else
   Me![CompanyName].ForeColor = VbBlack
End If
End Sub

Hoc nomen meum verum non est.

 

[ZmrAbdulla]

Yes CosmoKramer,

You won the Star

Regards


Zameer Abdulla

http://www.geocities.com/zameerabd/

http://www.mtkhoory.com