Text Box Formatting Based on Data

[CSDunn]

Hello,
I have about 200 text boxes on an Access 2000 Report that need to have a
black background if the data in the text box is 'X'.

Is there a way I could create one procedure that might work with the
Report_Open event of the Report (or some other event) that would meet this
need for the fields I need to address? I would need something that would set
the background to black if any text box had an 'X' in it, and something that
would do the same but address specific text boxes (just in case I need to go
one way or the other).

All of the text boxes are bound to database fields.

Thanks for your help!

CSDunn

[DFS]

CS,

Something like this in the report's Open or Detail Format event should do
it:

dim ctl as Control
for each ctl in Me.Controls
if ctl.ControlType = acTextBox then
if ctl.Value = "X" then ctl.BackColor = 0
endif
next ctl

"CSDunn" <cd***@valverde.edu> wrote in message
news:80**************************@posting.google.c om...

Hello,
I have about 200 text boxes on an Access 2000 Report that need to have a
black background if the data in the text box is 'X'.

Is there a way I could create one procedure that might work with the
Report_Open event of the Report (or some other event) that would meet this
need for the fields I need to address? I would need something that would set the background to black if any text box had an 'X' in it, and something that would do the same but address specific text boxes (just in case I need to go one way or the other).

All of the text boxes are bound to database fields.

Thanks for your help!

CSDunn