Εμφάνιση ενός μόνο μηνύματος
  #5  
Παλιά 21-02-10, 21:05
Το avatar του χρήστη nisgia
nisgia Ο χρήστης nisgia δεν είναι συνδεδεμένος
Super Moderator
Όνομα: Γιάννης
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 12-10-2009
Περιοχή: Ηγουμενίτσα
Μηνύματα: 161
Προεπιλογή

Γεια και χαρά σε όλη τη παρέα!

Φίλε Νίκο, το κλείσιμο μιας φόρμας μπορεί να γίνει με πολλούς και διάφορους τρόπους
και είναι λίγο δύσκολο να τους απενεργοποιήσεις όλους.
Εκείνο που σε ενδιαφέρει σε αυτή τη περίπτωση είναι το ίδιο το συμβάν
κλεισίματος της φόρμας και όχι ο τρόπος.

Με τον παρακάτω τρόπο, ακυρώνεις ευγενικά αυτό το συμβάν και ενημερώνεις σχετικά
τον χρήστη για τους λόγους που δεν κλείνει η φόρμα:

Κώδικας:
Private Sub Form_Unload(Cancel As Integer)
    If Me.NewRecord Then
        Cancel = True
        MsgBox "Δεν είναι δυνατό το κλείσιμο της φόρμας " _
                & "όταν βρίσκεστε σε νέα εγγραφή.", vbExclamation
    End If
End Sub
Ελπίζω να πετύχεις τώρα αυτό που θες...

Φιλικά,
Γιάννης
__________________
Αν δεν το ρωτούσες, δεν θα το μαθαίναμε ποτέ...!
-----------------------------------------------
Τελικά η γνώση, αντίθετα με ό,τι μέχρι σήμερα πίστευα, είναι η φυλακή της σκέψης.
Όταν η αφετηρία είναι η ελεύθερη σκέψη, δεν χρειάζεται πλέον να φτάσεις πουθενά!
Απάντηση με παράθεση