Skip to main content

AccessTr.neT


Basit boş kontrol örneği

Basit boş kontrol örneği

#13
Sayın Mecnun bey,
Ben sorunu çözemedim,uygulamaya çalıştığım form personel formudur.
Siteye yeni bir konu açtım konunu adı Onay Kutusu hk.Oradaki dosyadan bakabilirsin,nerede hata yaptığımı bulabilirsen memnun olurum.
Saygılarımla
İyi çalışmalar.
Cevapla
#14
(29/08/2015, 00:21)fascioğlu yazdı: nerede hata yaptığımı bulabilirsen memnun

Sizin yaptığınız hata yok, Mecnun'un örneği formdaki denetimlerin item numarasına göre kontrol yapıyor. Bu yüzden boş kontrol olayı karışık kontrol ediyor. Denetimin item numarası nasıl değişir bilmiyorum.

Aşağıdaki kodu deneyiniz. Kod denetimlerin sekme dizini sayısına göre kontrol ediyor.

Dim Sayi, Bilgi, DenetimSayisi As Integer
Dim ctl As Control

DenetimSayisi = Me.Controls.Count - 1

For Sayi = 1 To DenetimSayisi
For Each ctl In Controls

If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then
If ctl.TabIndex = Sayi Then
If Len(ctl.Tag) <> 0 And Not IsNull(ctl.Tag) Then
If ctl.Value = "" Or IsNull(ctl.Value) Then
MsgBox (ctl.Tag & " boş bıraktınız")
ctl.SetFocus
Exit Sub
End If
End If
End If
End If

Next
Next Sayi
Bilgi = MsgBox("Yapılan değişiklikler kaydedilsin mi", vbInformation + vbYesNoCancel)
Select Case Bilgi
Case 6 'evet
DoCmd.RunCommand acCmdSaveRecord
Case 7 'hayır
Me.Undo
Case 2 'iptal
Exit Sub
End Select

Denetim yapılmasını istediğiniz alanların im özelliğine açıklama giriniz.
Cevapla
#15
Ben kod diye buna derim. Elinize sağlık sayın ozanakkaya. Ben c#'de kullandığım metodu, acemice accesse uygulamaya çalıştım.
Cevapla
#16
Sayın Ozan hocam,
Super olmuş emeğinize sağlık.
Saygılarımla.
İyi çalışmalar.
Cevapla
#17
(29/08/2015, 09:11)Mecnun24 yazdı: Ben kod diye buna derim. Elinize sağlık sayın ozanakkaya. Ben c#'de kullandığım metodu, acemice accesse uygulamaya çalıştım.
(29/08/2015, 10:06)fascioğlu yazdı: Sayın Ozan hocam,
Super olmuş emeğinize sağlık.
Saygılarımla.
İyi çalışmalar.

Rica ederim, ifleri birleştirmeye çalışmayın kod çakılır.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da