Liste Kutusundaki Boş Alana Çift Tıklayınca Vb Hatası

11/02/2022, 09:47

akdemir1

Merhaba değerli hocalarım,
Liste kutusundaki herhangi bir kayda çift tıklayınca istediğim gibi yeni bir formda gerekli bilgileri açıyor buraya kadar sorun yok,
Ama liste kutusunda boş bir alana çift tıkladığımda hata alıyorum.
Liste kutusundaki çift tıkladığında olay yordamı aşağıdaki gibi,
Yardımlarınız için şimdiden çok teşekkür ederim.

Private Sub Liste2_DblClick(Cancel As Integer)

DoCmd.OpenForm "FRM_ANA_TABLO", , , "[ABONE_NO]=" & Me.Liste2.Column(0)

End Sub
11/02/2022, 21:17

lemoncher2

Merhaba Aşağıdaki gibi denermisin.


Kod:
Private Sub Liste2_DblClick(Cancel As Integer)
if isnull(Me.Liste2.Column(0)) or Me.Liste2.Column(0) ="" then
else
DoCmd.OpenForm "FRM_ANA_TABLO", , , "[ABONE_NO]=" & Me.Liste2.Column(0)
end if
End Sub
12/02/2022, 20:07

akdemir1

İstediğim tamda buydu hocam
Elinize emeğinize sağlık, çok teşekkür ederim.
Konu çözülmüştür.