AccessTr.neT
Metin Kutularını Gizleme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Metin Kutularını Gizleme (/konu-metin-kutularini-gizleme.html)

Sayfalar: 1 2


Metin Kutularını Gizleme - ali288 - 17/02/2010

Arkadaşlar merhaba

Sihirbazı kullanarak oluşturmuş olduğum formda alt alta ve yan yana 13 tane metin kutusu var, veri girişi yaptığım kutu aktif olsun.
Diğerine(alt satıra) geçmedikçe diğer kutular gizlensin birde, kaydet ve sil butonu giriş yapılan kutunun hep altında olsun.
(2007 kullanıyorum)

Teşekkürler...Halay


Cvp: Metin Kutularını Gizleme - Hayri16 - 17/02/2010

Sayın Ali288;
Nesnelere ait dediğiniz türden 2 seçenek var.
1- Nesne görünür ama işlevselliği yoktur. (Pasif olması)
Nesneismi.enabled= False 'Pasif yapar
Nesneismi.enabled=True ' aktif yapar
2- Nesne form üzerinde vardır ama çalışırken görünmez.
Nesneismi.visible=false 'Görünmez
Nesneismi.visible=True ' görünür.

Bu bilgilere dayanarak formunuzu düzenleyebilirsiniz. Her nesnenin güncelleme sonrasına
bir sonraki sekme sırasındaki nesneyi aktifleştiren veya görünür yapan kodu eklersiniz.
Bir sonraki nesneye geçtiğinizde (setfocus olayı) bir önceki nesneyi pasif veya görünmez yaparsınız.
Burada dikkat edilecek konu bir nesneyi üzerindeyken görünmez veya pasif yapamazsınız.
Bu kısımları halledin kayıt tuşlarını gezdirmeyi sonra çözeriz.
Saygılarımla kolay gelsin.


Cvp: Metin Kutularını Gizleme - ali288 - 17/02/2010

Sayın Hayri16
Bahsetmiş olduğunuz

"Her nesnenin güncelleme sonrasına
bir sonraki sekme sırasındaki nesneyi aktifleştiren veya görünür yapan kodu eklersiniz"

Bu olayı nasıl yapabilirim biraz daha açar mısınız?

İlginize teşekkürler...


Cvp: Metin Kutularını Gizleme - Hayri16 - 17/02/2010

Sayın ali288;
Formunuzda ilk sıranın sabit olduğunu varsayarak ikinci sıranın başında bulunan "İŞEMRİ1" kutusu için örnek yapalım.
Kod:
Private Sub Metin24_AfterUpdate() 'Metin24 ün güncelleştirme sonrası işlem prosedürü
Metin26.Visible = True ' Metin26 yı görünür yap
Metin26.SetFocus ' İmleci Metin 26 ya götür
End Sub

Private Sub Metin26_GotFocus()  ' İmleç Metin26 üzerinde iken işlem  prosedürü
Metin24.Visible = False 'Metin24 ü görünmez yap
End Sub

Tabi başlangıçta Metin26 yı görünmez yapmayı unutma.
Yani
Private Sub Form_load()
Metin26.Visible=false
End Sub
kodlarını yaz.
Kolay gelsin.


Cvp: Metin Kutularını Gizleme - ali288 - 17/02/2010

Sizden öğreneceğimiz çok şey var

İlginize teşekkürler...


Cvp: Metin Kutularını Gizleme - Hayri16 - 17/02/2010

Teşekkür ederim Sayın ali288;
Hepimizin Access Tr 'den öğreneceği çok şey var.