vb编程乐园吧 关注:33贴子:329
  • 0回复贴,共1

点中即全选

只看楼主收藏回复

Private Sub Text1_Click()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Text1.SetFocus
End Sub


1楼2008-11-20 18:36回复