case select statements?

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

someone has suggested I use case select statments to achieve my aim of
bringing up a message when one or more conditions are met when a user arrives
at a clients record. Some clients are high risk (in terms of personal
safety) and I have managed to get a message to pop up for that event. I also
need to be able to advise users by means of a message if the client needs a
interpereter or signer, and in many cases if they are due a review which is
time based. Only problem is I don't have a clue where to start. Can someone
point me in the right direction of where to start please. Thanks in advance.
Doug
--
 
Since I suspect there can be a HighRisk person that needs an interpreter, a
Case structure will not do. It sounds like you need to make all of the
separate tests in the Current event of the form and make the various Warning
labels visible or invisible depending on each test.
 
Hi RuralGuy
Thanks for such a speedy response:

" Since I suspect there can be a HighRisk person that needs an interpreter, a
Case structure will not do. It sounds like you need to make all of the
separate tests in the Current event of the form and make the various Warning
labels visible or invisible depending on each test. "

The first pop up message (user is high risk) was done through the Current
event of the form:

Private Sub Form_Current()
If Me.High = True Then
Beep
MsgBox "This person is assessed as HIGH risk! If in doubt ASK!",
vbExclamation, "High Risk!"
Else
'Do.Nothing
End If
End Sub

How do I add more events?

Thanks again.
Doug
 
I would *not* use MsgBoxes. They can be annoying to the user and slow down
the process too much. I would use BOLD color labels on the form and simply
set their visibility with the tests.

Private Sub Form_Current()

Me.HighRiskLabel.Visible = Me.High
Me.InterpreterLabel.Visible = Me.Interpret

End Sub

I'm making up names, but you get the idea.
 
Thanks very much ruralguy, this is perfect. Some else had suggested
basically the same thing but that was all; it was the example left that made
all the difference. Really appreciated!

Regards
Doug
 
You're welcome DarkWater. Glad I could help.
Thanks very much ruralguy, this is perfect. Some else had suggested
basically the same thing but that was all; it was the example left that made
all the difference. Really appreciated!

Regards
Doug
Click to expand...
 
Back
Top