How to make a larger "X" ?

M

Martin

To Tony:

How to make the "X" larger, as you said ? Thanks!


Martin said:
When the users click the right-top window "X" to quit the entire ACCESS, is
it possible to jump up a message box to alert and let the user to choose
whether he really wants to quit the Access ?
Click to expand...

Why not give them a larger close button on each form? Then they have
a much bigger target to hit and it's much more difficult to close the
app accidentally.

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm
 
S

Simple Simon SQL Diamond

Try this bit of code:

Dim Msg, Style, Title, Help, Ctxt, response, MyString
Msg = "Are you sure you want to Close this Databse?" ' Define message.
Style = vbYesNo + vbCritical + vbDefaultButton2 ' Define buttons.
Title = "System Message" ' Define title.
Help = "DEMO.HLP" ' Define Help file.
Ctxt = 1000 ' Define topic
' context.
' Display message.
response = MsgBox(Msg, Style, Title, Help, Ctxt)
If response = vbYes Then ' User chose Yes.
GoTo LINE1
MyString = "Yes" ' Perform some action.
Else ' User chose No.
MyString = "No" ' Perform some action.
GoTo LiNE2
End If

LINE1:
Quit

LiNE2:
Beep

End Sub
 
S

Simple Simon SQL Diamond

Also I forgot to say get rid of the close button on the form to do this
answer no to the control box propertie on the forms properties.

Then bind the code Ive given you to a button on the form made to look like a
close button..

cheers
 
Top