AccessTr.neT
etikete odaklanınca metin kutusuna gitsin - 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ığı: etikete odaklanınca metin kutusuna gitsin (/konu-etikete-odaklaninca-metin-kutusuna-gitsin.html)

Sayfalar: 1 2


etikete odaklanınca metin kutusuna gitsin - aydın3838 - 11/09/2014

selam
formda etiket ile metin kutusu bağlı değil
istiyorum ki etikete tıklayınca metin kutusuna setfocus (gitsin) bir çok denememe rağmen yapamadım

örneğin etiket adı "metin1_etiket" metin kutusu adı "metin1"
etikete tıkladığımda etiket adından "_etiket" kısmını çıkarıp ilgili metine odaklanacak

yada kod üzerinde yardımcı olabilirmisiniz

Private Sub lblgostermavi(LblKutux As Label)
Dim frmadi As Form
Set frmadi = Screen.ActiveForm
Dim txt As Object
Set txt = Mid(LblKutux.Name, 1, Len(LblKutux.Name) - 7)
frmadi!txt.setfocus
End Sub



Cvp: etikete odaklanınca metin kutusuna gitsin - C*e*l*o*y*c*e - 11/09/2014

Merhaba

Private Sub metin1_Etiket_Click()
Me.metin1.SetFocus
End Sub

Private Sub metin2_Etiket_Click()
Me.metin2.SetFocus
End Sub

bunları ekleyin


Cvp: etikete odaklanınca metin kutusuna gitsin - aydın3838 - 11/09/2014

selam
cevap için teşekkürler
sayın celoyce cevap komik oldu galiba
örnekte bu modülde olmalı ve tüm formlarda kullanmam gerekli
cevabınızı değerlendirdiğimde yaklaşık 1000 den fazla kod kullanmam gerekli

saygılarımla


Cvp: etikete odaklanınca metin kutusuna gitsin - C*e*l*o*y*c*e - 11/09/2014

Komik olan cevap değil ,Soru seklini yanlis anlatman yada anlamam


Cvp: etikete odaklanınca metin kutusuna gitsin - mehmetdemiral - 11/09/2014

instr ile "_" işaretine kadar olan ismi aldırıp setfocus ile oraya odaklanacaksınız. Bunu formun geçerli olduğunda olayına yazarsanız ya da bir altyordam yazıp ordan çalıştırırsanız işiniz görülür. Ben yolu söyleyip sizin yapmanız için zaman tanıyorum. Lütfen sitedeki arkadaşlar cevabı yayınlamasınlar ki üyeler de bir şey öğrenmenin zevkini yaşayıp bu arada araştırma yoluyla da kendilerini geliştirebilsinler. İnşallah mesaj yerine ulaşır.

Bu arada Celoyce haklı, çünkü ilk mesajınızda ne yapmak istediğinizi yanlış anlatmışsınız. Ben de aynı Celoyce'nin dediği gibi anladım. Oysa sizin demek istediğiniz, etiket adlarından otomatik olarak metin kutularına odaklanma ile ilgili bir durum. Buna benzer bir buton olayı örneği yayınlamıştık. Bulursam sizi yönlendirim.


Cvp: etikete odaklanınca metin kutusuna gitsin - aydın3838 - 11/09/2014

selam
insanların bazen espri yapma zamanları olur
bende sayın arkadaşlarımın konuyu okuyup örneği incelediği varsayıp
espri yaptığını anladım ve buna dayanarak cevap yazdım
art niyet arama niyetim ve düşüncem bulunmamakta
yanlış anlaşılmadan dolayı özür diler kullanmaları için ek dosyayı ekte sundum

konu çözülmüştür
saygılarımla