Skip to main content

AccessTr.neT


Metin Kutusu Verisi Değiştikçe Hesaplamanın Yeniden Yapılması

Metin Kutusu Verisi Değiştikçe Hesaplamanın Yeniden Yapılması

Çözüldü #1
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.
.rar DRSYK-yedek çalışma.rar (Dosya Boyutu: 539,37 KB | İndirme Sayısı: 1)
Son Düzenleme: 27/06/2021, 13:39, Düzenleyen: SeferŞANLI.
Cevapla
#2
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.
Cevapla
#3
Teşekkür ederim. Konu çözüldü.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da