vb.net textbox.TEXT 鼠标一点全部选择

lalawo 发布于 2013-06-19 21:19， 629 次点击

如题：vb6中鼠标可以点击文本框就会全部选择并且字体颜色变成蓝色。
Private Sub Text100_GotFocus()
Text100.SelStart = 0
Text100.SelLength = Len(Text100.Text)
End Sub

那么在该如何搞定？谢谢

1 回复

lalawo2013-06-19 22:08

倒，这里还没有百度问
已经搞定啦
    Private Sub TextBox1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Click
        TextBox1.SelectAll()
    End Sub

vb.net textbox.TEXT 鼠标一点 全部选择

vb.net textbox.TEXT 鼠标一点全部选择