如何实现VB里当鼠标点击输入框时,输入框内的提示文字自动消失

发布网友发布时间：2022-04-19 05:56

共2个回答

热心网友时间：2022-04-19 07:25

Private Sub Text1_GotFocus()
If Text1.Text = "提示文字" Then Text1.Text = ""
End Sub

Private Sub Text1_LostFocus()
If Text1.Text = "" Then Text1.Text = "提示文字"
End Sub

热心网友时间：2022-04-19 08:43

在text的单击事件下：

text1.text=""

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com