请问如何做到某Lable为空时禁用某按钮,有内容时启用?

谢紫枫 2003-08-29 07:11:09
想做一个类似微软文本关键字查询的东东!
但是怎样才可以在查询信息框有东西时启用查找按钮
查询框一为空时查询按钮就立刻被禁用?
...全文
46 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
pigpag 2003-08-29
  • 打赏
  • 举报
回复
呵呵,Not
pigpag 2003-08-29
  • 打赏
  • 举报
回复
//If Len(Text1.Text) = 0 Then Command1.Enabled = False Else Command1.Enabled = True

Command1.Enabled = (Len(Trim(Text1.Text)) = 0)
goodname008 2003-08-29
  • 打赏
  • 举报
回复
对了,你的问题的标题中说用Label,实际上应该用Text啊。
goodname008 2003-08-29
  • 打赏
  • 举报
回复
' 需要在窗体上添加一个TextBox和一个CommandButton

Option Explicit

Private Sub Text1_Change()
If Len(Text1.Text) = 0 Then Command1.Enabled = False Else Command1.Enabled = True
End Sub

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧