Merhaba
Bir butonun olayına içinde metin olan bir textbox'ın metninin sonuna imleç haline gitme olayını nasıl yapabilirim.
İyi çalışmalar
#1
textbox içine girme
#1
#2
İStediğiniz Kod Aşağıdadır.
Len Komutu Metinin Uzunluğunu Verir...
Bir Metin Kutusunda Seçim YApabilmek İçin Setfocus Komutu İle İlgili Yere Getiriyoruz İmleci
SelStart İle Seçime Başlanacak Nokta Bildiriliyor.
SelLEnght Komutuda Kaç KArakter Seçmek İStediğimizi Gösterir... (Burada İmlecin Sona Gelmesi Söz Konusu Olduğundan SelLEnght Kullanılmamıştır.)
Kolay Gelsin
Len Komutu Metinin Uzunluğunu Verir...
Bir Metin Kutusunda Seçim YApabilmek İçin Setfocus Komutu İle İlgili Yere Getiriyoruz İmleci
SelStart İle Seçime Başlanacak Nokta Bildiriliyor.
SelLEnght Komutuda Kaç KArakter Seçmek İStediğimizi Gösterir... (Burada İmlecin Sona Gelmesi Söz Konusu Olduğundan SelLEnght Kullanılmamıştır.)
Kolay Gelsin
Kod:
Private Sub Komut1_Click()
Me.Metin1.SetFocus
Me.Metin1.SelStart = Len(Me.Metin1)
End Sub
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
ustalar konuşunca çıraklar keser sesi.
#4
Katkı için teşekkür...
#5
Private Sub CEPTEL_Click()
If IsNull(Me.CEPTEL) Then
'If Trim(Me.CEPTEL & " ") = "" Then
'Me.CEPTEL.SetFocus
Me.CEPTEL.SelStart = 0
Else: Me.CEPTEL.SetFocus
'Me.CEPTEL.SelStart = Len(Me.CEPTEL.Text)
End If
End Sub
bunu dene burda eğer içi boş ise ilk hücreye,başa,dolu ise istediğin yani tıkladığın yere gidersin daha kullanışlı
özellikle telefon alanları için iyi kolay gelsin
If IsNull(Me.CEPTEL) Then
'If Trim(Me.CEPTEL & " ") = "" Then
'Me.CEPTEL.SetFocus
Me.CEPTEL.SelStart = 0
Else: Me.CEPTEL.SetFocus
'Me.CEPTEL.SelStart = Len(Me.CEPTEL.Text)
End If
End Sub
bunu dene burda eğer içi boş ise ilk hücreye,başa,dolu ise istediğin yani tıkladığın yere gidersin daha kullanışlı
özellikle telefon alanları için iyi kolay gelsin
#6
Sayın C*E*L*O*Y*C*E;
Bu güzel katkınız için, teşekkür ederim hocam...
Sevgi ve saygılar...
Bu güzel katkınız için, teşekkür ederim hocam...
Sevgi ve saygılar...
Konuyu Okuyanlar: 1 Ziyaretçi
