Textbox taki değerin seçilmesi

[mnz]

Textbox a tıklandığında içinde yazılı olan verilerin hepsinin seçilmesini nasıl sağlarız. (Kopyalalamak için bir kelimeyi seçtiğimiz / kararttığımız gibi)

 

[N.Ziya Hiçdurmaz]

yanıt

Text lere girilen verileri seçili yapar.

Private Sub CommandButton1_Click()
TextBox1.SetFocus
TextBox1.SelStart = 0
TextBox1.SelLength = Len(TextBox1)
End Sub

 

[Haluk]

Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    With TextBox1
        .SelStart = 0
        .SelLength = Len(TextBox1)
    End With
End Sub

 

[Haluk]

Hmmm... ekranı güncellemeyi unutmuşum.

 

[mnz]

Sayın V.Basic For Applications ve Haluk Bey teşekkür ediyorum. Süper oldu.