Metin Kutusuna Yazarken Satır Kontrolü

1 2 3
05/12/2016, 12:08

musteri53

Arkadaşlar, Formda satırlar şeklinde sıralanmış birden çok metin kutusu var. Metin kutusuna 50 karakterden fazla girdiğimde kontrol etsin ve imleç diğer satıra geçsin. Yardımcı olacak arkadaşlara şimdiden teşekkürler.
05/12/2016, 14:27

atoz112

sayın musteri53,

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

son olarak;
Site Kuralları sayfasında yazılı hususları tekrar incelemenizi temenni etmekle birlikte,
lütfen,konu başlığı ifadelerinizi BÜYÜK HARF ile yazmamaya gayret ediniz.teşekkürler.

bilginize...iyi çalışmalar,saygılar.
05/12/2016, 20:00

musteri53

Sayın atoz112, teşekkür ederim. Yalnız 50 karakter yazıldığında imleç diğer alana gidiyor ancak karakter sayısı dolu olan alan üzerinde geri silme tuşunu kullanmaya izin vermiyor. Nasıl bir kod ilavesi yapmalıyız.
05/12/2016, 20:16

atoz112

sayın musteri53,

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

bilginize...iyi çalışmalar,saygılar.
05/12/2016, 20:53

musteri53

Çok teşekkür ederim.
06/12/2016, 11:32

musteri53

Sayın atoz112, Satırı geri tuşuyla silerken imleç üstteki satırın son karakterine gitmesi için şu koda hangi ilave yapılmalı. Sonraki satıra geçerken de son bastığımız karakteri yazması için nasıl bir kod yazmalıyız.

Private Sub S2_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete Then
If KeyAscii = vbKeyBack And Len(Me.S2.Text) = 0 Then Me.S1.SetFocus: KeyAscii = 0
Else:
If Len(Me.S2.Text) >= 50 Then Me.S2.SetFocus: KeyAscii = 0
End If
End Sub
1 2 3