1 Ανοίξτε το έργο της Visual Basic . Κάντε διπλό κλικ στο " CommandButton " ελέγχου για να το προσθέσετε στη φόρμα . 2
Αλλάξτε την ιδιότητα λεζάντα Command1 για να "Exit ". Αλλάξτε το μέγεθος του ελέγχου και σύρετέ το στη θέση της φόρμας όπου θέλετε
εικόνων 3
Κάντε διπλό κλικ στο κουμπί για να ανοίξει το " Command1_Click ( ) " λειτουργία και πληκτρολογήστε τα εξής: .
Αν MsgBox ( "Είστε βέβαιοι ότι θέλετε να κλείσετε ; " , vbYesNo Ή vbQuestion ) = vbNo τότε
Cancel = True
Else
End
End If
Όταν ο χρήστης κάνει κλικ στο κουμπί , ένα πλαίσιο μηνύματος θα τον προτρέψει να επιβεβαιώσει ότι θέλει να τερματίσετε την εφαρμογή. Αν κάνει κλικ στο " Ναι", το "End" εκτελεί δήλωση και η εφαρμογή τερματίζεται . Σε αντίθετη περίπτωση , η εφαρμογή συνεχίζει .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα