Es Geçilen If Bloku Sorunu - 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ığı: Es Geçilen If Bloku Sorunu (/konu-es-gecilen-if-bloku-sorunu.html) |
Es Geçilen If Bloku Sorunu - tarkanaykın - 23/03/2022 selamlar arkadaşlar, kaydet butonum var eğer "aciklama" adlı textbox boş ise uyarı veriyordu, doldurduktan sonra kaydediyordu, ama uyarı veren if bloku es geçilip else den sonraki bölüm çalışıyor, dosyamı ekliyorum, bi bakabilecek arkadaş var mı? Private Sub kaydet_Click() If Me.aciklama.Value = "" Then MsgBox ("açıklama bölümü boş, açıklama girin") Exit Sub Else If MsgBox("bu kayıt 'sorunlu olarak kaydedilecek'", vbYesNo) = vbYes Then 'If Me.onEks.Value = True Then Dim a As String b = Me.onEksEt.Caption a = "sorunlu" CurrentDb.Execute "update mkys set mkys.durum = '" & a & "',mkys.aciklama= '" & Me.aciklama & "' where mkys.Kimlik=" & Me.Kimlik Me.Requery MsgBox "kaydedildi" Else: Exit Sub 'End If End If End If End Sub RE: Es Geçilen If Bloku Sorunu - berduş - 23/03/2022 If Me.aciklama.Value = "" Then yerine aşağıdaki şekilde dener misiniz?
RE: Es Geçilen If Bloku Sorunu - tarkanaykın - 23/03/2022 çok teşekkür ederim sayın berduş, çalıştı,yalnız öğrenmek için soruyorum len olayını da biliyorum da şu birleştirme işaretinden sonraki "" ne anlama geliyor, neden onu kullanıyoruz? RE: Es Geçilen If Bloku Sorunu - berduş - 23/03/2022 Len fonksiyonu her zaman düzgün çalışmıyor bazen hata verebiliyor bu sorunu engellemek için çift tırnak eklemek gerekiyor. RE: Es Geçilen If Bloku Sorunu - tarkanaykın - 23/03/2022 anlaşıldı, teşekkürler. |