Skip to main content

AccessTr.neT


textboxta imlecin olduğu yere, butonla karakter ekleme.

textboxta imlecin olduğu yere, butonla karakter ekleme.

Çözüldü #4
Peki ilgili metin kutusunun "tuşa basıldığında" olayına şu kodları yazıp dener misiniz?
Butonlar yerine F2 ve F3 tuşlarına basmalısınız.

Kod:
Private Sub Text0_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
    Case vbKeyF2
        Me.Text0 = Left(Me.Text0.Text, Me.Text0.SelStart) & Chr$(216) & Mid(Me.Text0.Text, Me.Text0.SelStart + 1)
        Me.Text0.SetFocus
    Case vbKeyF3
        Me.Text0 = Left(Me.Text0.Text, Me.Text0.SelStart) & Chr$(176) & Mid(Me.Text0.Text, Me.Text0.SelStart + 1)
        Me.Text0.SetFocus
    End Select
End Sub

.rar ornek001_seruz.rar (Dosya Boyutu: 8,98 KB | İndirme Sayısı: 10)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: textboxta imlecin olduğu yere, butonla karakter ekleme. - Yazar: Seruz - 10/12/2009, 12:35
Task