İŞLETMELERDE BECERİ EĞİTİMİ DOSYASI onur.rar (Boyut: 705,27 KB / İndirilme: 83)
Sn sefersanli
Global değişkenler tanımlayarak işinizi görebilirsiniz, Ben örneğiniz üzerinde modülü ekledim.
frm_data formu yüklendiğinde
Sabitler modülü çalıştırılıyor. ve bu modülde tanımlanan değişkenlere istediğiniz bilgiler atanıyor.
tbl_sabitler tablosunda karışıklığa meydan vermemek için tek kayıt ile sınırlandırılmıştır. Bilgiler bu tek kayıt içerisinden alınıyor. Örneğin bilgilerde değişiklik yapacaksanız,
frm_sabitler formunu açıp gerekli değişiklikleri yaptıktan sonra kaydetmeniz yeterli.
Gelelim nasıl kullanıldığına;
Örneğin okul adını bir raporda kullanmak istiyorsunuz o raporu tasarım modunda açıp bir metin kutusu ekleyin, Raporun yüklendiğinde olayına
txtOkul = okuladi ifadesini yazın, diğer alanlar içinde aynı işlemi diğer
sabitler içinde tekrarlayın.
(rpr_stajdosyasi1) raporuna
okuladi sabitini uyguladım.
Bu işlemi 1 defaya mahsus yapıyorsunuz. Veritabanının kim kullanacaksa kendi bilgilerini
frm_sabitler kısmından değiştirsin, o şekilde kullansın.
Visual Basic
Option Compare Database
Option Explicit
Global egitimyili As String
Global okuladi As String
Global okulmuduru As String
Global muduryrd As String
Global baslamatarihi As Date
' Sabitler
Public Sub Sabitler()
okuladi = DLookup("Okul", "tbl_sabitler")
okulmuduru = DLookup("okul_mdr", "tbl_sabitler")
egitimyili = DLookup("egt_ogrt_yılı", "tbl_sabitler")
muduryrd = DLookup("mdr_yrd", "tbl_sabitler")
baslamatarihi = DLookup("isletme_bas_tar", "tbl_sabitler")
End Sub