İç içe IF Döngüsü - Baskı Önizleme +- 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ığı: İç içe IF Döngüsü (/konu-ic-ice-if-dongusu.html) Sayfalar:
1
2
|
İç içe IF Döngüsü - gardean - 01/04/2010 Arkadaşlar iç içe iki tane if döngüsü kullanmak istiyorum. Eğer X belirli bir aralıktaysa ve eğer Y şuna eşitse Metin kutusunun değeri Şu olmalı şeklinde ama ne yazdıysam komut olarak hata veriyor. Yardımcı olursanız sevinirim. Kod:
Private Sub Açılan_Kutu17_AfterUpdate() Cvp: İç içe IF Döngüsü - Seruz - 01/04/2010 metin36'nın kontrolünde sayıların sonuna koyduğunuz # işareti problem yaratır. Eğer metin36 nümerik bir alan ise sonunda # olmaz, nümerik değil de bir metin alanı ise tırnak içinde yazmalısınız. Kod:
If Metin36.Text > "5399999999#" And Metin36.Text < "5500000000#" Then Cvp: İç içe IF Döngüsü - Hayri16 - 01/04/2010 Sayın gardean ; Sizin bir açılan kutunuz var. Bu kutuda sanırım Vodafone, Turkcell ve Avea değerleri var. Bunlardan seçiyorsunuz ve metin36 kutusuna numara giriyorsunuz. Bu numaranın değerine göre Metin83 e "DIP" giriyorsunuz veya boş bırakıyorsunuz. Eğer böyleyse kodlarınızı Açılankutunun güncelleme sonrasına değil Metin36 nın güncelleme sonrasına yazın. Çalışacaktır. Kod:
Private Sub Metin36_AfterUpdate() Saygılarımla... Cvp: İç içe IF Döngüsü - gardean - 01/04/2010 Sayın Hayri16 teşekkür ederim ancak şöyle bir durum var kullanıcılar önce numarayı yazıyor sonra operatörü seçiyor. Bu durumda metin 36 ya değer girildiğinde açılır kutu 17 de herhangi bir değer olmuyor bunu nasıl çözücem ? Cvp: İç içe IF Döngüsü - C*e*l*o*y*c*e - 01/04/2010 Sayın garden bundan böyle lütfen sorularınız ile birlikte örneginizide ekleyin,bundan sonra uyarı cezası alacaksınız.. şu yekilde bir kodu deneyin,yani numara girilen yere girmeden önce operatör girilen yer boş ise uyarsın,ve oraya gitsin değilse devam gibi kodlar ile destekleyebilirsiniz...... If IsNull(Me.Kutu17.) Then MsgBox "Önce Operatör seçin", 36, "K A Y D E T" Me.Kutu17.SetFocus End If Cvp: İç içe IF Döngüsü - gardean - 01/04/2010 Örnek Dosya ektedir. |