[VBA] Boş Metin Kutusu Denetimi
#1
Hocalarım; aşağıdaki kodda metin34 denetimi yapmaksızın "anlaşamamasontutanağıgörüşmesiziş" kodunu çalıştırmakta. Oysa metin34 boş,sebebi ne olabilir?

If IsNull(Me.Metin34) Then
MsgBox "Lütfen oturum yeri giriniz!", vbInformation, "Zorunlu Alanı Doldurunuz"
Me.Metin34.SetFocus
Exit Sub
End If

If Me.Metin8.Value = "İşçi İşveren" Then
Call anlaşamamasontutanağıgörüşmesiziş
End If



  Alıntı
Bu mesajı beğenenler:
#2
If Me.Metin34="" Then


bu şekilde de bi deneseniz



  Alıntı
Bu mesajı beğenenler:
#3
(02-12-2019, 20:38)husem demiş ki: If Me.Metin34="" Then


bu şekilde de bi deneseniz

Aynı Husem Hocam,Aşağıdaki ikinci grup kodu silince denetimi yapıyor

If Me.Metin8.Value = "İşçi İşveren" Then
Call anlaşamamasontutanağıgörüşmesiziş
End If



  Alıntı
Bu mesajı beğenenler:
#4
metin34
açılan kutumu, metin kutusu mu
örneğinizi 2003 formatında ekleme imkanınız varsa ekleyebilirmisiniz?



  Alıntı
Bu mesajı beğenenler:
#5
(02-12-2019, 20:44)husem demiş ki: metin34
açılan kutumu, metin kutusu mu

Metin kutusu hocam textbox



  Alıntı
Bu mesajı beğenenler:
#6
Örneği şöyle yapınca oluyor hocam, call komutuyla ilgili sorun var sanırım.

If IsNull(Me.Metin34) Then
MsgBox "Lütfen oturum yeri giriniz!", vbInformation, "Zorunlu Alanı Doldurunuz"
Me.Metin34.SetFocus
Exit Sub
End If

If Me.Metin8.Value = "İşçi İşveren" Then
MsgBox "yazdırılıyor!", vbInformation, "Bilgilendirme"
End If



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] metin kutusu kaydırma onkay 5 1.912 27-12-2023, 13:24
Son Mesaj: dsezgin
  Metin Kutusu Adı Değiştirme Hk. snapper 9 225 08-11-2023, 01:12
Son Mesaj: dsezgin
  [TABLO] çoklu Birleşik Giriş Kutusu RASİMPEH 2 140 19-09-2023, 04:53
Son Mesaj: RASİMPEH
  Uzun Metin Formatını Sql De Kısa Metin Formatına çevirebilir Miyiz? adnnfrm 2 201 06-08-2023, 03:51
Son Mesaj: adnnfrm
  Metin Kutusu Boş Sa Diğer Metin Kutusundan Değer Alması özgülapt 4 260 29-05-2023, 18:01
Son Mesaj: feraz
  Formda Onay Kutusu Ile Veri Aktarma anno 7 374 24-11-2022, 23:02
Son Mesaj: onur_can
  Docmd.gotorecord,,newrec Sonrası Otomatik Dolu Metin Kutusu meceka 6 280 10-11-2022, 15:45
Son Mesaj: meceka
  [FORM] Birleşik Giriş Kutusu EminA 2 219 13-10-2022, 10:32
Son Mesaj: EminA

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi