Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

I need to get a Msg Box on a subform when...?

Status
Not open for further replies.

cashe

Technical User
May 4, 2002
60
GB
Hi All,

I have a subform with a button on it called MakeNote. This button opens a pop up form for the user to enter a note in a memo field which is attached to the consultants id. The only way now to see if the consultant has a note is by opening the form. Is there a way where I can get a message appearing when a user goes to a record that has a note attached to the consultant?

Hope someone can shed some light.

Cashe :)
 
Hi

Suggest you (say) change the color of the caption on the Notes button when a note is present, eg

In the oncurrent event of the form

If NotIsNull(MyNote) Then
cmdMyButton.forecolor = vbBlack
Else
cmdMyButton.forcolor = vbRed
End if Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now - UK
 
Hi KenReay,

Thanks for your reply. Your method would work well but one problem I'm having is:

The button to open the pop up form where the user would enter a note is on a subform. How do I make the sub form button change colour?

Thanks

Cashe
 
Hi

Is the row which contains the notes in the recordsource of the sub form?

If yes, then I think (not sure have not tried it on a sub form)

it will have to be the on current event of the sub form and

If NotIsNull(MyNote) Then
Me.cmdMyButton.forecolor = vbBlack
Else
Me.cmdMyButton.forcolor = vbRed
End if Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now - UK
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top