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全选文本框内容
本文地址:http://bzwzjz.com/article/dojodpd.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 成都网站建设 网站设计公司 成都网站设计 网站制作 成都企业网站建设 成都模版网站建设 重庆网站设计 网站制作公司 成都网站制作 重庆网站制作 成都网站设计 自适应网站建设 网站建设改版 高端品牌网站建设 成都网站制作 网站建设费用 做网站设计 手机网站制作 手机网站建设套餐 公司网站建设 网站建设 重庆企业网站建设