AccessTr.neT

Tam Versiyon: gizle göster sorunu
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayın hocalarım
Daha önce bir değer 0 dan büyükse göster değilse gizle yi sormuştum
o ördeğe dayanarak gidertipi nin güncelleme sonrasına ve
formum geçerli olduğunda olayına

Private Sub gidertipi_AfterUpdate()
If Me.giderTipi = "Maaş" Then
Me.personeladi.Visible = True
Else
Me.personeladi.Visible = False
End If

End Sub

Yazdım ama tamamen gizleniyor
Gidertipi açılır kutu ben sadaca maaş seçtiğimde personelno görünsün
elktrik, telefon vb diğer seçimlerde görünmesin.
Yardımcı olursanız sevinirim.
Sayın firdevs
Büyük ihtimalle gidertipi alanınızdan değer dönmüyor. Bu gibi durumlarda kodu şöyle yazınız:

Kod:
Private Sub gidertipi_AfterUpdate()

msgbox gidertipi

If Me.giderTipi = "Maaş" Then
Me.personeladi.Visible = True
Else
Me.personeladi.Visible = False
End If
End Sub

Koyduğumuz msgbox satırı o alandan dönen veriyi gösterecek. Ve ben tahmin edeyim, siz gidertipi olarak açılır kutu kullandınız ve en az 2 sütun olarak hazırlandı. İlişkili sütununuz da 1 olduğu için veri id değeri olarak dönüyordur. 1 nolu sütununzdaki değer boyut olarak 0cm alanda görüntülendiği için de 1. sütun etkin olarak dönüyor ama görülmüyor.

Bu durumda komutu şöyle kullanacaksınız. (Yani tahminim doğruysa.. İşte örnek göndermemenin zararları. Sadece tahminle size yardımcı oluyorum)

Kod:
Private Sub gidertipi_AfterUpdate()
If Me.giderTipi.column(1) = "Maaş" Then
Me.personeladi.Visible = True
Else
Me.personeladi.Visible = False
End If

End Sub

Kolay gelsin.
Teşekkürler hocam
Mesajımda zaten açılır kutu olduğunu belirtmiştim. Ama güzel ifade edememişim.
Dediğinizi uyguladım ve işlem tamam.
iyi çalışmalar.