Skip to main content

AccessTr.neT


Buton gizleme hk.

Buton gizleme hk.

#1
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.
Cevapla
#2
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.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#3
sayın okumas,

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

bilginize...iyi çalışmalar,saygılar.
.rar ButonGizleme-ATOZ.rar (Dosya Boyutu: 20,92 KB | İndirme Sayısı: 9)
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#4
(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
Son Düzenleme: 16/12/2016, 13:47, Düzenleyen: okumas.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task