让鼠标进入TextBox时自动选定TextBox中之整串文字

2016-02-19 18:29 25 1 收藏

今天图老师小编给大家展示的是让鼠标进入TextBox时自动选定TextBox中之整串文字,精心挑选的内容希望大家多多支持、多多分享,喜欢就赶紧get哦!

【 tulaoshi.com - 编程语言 】

这个自动选定反白整串文字的动作,会使得输入的资料完全取代之前在TextBox中的所有字符。

PrivateSubText1_GotFocus()
  Text1.SelStart=0
  Text1.SelLength=Len(Text1)
  EndSub->

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)

来源:http://www.tulaoshi.com/n/20160219/1617850.html

延伸阅读
标签: Web开发
body{ font-family: verdana; font-size: .9em; } input, textarea, pre{ font-family: verdana; font-size: inherit; font-family: inherit; } label{ width: 110px; } #userName, #userName_field{ font-size: 14px; } #cityName, #cityName_field{ font-size: 14px; background-color: #333; color: #fff; } #blogTitle, #blogTitle_field...
作为轻量级的控件,TextBox控件使用率很高,但相关的资料极少谈及如何用TextBox控件打开和保存文件,大都采用回避的态度,对VB初学者带来很多不便。笔者近日为友人做一个英文朗读软件,按友人的要求,软件要能象MS的记事本那样能打开和保存文档。其实实现方法并不复杂,现将心得写出来,希望对大家有帮助。如果您有更好的方法,请来信:handanfa...
'在form中放一个textBox两个labelConst EM_GETSEL = &HB0Const EM_LINEFROMCHAR = &HC9Const EM_LINEINDEX = &HBBPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" _(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _lParam As Any) As LongPublic Sub Get...
这是使用EM_GETLINE message来做,比较奇特的是lParam是指向一个字串所在的位置,但是该字串传入时,前两个Byte要存该字串允许的最大长度。 '以下在Form需一个TextBox,并设定MultiLine = True, 一个Command ButtonPrivate Sub Command1_Click()Dim str5 As Stringstr5 = GetaLine(Text1,1) '取得第二行的字串,以0为基底En...
标签: ASP
1.整个页面的判断 foreach(Control ctl in this.Controls.Controls) {  if(ctl.GetType().Name=="TextBox")  {   TextBox tb =new TextBox();   tb=(TextBox)this.FindControl(ctl.ID);      if(tb.Text==string.Empty)   {    Response.Write("<scriptalert('...

经验教程

641

收藏

50
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部