AccessTr.neT

Tam Versiyon: personel program
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
[attachment=2853]

selamün aleyküm arkdaşlar
yollamış olduğum programda bir sorunla karşılaştım.sorunum askerlik yapmışı tıkladığımda altına görev yeri,görev tarihi,görev süresi, sınıfı,rütbe,terhis yeri,terhis tarihi gelecek
tıklanmadığında da askerlik yapmış yazısı askerlik yapmamş olarak değişecek ve muhtemel gidiş gelecektir.
Dosyanızı 2003 formatında ekleyecek olursanız daha fazla kişi bakabilir ve siz de daha çabuk yardım alabilirsiniz. Sitemiz üyelerinin % 90'lık bir bölümünün 2003 kullandığını düşününce, 2003 olarak eklemeniz sizin açınızdan daha iyi olacaktır...
1- Kodda Visible özelliğine başvurulan şey tablodaki alan değil formdaki denetimdir. Yani denetimin özelliğine başvurulur. Denetimlerinizin (Metin Kutusu, Açılan Kutu, Liste Kutusu vb) adlarını değiştirdim.

2- Etiket5 yoktu. Etiketin adını Askerlik_Etiket yapmışsınız galiba. Bir de onu değiştirdim. Hepsi bu...

Kod:
Private Sub askerlik_Click()
gorevyeri.Visible = False
gorevtarihi.Visible = False
gorevsuresi.Visible = False
sinif.Visible = False
rutbe.Visible = False
terhistarihi.Visible = False
terhisyeri.Visible = False

If askerlik.Value = False Then
If gorevyeri.Value <> "" Then
askerlik.Value = True
MsgBox "Personelin Görev Yeri tanımlı iken Askerlik Durumunu iptal edemezsiniz", , "Mantıksal Hata!"
Else
askerlik_Etiket.Caption = "Askerlik Yapmamış"

    gorevyeri.Visible = False
    gorevtarihi.Visible = False
    gorevsuresi.Visible = False
    sinif.Visible = False
    rutbe.Visible = False
    terhistarihi.Visible = False
    terhisyeri.Visible = False
    muhtemelgidis.Visible = True

Exit Sub
End If
End If

askerlik_Etiket.Caption = "Askerlik Yapmış"
    gorevyeri.Visible = True
    gorevtarihi.Visible = True
    gorevsuresi.Visible = True
    sinif.Visible = True
    rutbe.Visible = True
    terhistarihi.Visible = True
    terhisyeri.Visible = True
    muhtemelgidis.Visible = False
End Sub
teşekkür edeerimmm
[attachment=2856]
birşey daha sorabilir miyim?
formlarda personel bilgi giriş ekranında personel no nun yanında ara düğmesi var.orayı tıkldığımda kişi listesi geliyor.ondan birini seçtiğimde o kişi ile ilgili bilgiler o forma yazılcak...
Bununla ilgili örnek koymamışsınız. Zaten örnek göndermenize de gerek yok. Ben size bununla ilgili bir örneğin linkini veriyorum: https://accesstr.net/konu-access-mimaris...1#pid16711

Bu linkteki örneğe bakarak yapılanı kendi örneğinize aktarın. O konuyu iyice okuyacak olursanız zaten bunu kendiniz yapabilirsiniz.

Hem Forum Kuralları gereği biz sadece "Balık tutmayı" öğretiyoruz. Balık vermiyoruz...

Kolay gelsin...
Sayfalar: 1 2