AccessTr.neTMicrosoft ExcelExcel Cevaplanmış Soruları

Textboxda Toplam Karşılaştırma

05/07/2021, 20:51

malatyalı

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?
05/07/2021, 23:49

berduş

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?
06/07/2021, 00:31

feraz

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
06/07/2021, 09:55

malatyalı

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