Customized Message Boxes

Hankwembo Christopher,FCCA,FZICA,CIA,MAAT,B.A.Sc
Hankwembo Christopher,FCCA,FZICA,CIA,MAAT,B.A.Sc used Ask the Experts™
on
I want the messages on the main form to appear on a much bigger form so that I can easily make them bigger than on the current VBA which has small messages which makes difficult for those old people who are using a point of sales software to read. See a sample pop up form.


I will be opening the pop up form by this method DoCmd.OpenForm “frmMessage” through the save button


MessageForm.png
Any idea I want to put may a label on the pop up form call lblMessage

Below is my code which should supply the action message

Private Sub CashReceived_BeforeUpdate(Cancel As Integer)
If Me.CashChange > 0 Then
Beep
MsgBox "Please check you have not received enough cash for the quantities you have sold", vbOKOnly, "Internal Audit Manager"
Cancel = True
Exit Sub
ElseIf Me.txtAuditedCash < 0 Then
Beep
Eval ("MsgBox ('Please note too much collected," & _
"give back the change of " & Format (Me.txtAuditedCash, "Currency") & "." & "Do not forget.@Check again.@@',0,' Internal Audit Manager')")
End If
End Sub

Open in new window

Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
NorieAnalyst Assistant

Commented:
If you are referring to the message boxes created via MsgBox then why not use your own unbound form instead for the messages?
Most Valuable Expert 2015
Distinguished Expert 2018
Commented:

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial