Arkadaşlar merhaba ekteki formda HİZMET, Metin56 ve Hizmet Tarihi kısımlarından herhangi birinin boş olduğunda yazdırmaya çalıştığımda eksik alanı uyarı olarak gösterip yazdırmaması mümkün müdür?
Yazdırmada Eksik Alan Uyarısı Ekleme
Sayın Çevik,
Öncelikle,
Eklediğiniz örnek uygulama üst sürüm olması nedeni ile,kendi adıma inceleme imkanı söz konusu olmamaktadır fakat,fikir vermesi için;
1)
Eğer sadece bu üç denetim için böyle bir kontrol istiyorsanız:
Benzeri bir kod kalıbı satırlarını kullanabilirsiniz.
2)
Eğer form üzerindeki bütün TextBox denetimlerinin hepsini kontrol ettirmek istiyorsanız:
Benzeri kod kalıbı satırlarını kullanabilirsiniz.
Bilginize…iyi çalışmalar,saygılar.
Öncelikle,
Eklediğiniz örnek uygulama üst sürüm olması nedeni ile,kendi adıma inceleme imkanı söz konusu olmamaktadır fakat,fikir vermesi için;
1)
Eğer sadece bu üç denetim için böyle bir kontrol istiyorsanız:
If IsNull(Me.HİZMET) or Me.HİZMET="" or IsNull(Me.Metin56) or Me.Metin56="" or IsNull(Me.Hizmet Tarihi) or Me.Hizmet Tarihi="" then
MsgBox("HİZMET, Metin56 ve Hizmet Tarihi denetimlerini doldurunuz.")
Exit Sub
Else
'yazdırma işlemi için kullandığınız kod satırını buraya ekleyiniz"
End If
Benzeri bir kod kalıbı satırlarını kullanabilirsiniz.
2)
Eğer form üzerindeki bütün TextBox denetimlerinin hepsini kontrol ettirmek istiyorsanız:
Dim kontroladi As Control
Dim booFilledBox As Boolean
For Each kontroladi In Me.Controls
If kontroladi.ControlType = acTextBox Then
If Not (IsNull(kontroladi.Value) Or kontroladi.Value = "") Then
booFilledBox = True
'yazdırma işlemi için kullandığınız kod satırını buraya ekleyiniz"
Exit Sub
Else
MsgBox ("Bu denetimi BOŞ geçmeyiniz.")
kontroladi.SetFocus
Exit Sub
End If
End If
Next kontroladi
Benzeri kod kalıbı satırlarını kullanabilirsiniz.
Bilginize…iyi çalışmalar,saygılar.
Sayın Çevik,
İfadenizde geçen bu yazma şekline yönelik olarak;
Muhtemel olsa gerek ki,uygulamanızdaki nesne (tablo,sorgu,form,…) adlarında ve alan adlarında Türkçe karakterler ve BOŞLUK bırakarak kullanma durumlarınız söz konusu.Bu nedenle,
Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Yukarıda bağlantısı yazılı konuyu incelemenizi ve içeriğindeki hususlara göre uygulamanızı yeniden düzenlemenizi naçizane tavsiye etmeyi uygun görmekteyim.
Böylece,ileride bu hususlardan kaynaklı ve muhtemel maruz kalabileceğiniz durumları da engelleme imkanı edinmiş olursunuz.
Elbette ki tercih ve takdir sizindir.
Bilginize…iyi çalışmalar,saygılar.
Alıntı:Hizmet Tarihi
İfadenizde geçen bu yazma şekline yönelik olarak;
Muhtemel olsa gerek ki,uygulamanızdaki nesne (tablo,sorgu,form,…) adlarında ve alan adlarında Türkçe karakterler ve BOŞLUK bırakarak kullanma durumlarınız söz konusu.Bu nedenle,
Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Yukarıda bağlantısı yazılı konuyu incelemenizi ve içeriğindeki hususlara göre uygulamanızı yeniden düzenlemenizi naçizane tavsiye etmeyi uygun görmekteyim.
Böylece,ileride bu hususlardan kaynaklı ve muhtemel maruz kalabileceğiniz durumları da engelleme imkanı edinmiş olursunuz.
Elbette ki tercih ve takdir sizindir.
Bilginize…iyi çalışmalar,saygılar.
Atoz hocam oncelıkle ılgınıze cok tesekkurler. Bu soylemıs oldugunuz kodu nereye eklıycem? hangi kısma?
Bu arada yazdırmayı makro olusturarak yapıyorum. Formu makro ile yardırma durumu söz konusu.
Bu arada yazdırmayı makro olusturarak yapıyorum. Formu makro ile yardırma durumu söz konusu.
Sayın Çevik,
1)
İfadenize yönelik olarak;
İlgili kodları,yazdırma işlemi için kullanılacak butonun TIKLANDIĞINDA olay yordamı içerisine aktarabilirsiniz (Kopyala – Yapıştır ile).
Aynı kodlar,form üzerinde bir KAYDET butonu mevcutsa bu butonun içeriğine de,kayıt öncesinde eğer boş denetim varsa uyarı mesajını vermesi sağlatılabilir.
Bir hatırlatmada bulunmak yerinde olacaktır,bir önceki mesajda bunu belirtmemiştim fakat şu an yeri gelmişken yazmak istiyorum.bu kontrol içeriği itibarı ile SADECE TextBox denetimleri için geçerlidir.diğer ComboBox veya başka denetimler için de kullanılmak istenirse,bu denetimlere göre tekrar düzenlenebilir.
2)
İfadenize yönelik olarak;
Konunuzun 3.mesajındaki bağlantının 6.mesajında da belirtildiği üzere,uygulamalarınızda kod yazma becerisi gelişimi edinmeniz adına,makro kullanımlarında bulunmamaya gayret ediniz.
YAZDIRMA işlemi için gerekli kod satırı olarak;
İfadesini,form üzerindeki yazdırma için kullanılacak butonun TIKLANDIĞINDA olay yordamı içerisine dahil ettiğinizde,Yazdırma Seçenekleri penceresi belirecektir.
Bilginize…iyi çalışmalar,saygılar.
1)
Alıntı:Bu soylemıs oldugunuz kodu nereye eklıycem? hangi kısma?
İfadenize yönelik olarak;
İlgili kodları,yazdırma işlemi için kullanılacak butonun TIKLANDIĞINDA olay yordamı içerisine aktarabilirsiniz (Kopyala – Yapıştır ile).
Aynı kodlar,form üzerinde bir KAYDET butonu mevcutsa bu butonun içeriğine de,kayıt öncesinde eğer boş denetim varsa uyarı mesajını vermesi sağlatılabilir.
Bir hatırlatmada bulunmak yerinde olacaktır,bir önceki mesajda bunu belirtmemiştim fakat şu an yeri gelmişken yazmak istiyorum.bu kontrol içeriği itibarı ile SADECE TextBox denetimleri için geçerlidir.diğer ComboBox veya başka denetimler için de kullanılmak istenirse,bu denetimlere göre tekrar düzenlenebilir.
2)
Alıntı:Bu arada yazdırmayı makro olusturarak yapıyorum. Formu makro ile yardırma durumu söz konusu.
İfadenize yönelik olarak;
Konunuzun 3.mesajındaki bağlantının 6.mesajında da belirtildiği üzere,uygulamalarınızda kod yazma becerisi gelişimi edinmeniz adına,makro kullanımlarında bulunmamaya gayret ediniz.
YAZDIRMA işlemi için gerekli kod satırı olarak;
DoCmd.RunCommand acCmdPrint
İfadesini,form üzerindeki yazdırma için kullanılacak butonun TIKLANDIĞINDA olay yordamı içerisine dahil ettiğinizde,Yazdırma Seçenekleri penceresi belirecektir.
Bilginize…iyi çalışmalar,saygılar.
Hocam bu resimdeki hatayı alıyorum. SEbebi nedir acaba?
Konuyu Okuyanlar: 1 Ziyaretçi