sirkülasyon
Altın Üye
- Katılım
- 10 Temmuz 2012
- Mesajlar
- 2,532
- Excel Vers. ve Dili
- 2021 LTSC TR
- Altın Üyelik Bitiş Tarihi
- 18-06-2026
Kod:
If (TextBox10.Value) = Empty Then
MsgBox "" & Label10 & " Girecek Misiniz?", vbYesNo
If vbYes Then
TextBox10.SetFocus
Cancel = True
ElseIf Not IsEmpty(TextBox10.Value) Then
TextBox10 = "0,00"
TextBox11.SetFocus
End If
1 - Uyarı ile veri girişi yapılıp yapılmayacağını EVET ya da HAYIR şeklinde kullanıcıya hatırlatmak
a) Cevap EVET ise Textbox10' a veri girişi yapılmadan çıkılmasını engellemek
b) Cevap HAYIR ise Textbox10' a ondalık kuruş "0,00" şeklinde veri girişi yapılarak Textbox11' e geçiş yapmak
Eğer Textbox11 boş ise
1 - Uyarı ile veri girişi yapılıp yapılmayacağını EVET ya da HAYIR şeklinde kullanıcıya hatırlatmak
a) Cevap EVET ise Textbox11' e veri girişi yapılmadan çıkılmasını engellemek
b) Cevap HAYIR ise Textbox11' e ondalık kuruş "0,00" şeklinde veri girişi yapılarak Textbox12' e geçiş yapmak
Eğer Textbox12 boş ise
1 - Uyarı ile veri girişi yapılıp yapılmayacağını EVET ya da HAYIR şeklinde kullanıcıya hatırlatmak
a) Cevap EVET ise Textbox12' ye veri girişi yapılmadan çıkılmasını engellemek
b) Cevap HAYIR ise Textbox12' ye ondalık kuruş "0,00" şeklinde veri girişi yapmak
Rica etsem yardım edebilir misiniz?