网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vb.net文本框全选中 vb全选文本框内容

vb.net textbox1.text 鼠标一点 全部选择

Private Sub TextBox1_Click(sender As Object, e As EventArgs) Handles TextBox1.Click

成都创新互联公司坚持“要么做到,要么别承诺”的工作理念,服务领域包括:做网站、成都网站设计、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的雨山网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!

TextBox1.SelectAll()

TextBox1.ForeColor = Color.Blue

End Sub

如果不想每次都这样的话,就加一个if判断TextBox1.ForeColor 是否是Color.Blue就可以了

VB怎么让文本框单击全选

Option Explicit

'全选文本框中文本

Private Sub SelectAll()

Text1.SelStart = 0

Text1.SelLength = Len(Text1.Text)

Text1.SetFocus

End Sub

Private Sub Command1_Click()

'点击Command1,全选文本

SelectAll

End Sub

Private Sub Form_Click()

'点击窗体,全选文本

SelectAll

End Sub

vb中如何通过点击按钮,全选文本框中所有文字?

1)在窗体上布置一个TextBox和一个Command控件

2)窗体代码

Option Explicit

Private Sub Command1_Click()

'选择文本框中所有文本

With Text1

.SelStart = 0

.SelLength = Len(Text1.Text)

'让文本框获取焦点

.SetFocus

End With

End Sub

Private Sub Form_Load()

'在TextBox中显示一些文本

Text1.Text = "Visual Basic是一种可视化程序设计语言"

'命令按钮的提示

Command1.Caption = "选择所有文本"

End Sub


网页标题:vb.net文本框全选中 vb全选文本框内容
网页URL:http://bjjierui.cn/article/dojodpd.html

其他资讯