以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助，判断文本框非空状态  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=41948)
--  作者：zhang_yugang
--  发布时间：2013/10/30 21:35:00
--  求助，判断文本框非空状态

Dim lb1 As WinForm.Label = e.Form.Controls("Label1")
Dim tb1 As WinForm.Control =  e.Form.Controls("TextBox1")
If tb1 IsNot Nothing Then
    lb1.Text = " 1 "
Else
    lb1.Text = ""
End If

 

前辈们好，我是新人，刚接触Foxtable，实在弄不懂上面的代码是怎么回事了，不管Textbox1里有没有数值，Label1都显示为1。

老师们帮我看看吧，指点一下，谢谢！
--  作者：有点甜
--  发布时间：2013/10/30 21:41:00
--  
Dim lb1 As WinForm.Label = e.Form.Controls("Label1")
Dim tb1 As WinForm.Control =  e.Form.Controls("TextBox1")
If tb1.text > "" Then
    lb1.Text = " 1 "
Else
    lb1.Text = ""
End If
--  作者：zhang_yugang
--  发布时间：2013/10/30 21:45:00
--  
谢谢有点甜老师，Nothing不能判断文本框吗？
--  作者：有点甜
--  发布时间：2013/10/30 21:59:00
--  
 可以判断，但是需要这样判断

If tb1.text IsNot Nothing Then

End If
[此贴子已经被作者于2013-10-30 21:59:26编辑过]
--  作者：zhang_yugang
--  发布时间：2013/10/30 22:38:00
--  
谢谢，懂了！