以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=50048)
--  作者：188802386
--  发布时间：2014/4/28 15:41:00
--  求代码
模糊查询后面是个 "textbox1"  后面有个新增按钮“Button5"  
请问 如何实现   ”textbox1"  为空时 禁止新增   "textbox1"不为空时则可以新增呢 
--  作者：有点甜
--  发布时间：2014/4/28 15:42:00
--  

 If e.Form.Controls("TextBox1").Text > "" Then

      \'新增

 Else

     Msgbox("不能新增")

 End If
--  作者：Bin
--  发布时间：2014/4/28 15:44:00
--  
if e.form.controls("TextBox1").text="" then
  e.form.controls("Button5").Enabled=false
else
e.form.controls("Button5").Enabled=true
end if
--  作者：188802386
--  发布时间：2014/4/28 15:54:00
--  
谢谢