1-800-975-iCAD
9:00am to 5:00pm Pacific Time
Quit method example
Quit method example
This example demonstrates how to use the Quit method to close the drawing and exit progeCAD.
Private Sub QuitExample()
Msg = "Really want to quit?"
Title = "Quit Method Example"
Style = vbYesNo + vbCritical + vbDefaultButton2 ' Define buttons.
Response = MsgBox(Msg, Style, Title)
If Response = vbYes Then ' User chose Yes.
Application.Quit
End If
End Sub
|
|
|
