level 2
怎样使鼠标的指针移到程序text时,里面的文字变为全选 谢谢
2006年01月17日 11点01分
1
level 0
Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Text1.SelLength = Len(Text1.Text)End Sub'TEXT1 为TEXTBOX控件,试看
2006年02月02日 19点02分
4
level 2
Gotfocus 事件也可以还有在text1.Sellength上面加上 text1.Selstart=0为好从0开始全选
2006年02月03日 01点02分
5
level 0
"Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) Text1.SetFocus"
2006年02月03日 02点02分
6