
15-02-12, 21:58
|
 | Διαχειριστής Όνομα: Τάσος Φιλοξενιδης Έκδοση λογισμικού Office: Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική | | Εγγραφή: 21-10-2009
Μηνύματα: 2.035
| |
Καλησπέρα Αργύρη!
Σε παλαιότερες εκδόσεις Access, σε προβολή σχεδίασης μπορούσε κανείς να συνδέσει (μάλλον να εισάγει) εικόνα στο αντικείμενο αυτό.
Στη 2007 και 2010 εγώ δεν μπόρεσα να το επιτύχω χωρίς κώδικα VBA.
Υπάρχει λοιπόν κώδικας VBA που εκτελείται κάθε φορά που ανοίγεις τη φόρμα ή κάθε φορά που μεταφέρεσαι από εγγραφή σε εγγραφή.
Σε προβολή σχεδίασης, κάνε δεξί κλικ άνω στο κουμπί "Save" και επίλεξε: "Δόμηση συμβάντος".
Θα μεταφερθείς στον VBE όπου υπάρχει ο κώδικας VBA. που κάνει όλη τη δουλειά και συγκεκριμένα το παρακάτω τμήμα: Κώδικας: Private Sub Form_Load()
Dim ThePath As String
ThePath = CurrentProject.Path & "\face.jpg"
Set objInk = Me.InkPicture1.Object
If Dir(ThePath, vbDirectory) <> vbNullString Then
objInk.Picture = LoadPicture(ThePath)
End If
End Sub
Φιλικά
Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών |