Modülden kontrol ve setfocus sorunu
Tarih
16/03/2012 10:04
Konu Sahibi
juphen
Yorumlar
7
Okunma
1682
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



juphen
Üye
Kullanici Avatari
Üye
5
1
19/02/2012
0
Diyarbakır
Ofis 2010
18/12/2014,12:22
Çözüldü 
Merhaba. 10 a yakın formları olan bir veri tabanım var.Hemen hemen tüm formlarda benzer metin kutuları var. Bu denetimlerin boş olup olmadığını vb dan kontrol ediyorum.
Ancak her form için aynı denetimi yapmaktansa tek yerde yazıp tüm denetimlerde kullanmak istiyorum.Böylece gereksiz yere aynı kontrolu defalarca yazmamış olurum. Vba da yazılan kodda sorun yok Cancel as integer ifadesiyle boş olan denetimden çıkılmamasını sağlayabiliyoruz. Ancak modülde yazılan kodda msgboxtan sonra setfocus yapamıyorum. Bunu nasıl çözerim. Modülmü kullanmak makromu kullanmak daha sağlıklı?
örnek dosya ektedir.(Access 2010)

Ek Dosyalar
focus.rar

Public Sub Kontrol()
Dim cancel As Integer
If IsNull(sayi) Or IsEmpty(sayi) Then
MsgBox ("bir sayi giriniz")
Screen.ActiveForm.ActiveControl.SetFocus /Bu kod çalışmıyor.
End If
End Sub


Cevapla


alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
5.978
29/10/2008
Ordu
Ofis 2013 32 Bit
Bugün,15:21
Çözüldü 
Makroları unutun makro ile neredeyse hiç bir konuda bir yere varamazsınız. Örnek dosyanızı indirdim ancak mesajınızda ayrıntı vermediğinizi fark ettim.

Dosyada denetim isimli formda toplam alanına girince Msgbox komutu ile uyarı vermişsiniz. Alandan çıkınca bir uyarı vermiyor. Bu tip zorunlu alan uygulamalarında çalışma mantığı olarak yanlış ibr yöntem izliyorsunuz. Alana girince uyarı vermek yerine "Kaydetme" aşamasında zorunlu alanları kontrol ettirmeniz yerinde olacaktır. Eğer zorunlu alanlardan doldurulmamış alan var ise kayıt işlemini iptal edip, uyarı verdirip o alana odaklayabilirsiniz.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla


juphen
Üye
Kullanici Avatari
Üye
5
1
19/02/2012
0
Diyarbakır
Ofis 2010
18/12/2014,12:22
Çözüldü 
ekteki dosya küçük bir örnekti. Burda sayı alanından çıkınca boş denetimi yapmak istiyorum. sayi alanı boşsa mesaj verip sayı alanına geri dönsün istiyorum. Formun vb kaynağında rahatlıkla bunu yapıyorum.
ek örnek dosyada denetimler istediğim gibi yapılıyor. Ancak ana dosyamda birçok form ve bu fromlar üzerinde birbirine benzer birçok denetim var ve her denetim için aynı kodu yazmak zorunda kalıyorum. O yüzden Kontrol modülü şeklinde bir modülden benzer denetimler için tek kod yazıp denetimleri yapabilirmiyim.
Kaydettikten sonra denetim yapmayı bende düşündüm. Ancak otomatik sayı alanı önemli yani forma girildikten sonra otomatik sayı veriyor ve vazgeçildiğinde bir sonraki sayıdan devam ediyor. Bu da sıralamayı bozuyor.
Ek Dosyalar
focus.rar
Cevapla


alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
5.978
29/10/2008
Ordu
Ofis 2013 32 Bit
Bugün,15:21
Çözüldü 
Biraz acele ile oldu ama işini görecektir. Sadece Sayi isimli deneyim ve Açılan Kutu için ayarladım siz kendinize göre alanları seçebilirsiniz.


Ek Dosyalar
.rar   Boş_Alan_Kontrolü_Fonksiyonu.rar (Dosya Boyutu: 24,58 KB / İndirme Sayısı: 18)
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla


juphen
Üye
Kullanici Avatari
Üye
5
1
19/02/2012
0
Diyarbakır
Ofis 2010
18/12/2014,12:22
Çözüldü 
Emeğinize sağlık ama ben denetimden çıkıldığında denetim yapılsın mesajdan sonra da o denetime odaklansın istiyorum. Modulden setfocus yapılamıyorsa denetimin çıkıldığında olayında kod yazmak daha mantıklı gibi.
Cevapla


mk70
Aktif Üye
Kullanici Avatari
Aktif Üye
M.... K....
121
18/02/2010
37
Karaman
Ofis 2010 64 Bit
04/11/2016,21:11
Çözüldü 
İstediğiniz böyle birşey mi?

Ek Dosyalar
mk70_focus.zip
mk70, 18-02-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Sorguda yürüyen bakiye sorunu. Mecnun24 21 433 14/11/2016, 08:48 ates2014
  Access 2003'te dosya açılmama sorunu (Hata: 3033) MSami 13 306 05/11/2016, 21:06 alpeki99
Çözüldü Yazıcıdan birden fazla çıktı alma sorunu m_demir 7 171 02/11/2016, 19:27 m_demir
  Rapor Baskı Önizleme Sorunu m_demir 3 127 31/10/2016, 13:57 m_demir
  Formlar Arası Geçiş ve Form Tasarımı Sorunu mmert06 5 127 29/10/2016, 22:40 mmert06


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya