Office中国论坛/Access中国论坛

标题: [求助]如何清空文本框,使其为null [打印本页]

作者: 田野 时间: 2002-6-9 08:25
标题: [求助]如何清空文本框,使其为null
主窗体有几个文本框，把文本框作为条件输入口，有时要重新设置条件，我是用比较笨的办法，请教好的语句。谢谢
Private Sub Command45_Click()
凭证号.SetFocus
凭证号.Text = " "
物料名称.SetFocus
物料名称.Text = " "
物料编号.SetFocus
物料编号.Text = " "
日期.SetFocus
日期.Text = " "
仓库.SetFocus
仓库.Text = " "
供应商.SetFocus
供应商.Text = " "
凭证号.SetFocus
End Sub
[em01]

作者: ganrong 时间: 2002-6-9 08:35
提示: 作者被禁止或删除内容自动屏蔽

作者: zhuyiwen 时间: 2002-6-9 08:37

以下是引用田野在2002-6-9 0:25:13的发言：
主窗体有几个文本框，把文本框作为条件输入口，有时要重新设置条件，我是用比较笨的办法，请教好的语句。谢谢
Private Sub Command45_Click()
凭证号.SetFocus
凭证号.Text = " "
物料名称.SetFocus
物料名称.Text = " "
物料编号.SetFocus
物料编号.Text = " "
日期.SetFocus
日期.Text = " "
仓库.SetFocus
仓库.Text = " "
供应商.SetFocus
供应商.Text = " "
凭证号.SetFocus
End Sub
[em01]

Private Sub Command45_Click()
凭证号 = ""
物料名称 = ""
物料编号 = ""
日期 = ""
仓库 = ""
供应商 = ""
凭证号 = ""
End Sub

不知是否可行？

作者: 田野 时间: 2002-6-9 09:05
我改写为
凭证号 = null
物料名称 = null
......
好用了！
另外，凭证号.value = null 和凭证号 = null 是不是等价啊？

作者: zhuyiwen 时间: 2002-6-9 09:07

请用 isnull([凭证号])

[fly][em04][em07][em04][/fly]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)