VB只有当文本框中输入了文本后，命令按钮才能有效的代码
展开全部
Private Sub Form_Load() '窗体启动时将按钮设为无效
Command1.Enabled = False
End Sub
Private Sub Text1_Change()
If Len(Text1) > 1 Then Command1.Enabled = True
'当文本框中有内容时将按钮设为有效
End Sub
Command1.Enabled = False
End Sub
Private Sub Text1_Change()
If Len(Text1) > 1 Then Command1.Enabled = True
'当文本框中有内容时将按钮设为有效
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
text1_change_sub
if text1.text<> "" then command1.enabel=true else command1.e=f
sub
自己稍加修改
if text1.text<> "" then command1.enabel=true else command1.e=f
sub
自己稍加修改
参考资料： z
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
