如何判断在“文本框”为空的情况 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何判断在“文本框”为空的情况

共有1756人关注过本帖树形打印复制链接主题：如何判断在“文本框”为空的情况

njl2016k9

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：27 积分：288 威望：0 精华：0 注册：2016/10/24 9:41:00

如何判断在“文本框”为空的情况 发帖心情

Post By：2016/11/23 9:55:00 [只看该作者]

请问：

如何判断在“文本框”为空的情况下，（也就是没有输入任何内容的情况下）不做任何事。

Dim rq As WinForm.TextBox = e.Form.Controls("日期")

If rq.Text=" " t Then

Nothing

Else

Tables("订单").AddNew

Dim i As Integer = Tables("订单").Rows.Count

Tables("订单").Rows(i-1)("日期")=rq.Text

End If

是这样写吗？

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2016/11/23 10:08:00 [只看该作者]

Dim rq As WinForm.TextBox = e.Form.Controls("日期")

If rq.Text > "" Then

Dim dr As Row = Tables("订单").AddNew

dr("日期")=rq.Text

End If

另外日期型数据最好使用日期控件，不要使用文本框

Dim rq As WinForm.DateTimePicker = e.Form.Controls("日期")

If rq.Value IsNot Nothing Then

Dim dr As Row = Tables("订单").AddNew

dr("日期")=rq.Value

End If

njl2016k9

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：27 积分：288 威望：0 精华：0 注册：2016/10/24 9:41:00

Post By：2016/11/23 10:46:00 [只看该作者]

感谢！

主题：如何判断在“文本框”为空的情况