Buton İle TextBox'a Veri Girişi

[cenk e.]

Merhaba, butona tıkladıkça TextBox'da verinin istediğim yerine veri girişi yapsın istiyorum. Yardımcı olabilirseniz sevinirim.
Saygılarımla...

 

[Korhan Ayhan]

Aşağıdaki kodu deneyiniz.

Private Sub CommandButton2_Click()
    X = TextBox1.SelStart
    TextBox1 = Replace(Mid(TextBox1, 1, X) & " ALİ " & Mid(TextBox1, X + 1, Len(TextBox1)), "  ", " ")
    TextBox1.SelStart = X + 4
    TextBox1.SetFocus
End Sub

 

[cenk e.]

Korhan Bey çok teşekkür ediyorum...