+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Metin Kutusu Verisi Değiştikçe Hesaplamanın Yeniden Yapılması (/konu-metin-kutusu-verisi-degistikce-hesaplamanin-yeniden-yapilmasi.html)
Metin Kutusu Verisi Değiştikçe Hesaplamanın Yeniden Yapılması - SeferŞANLI - 27/06/2021
Arkadaşlar formumda
frm_dersler formu için;
"snf" adında bir metin kutum var. Bu metin kutusunun içerisindeki değere göre (9,10,11,12 gibi) "txtsnfmevcudu" metin kutusuna girilen değere göre alttaki kod işliyor.
Private Sub txtsnfmevcudu_AfterUpdate()
If snf < 11 Then
Select Case Me.txtsnfmevcudu
Case Is <= 21
Me.txtgrpsay = 1
Case Is <= 31
Me.txtgrpsay = 2
Case Is >= 32
Me.txtgrpsay = 3
End Select
Else
Select Case Me.txtsnfmevcudu
Case Is <= 16
Me.txtgrpsay = 1
Case Is <= 24
Me.txtgrpsay = 2
Case Is <= 32
Me.txtgrpsay = 3
Case Is >= 33
Me.txtgrpsay = 4
End Select
End If
End Sub
aynı formda bulunan "txtgrpsay" değeri hesaplanıyor.
Sorun şu: Ben "txtsnfmevcudu" metin kutusunda değer girip enter tuşuna basınca form yeni kayıta gecer gibi metin kutularını boşaltıyor. Oysa ben verileri girdikten sonra hesaplanan metin kutuları değişssin ve kaydet deyince kaydetsin.
RE: Metin Kutusu Verisi Değiştikçe Hesaplamanın Yeniden Yapılması - ozanakkaya - 27/06/2021
Formun, Devir özelliğini "Geçerli Kayıt" olarak değiştirip deneyiniz. şu anda "Tüm Sayfalar" olarak belirlendiği için, enter'a bastığınızda sonraki kayda gidiyor.
RE: Metin Kutusu Verisi Değiştikçe Hesaplamanın Yeniden Yapılması - SeferŞANLI - 27/06/2021
Teşekkür ederim. Konu çözüldü.