
12-10-11, 16:39
|
 | Συντονιστής Όνομα: Νίκος Έκδοση λογισμικού Office: Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 28-12-2008 Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
| |
Καλησπέρα
Στράτο,
φτιάξε μια public μεταβλητή (παράδειγμα ονόματος varcode) σε μια module και η οποία θα έχει την τιμή του κωδικού με τον οποίο κάποιος εργάζεται στη βάση. Τους κωδικούς τοποθέτησέ τους σε ένα πίνακα tblCode.
Όταν ανοίγει η βάση σου ζητείται κωδικός. Ελέγχεται αν υπάρχει στον πίνακα tblCode και στη συνέχεια -εφόσον υπάρχει - αποδίδεται η τιμή του κωδικού στην public μεταβλητή σου, η οποία μπορεί να διαβαστεί από οποιοδήποτε σημείο του προγράμματος.
Στην συνέχεια...
Έχεις οργανωμένες τις πληροφορίες σε καρτέλες και μια δομή select case ... end select, αφήνεις κάποιες καρτέλες ενεργές και κάποιες όχι, ανάλογα με την τιμή που έχει η public μεταβλητή σου. Κώδικας: select case varcode
case "123"
TabCtl75.Enabled = False
TabCtl73.Enabled = True
case "345"
<κώδικας>
end select
Προσωπικά έτσι θα εργαζόμουν. Δεν έχω άλλη ιδέα!
Με εκτίμηση
Νίκος Δ.
|