您的位置:程序门 -> vb -> 基础类



请教各位,怎么让文本框获得焦点时文本的原来内容为全部选定状态?


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


请教各位,怎么让文本框获得焦点时文本的原来内容为全部选定状态?[已结贴,结贴人:zhuhuofong]
发表于:2007-07-11 21:05:53 楼主
请教各位,怎么让文本框获得焦点时文本的原来内容为全部选定状态?
  这样做为了在下次输入时方便。
发表于:2007-07-11 21:39:361楼 得分:10
private   sub   textselectall(byval   atext   as   textbox)
        atext.selstart   =   0
        atext.sellength   =   len(atext.text)
end   sub

private   sub   text1_gotfocus()
        textselectall   text1               '调用textselectall即可
end   sub
发表于:2007-07-11 21:43:322楼 得分:0
谢谢!textselectall是一个自定义的过程吗?
发表于:2007-07-11 21:45:393楼 得分:0
自定义的

private   sub   textselectall(byval   atext   as   textbox)
atext.selstart   =   0
atext.sellength   =   len(atext.text)
end   sub

你自己调用就好了
发表于:2007-07-11 21:59:414楼 得分:0
不好意思,结贴时我没看清楚,以为是同一个人。没给分,结贴后能不能再追加给分。不过还是谢谢   你的热心回贴。


快速检索

最新资讯
热门点击