1- Çalışmamızın ana menüsünde buton yerine etiketler kullanılıyor ve kullanılan modül sayesinde etiketler renkli ve 3 boyutlu hareketli butonlara dönüşüyor. Tasarım ekranında etiketleri orijinal haliyle görüyorsunuz ancak çalıştırdığınızda etiketler renkli 3 boyutlu butonlara dönüşüyor, zemin renkleri falan modülden ayarlanıyor.
2- Etiketlerin adlarının lbl1...lbl24 biçiminde sıralanması zorunludur. Ayrıca etiketlerin üzerindeki yazılacak olan yazı da formunuzun adını taşımak zorundadır. Aksi taktirde düğme hata verecektir.
3-Etiketlerin caption'larını okutup bir değişkene atayarak bu değişkeni de açılacak form adına atayarak formları açtırdım. 3 satırlık kod, yerleştireceğiniz tüm etiketler için yeterlidir, yeter ki üzerinde yazan isim aynı zamanda formun ismi olsun. Yazdığım fonksiyon şöyle:
Kod:
Public Function MouseClick(ctl As Control)
Dim degisken As String
degisken = ctl.Caption
DoCmd.OpenForm degisken
End FunctionBu çalışmayı incelemeyen pişman olur, benden söylemesi... + Repleri de unutmayalım bu arada
)
