
24-06-10, 23:21
|
 | Συντονιστής Όνομα: Νίκος Έκδοση λογισμικού Office: Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 28-12-2008 Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
| |
Στράτο σε καλωσορίζω στο Forum..
1. Απαγορεύεται αυστηρά να χρησιμοποιείς αντικείμενα (φόρμες, πίνακες, ...) κάνοντας χρήση δυο διακριτών λέξεων. παράδειγμα αντί για ΜΕΛΗ ΣΥΛΛΟΓΟΥ, γράψε ΜΕΛΗΣΥΛΛΟΓΟΥ. Το καλύτερο βέβαια είναι να μη έχεις καθόλου Ελληνική γραμματοσειρά (για παράδειγμα γράψε frmMeliSilogou)
2. Στο κουμπί "Επεξεργασία" της κεντρικής φόρμας σου, διέγραψε την μακροεντολή και κάνε μεταφορά τον εξής κώδικα: Κώδικας: Private Sub Επεξεργασία_Εγγραφής_Click()
If IsNull([ΚΩΔΙΚΟΣ]) Then
MsgBox "Επέλεξε εγγραφή !", vbInformation, "ΕΛΕΓΧΟΣ"
Exit Sub
End If
Dim timi As Integer
timi = [ΚΩΔΙΚΟΣ]
DoCmd.OpenForm "ΕΠΕΞΕΡΓΑΣΙΑ", , , "[ΚΩΔΙΚΟΣ]=" & timi
End Sub
Τα ξαναλέμε / Νίκος Δ.
Τελευταία επεξεργασία από το χρήστη Meteora : 25-06-10 στις 16:20.
Αιτία: Αφαίρεση κειμένου...
|