'hy_Renklendirme_________________________________ satırının altına aşağıdaki kodu ekler misiniz?
If Len(Nz(Me.txtUyeNo, "")) = 0 Then Exit Sub ' <-- sadece bu satır eklenecek

'hy_Renklendirme_________________________________

If Len(Nz(Me.txtUyeNo, "")) = 0 Then Exit Sub ' <-- sadece bu satır eklenecek

Dim AidtRS As New ADODB.Recordset

(19/02/2020, 16:08)berduş yazdı: 'hy_Renklendirme_________________________________ satırının altına aşağıdaki kodu ekler misiniz?
If Len(Nz(Me.txtUyeNo, "")) = 0 Then Exit Sub ' <-- sadece bu satır eklenecek

'hy_Renklendirme_________________________________

If Len(Nz(Me.txtUyeNo, "")) = 0 Then Exit Sub ' <-- sadece bu satır eklenecek

Dim AidtRS As New ADODB.Recordset

Degısen bır sey olmadı Sn.@berduş altformdaki kapat butonu tepkisiz formdan kaldırıyorum o butonu bu form sadece burada gömülü kullanılacak anaformun kapat butonundaki hata bu şekilde giderildi nasılsa, bu şekilde kullanılabilir. MemberList - UyeListesindeki UyeNo alanına çift tıklandığında bilgilerin neden gelmediğine dair bir yorumunuz varmı çalışan kod çalışmaz oldu. Aidat izleme bölümüne listeden ulaşabilmemin yolu orası ama nasıl oldu da çalışmıyor anlayamadım.

Sn@berduş konuyu taşıyabilirsiniz onuda çözdüm teşekkür ederim.