AccessTr.neT

Merhabalar

Private Sub Btn_Duzenle_Click()

Me.Tazminat_ID.Locked = False
Me.Tesisat_No.Locked = False
Me.Kesinti_No.Locked = False
Me.Dekont_No.Locked = False
Me.Islem_Tarihi.Locked = False
Me.Iban_No.Locked = False

Me.Btn_Guncelle.Visible = True
Me.Btn_Duzenle.Visible = False

End Sub
----------------------------------------------------
Private Sub Btn_Guncelle_Click()

Me.Tazminat_ID.Locked = True
Me.Tesisat_No.Locked = True
Me.Kesinti_No.Locked = True
Me.Dekont_No.Locked = True
Me.Islem_Tarihi.Locked = True
Me.Iban_No.Locked = True

Me.Btn_Guncelle.Visible = True
Me.Btn_Duzenle.Visible = False
----------------------------------------------------

Bu kodumda şu "Bir denetim odak üzerindeyken gizleyemezsiniz" hatayı alıyorum.

Bu konu hakkında yardımcı olabilir misiniz?

(01/04/2022, 13:53)footprinting yazdı: [ -> ]Me.Btn_Guncelle.Visible = True

bu satırda mı hata veriyor?

(01/04/2022, 13:53)footprinting yazdı: [ -> ]"Bir denetim odak üzerindeyken gizleyemezsiniz" hatayı alıyorum.

engellemek için isterseniz kodlar çalışmadan önce görünen/etkin olan bir nesneye odaklanmayı deneyebilirsiniz

Private Sub Btn_Duzenle_Click()

Me.Tazminat_ID.Locked = False
Me.Tesisat_No.Locked = False
Me.Kesinti_No.Locked = False
Me.Dekont_No.Locked = False
Me.Islem_Tarihi.Locked = False
Me.Iban_No.Locked = False

Me.Btn_Guncelle.Visible = True
Me.Btn_Duzenle.Visible = False

End Sub

Bu kodda

Me.Btn_Duzenle.Visible = False

kodunda hata alıyorum.

aynı mantık geçerli siz Btn_Duzenle butonuna bastığınızda buton seçilmiş olur dolayısıyla Me.Btn_Duzenle.Visible = False koduya görünmez yapmak için önce başka bir nesneye odaklanmalısınız. görünen herhangi bir metinn kutusu, düğme... fark etmez odak değişmeli

 AK_Ay.SetFocus

 Btn_Duzenle.Visible = False

gibi

tamam teşekkürler hocam