Ανοίξτε έργο της Visual Basic , και να εισάγετε την ακόλουθη γραμμή στο επάνω μέρος του συνάρτηση που καλεί " SetFocus : " On Error GoTo FocusErr 2
Δημιουργήστε μια ετικέτα στο κάτω μέρος της λειτουργίας , γράφοντας τα εξής : .
FocusDone :
Έξοδος από Λειτουργία
εικόνων 3
Δημιουργήστε μια άλλη ετικέτα κάτω από το " FocusDone , " γράφοντας τα εξής :
FocusErr :
Αν Err.Number = -2147467259 τότε
Συνέχιση
endif .
το γεγονός αυτό καθιστά το βιογραφικό της αίτησής σας για το σφάλμα αυτό , μέχρι να εμφανιστεί ο έλεγχος στην πραγματικότητα retrying το " SetFocus " κλήση . Αποθηκεύστε το έργο σας , και να οικοδομήσουμε χρησιμοποιώντας το μενού "Εργαλεία" στην εφαρμογή σας .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα