AccessTr.neT

Tam Versiyon: Textboxda Toplam Karşılaştırma
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Ustam Hayırlı Akşamlar
Müsaadeniz ile bir sorum olacak.
a) Textbox4, Textbox8 ve Textbox12 ye girilen rakamların toplamı Textbox2' deki rakamları geçiyorsa
Textbox4, Textbox8 ve Textbox12' nin içini temizleyerek tekrar giriş yapın diye uyarı verecek
b) Textbox4, Textbox8 ve Textbox12 ye girilen rakamların toplamı Textbox2' deki rakamları geçmiyorsa
kayıt edecek bir koda ihtiyacım var.
Yardımcı olabilir misiniz?
sayın @malatyalı sizce de artık basit if kıyaslama fonksiyonunu yazabiliyor olmanız gerekmez mi?
en basit kodu bile biz yazarsak siz nasıl öğreneceksiniz?
Dim topla As Double

If Me.TextBox4.Value = "" Or Me.TextBox8.Value = "" Or Me.TextBox12.Value = "" Then
    MsgBox "Gerekli textboxlar bos olamaz"
    Exit Sub
End If

topla = Me.TextBox4.Value + 0 + Me.TextBox8.Value + 0 + Me.TextBox12.Value + 0
If topla > Me.TextBox2.Value Then
    MsgBox "tekrar giris yapin"
    Me.TextBox4.Value = Empty
    Me.TextBox8.Value = Empty
    Me.TextBox12.Value = Empty
    Exit Sub
End If

'Kayit kodlari alta devam edilecek
Berduş Ustam vallahi yapamadım. İkinci bir sorum daha vardı onu sormaya imtina ettim araştırarak bir örnek buldum ve kendime uyarladım. Ama bu konuda bir gram olan aklım iyice karıştı. Hakkınızı helal edin.
Feraz ustama da teşekkür ederim