UC知道一个简单的VB题
来源：百度知道 编辑：UC知道 时间：2024/06/08 03:31:25
在名称为Form1的窗体上，画一个文本框和一个命令按钮。文本框的名称为Txt1。命令按钮名称为Cmd1，标题为"确定"。编写适当的事件过程，使程序运行时，初始状态下文本框为空，命令按钮有效。当文本框输入内容后，命令按钮变为无效。
我的代码如下
Private Sub Form_Load()
If Txt1.Text = "" Then
Cmd1.Enabled = True
Else
Cmd1.Enabled = False
End If
End Sub
当在文本框输入数字时，命令按钮为什么没有变无效啊
我的代码如下
Private Sub Form_Load()
If Txt1.Text = "" Then
Cmd1.Enabled = True
Else
Cmd1.Enabled = False
End If
End Sub
当在文本框输入数字时，命令按钮为什么没有变无效啊
Private Sub Form_Load()
Text1.Text = ""
End Sub
Private Sub Text1_Change()
If Text1.Text <> "" Then
Command1.Enabled = False
else
command1.enabled=true
end if
End Sub
Private Sub Form_Load()
Text1.Text = ""
End Sub
Private Sub Text1_Change()
Command1.Enabled = (Text1.Text = "")
End Sub
txt1的TextChanged下写下这个代码
If Txt1.Text = "" Then
Cmd1.Enabled = True
Else
Cmd1.Enabled = False
End If
直接双击Txt1文件框就好
Private Sub Text1_LostFocus()
If Txt1.Text <> "" Then
Cmd1.Enabled = False
End If
End Sub
焦点离开文本框时判断文本框里是否有输入的内容。
在Txt1的TextChange事件中加入如下代码
cmd1.enabled=false