Buton gizleme hk.

16/12/2016, 13:10

okumas

Arkadaşlar tıkladığım butonu gizlemek istiyorum. 
Fakat hata alıyorum Bu işlemi nasıl yapabilirim.

Ornek.Visible = False  'Bu buton gizleme için kullanıyorum tıkladığım buton ( Ornek ) tıklandığında kendinide gizleyecek.
16/12/2016, 13:20

atoz112

sayın okumas,

bahsettiğiniz talebinize yönelik olarak;

bir denetimi,eğer odak kendi üzerindeyken direkt olarak gizleyemezsiniz.

gizleme kodu öncesinde,başka bir denetimi odak olarak göstermelisiniz.

örnek:

gizlenmek istenen butonun TIKLANDIĞINDA olay yordamı içerisinde

Private Sub gizlenmek_istenen_butonun_adi_Click()

If Me.gizlenmek_istenen_butonun_adi.Visible = True Then

Me.bir_baska_denetimin_adi.SetFocus
Me.gizlenmek_istenen_butonun_adi.Visible = False

End If


End Sub

kod kalıbını kullanarak deneyiniz.

bilginize...iyi çalışmalar,saygılar.
16/12/2016, 13:25

atoz112

sayın okumas,

EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
16/12/2016, 13:34

okumas

(16/12/2016, 13:25)atoz112 yazdı: sayın okumas,

EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.



Teşekkür ederim sorunum çözülmüştür. Elinize sağlık. 


Private Sub Yeni_Kayıt_Ekle_Click()
'Bu yeni kayıt ekle butonuna basınca yeni kayıt butonunu gizler
DoCmd.GoToRecord , , acNewRec 'Yeni kayıt oluşturan kod
If Yeni_Kayıt_Ekle.Visible = True Then
Me.Açılan_Kutu41.SetFocus
Me.Yeni_Kayıt_Ekle.Visible = False
End If

End Sub