vb的程序 Private Sub Text1_Click() Text1.Text = "" Text2.Text =...

发布网友发布时间：2024-03-04 14:04

共4个回答

热心网友时间：2024-03-05 00:00

用一个布尔量

热心网友时间：2024-03-05 00:05

你的意思是说Text1文本框只能清除一次？代码如下：
Private Sub Text1_Click()
Static f As Boolean
If Not f Then
f = True
Text1.Text = ""
Text2.Text = "你好"
End If
End Sub

热心网友时间：2024-03-05 00:01

Private Sub Text1_Click()
If Text1.Text = "" Then

Text2.Text = ""
Text1.Text = "小明"
End If

End Sub

热心网友时间：2024-03-05 00:00

直接将这两句话放到文本框获得焦点事件中，不知道是不是你需要的，你说得不是很清楚。

Private Sub Text1_GotFocus(Index As Integer)
Text2.Text = ""
Text1.Text = "小明"
End Sub

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

vb的程序 Private Sub Text1_Click() Text1.Text = &quot;&quot; Text2.Text =...