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 gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
msgbox 1
- Thread starter bill12345
- Start date
-
1
- #2
Zeroanarchy
Technical User
msgbox " You are about to delete your entier harddrive do you want to do this?"
If you want to add a Yes / No button to the message box
do as follows
Dim intReply As Integer
Dim strSQL As String
intReply = MsgBox("Do You want to delete your hard drive?" vbQuestion + vbYesNo + vbDefaultButton2)
If intReply = vbYes Then
Docmd.........
Else
Docmd.......
Response = acDataErrContinue
End If
End Sub
as for the menus, yes Access has options to use its button menu, my advise is not to use it instead create a bmp graphic which loks good, paste it at the top of your page and create access buttons to lay on top of it, then use the options in properties to turn the button invisible.
Hope this helps
ZeroAnarchy
If you want to add a Yes / No button to the message box
do as follows
Dim intReply As Integer
Dim strSQL As String
intReply = MsgBox("Do You want to delete your hard drive?" vbQuestion + vbYesNo + vbDefaultButton2)
If intReply = vbYes Then
Docmd.........
Else
Docmd.......
Response = acDataErrContinue
End If
End Sub
as for the menus, yes Access has options to use its button menu, my advise is not to use it instead create a bmp graphic which loks good, paste it at the top of your page and create access buttons to lay on top of it, then use the options in properties to turn the button invisible.
Hope this helps
ZeroAnarchy
- Status
