Weird form problem

[John]

Hi

Access 97: I have a form which works fine. I added the following code to the
On-Current event of the form;

If Forms![MyForm].MyBoundField Then
Forms![MyForm].MyRectangle.BorderColor = 255
Else
Forms![MyForm].MyRectangle.BorderColor = 12632256
End If

The problem is that if I run the app, go to this form and without doing
anything else, simply try to close access using X at the top right, the db
app closes by the access is merely minimised. From this point access will
not close, (it will minimise, maximise etc. though). I have to then kill it
using task manager and end task. I have done compact & repair and also
decompiled a few times and also imported into a new db a few times. Nothing
helps. Of course if I comment out the above code then everything works fine.

What is the problem? Why is the above code causing this problem?

Thanks

Regards

[Rick Brandt]

John wrote:

Hi

Access 97: I have a form which works fine. I added the following code
to the On-Current event of the form;

If Forms![MyForm].MyBoundField Then
Forms![MyForm].MyRectangle.BorderColor = 255
Else
Forms![MyForm].MyRectangle.BorderColor = 12632256
End If

The problem is that if I run the app, go to this form and without
doing anything else, simply try to close access using X at the top
right, the db app closes by the access is merely minimised. From this
point access will not close, (it will minimise, maximise etc.
though). I have to then kill it using task manager and end task. I
have done compact & repair and also decompiled a few times and also
imported into a new db a few times. Nothing helps. Of course if I
comment out the above code then everything works fine.

What is the problem? Why is the above code causing this problem?

Believe it or not, try...

If Forms![MyForm].MyBoundField = True Then
Forms![MyForm].MyRectangle.BorderColor = 255
Else
Forms![MyForm].MyRectangle.BorderColor = 12632256
End If

Access doesn't like the inferred test for true against Boolean fields.
There is a KB article that describes this issue I believe.

--
I don't check the Email account attached
to this message. Send instead to...
RBrandt at Hunter dot com