MsgBox. Here is an example:
In the "General Declarations" put the following: Const strSaveMessage As String = "Do you want to save?" Const strSaveTitle As String = "Save Changes?" Const intSaveButtons As Integer = vbYesNoCancel Dim blnChanged As Boolean Dim intSave As Integer Then in the "Exit" command, here is the code: If blnChanged = True Then intSave = MsgBox(strSaveMessage, intSaveButtons, strSaveTitle) Select Case intSave Case Is = vbYes mnuFileSave_Click Unload Me Unload frmClip Case Is = vbNo Unload Me Unload frmClip Case Is = vbCancel Cancel = True End Select This dialog box has a "Yes" button, a "No" button, and a "Cancel" button. You can change the "intButtons" constant to "vbOkCancel" to only have the "OK" and "Cancel" buttons. Hope this helps! Richard Henerlau ------------------------ Yahoo! Groups Sponsor --------------------~--> $9.95 domain names from Yahoo!. Register anything. http://us.click.yahoo.com/J8kdrA/y20IAA/yQLSAA/k7folB/TM --------------------------------------------------------------------~-> Yahoo! Groups Links <*> To reply to this message, go to: http://groups.yahoo.com/group/visualbasic6programming/post?act=reply&messageNum=17740 Please do not reply to this message via email. More information here: http://help.yahoo.com/help/us/groups/messages/messages-23.html <*> To visit your group on the web, go to: http://groups.yahoo.com/group/visualbasic6programming/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
