[求助]如何清空文本框,使其为null

田野 · 发表于 2002-6-9 08:25:00

主窗体有几个文本框，把文本框作为条件输入口，有时要重新设置条件，我是用比较笨的办法，请教好的语句。谢谢
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:00

提示: 作者被禁止或删除内容自动屏蔽

zhuyiwen · 发表于 2002-6-9 08:37:00

以下是引用田野在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:00

我改写为
凭证号 = null
物料名称 = null
......
好用了！
另外，凭证号.value = null 和凭证号 = null 是不是等价啊？

zhuyiwen · 发表于 2002-6-9 09:07:00

请用 isnull([凭证号])

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

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[求助]如何清空文本框,使其为null

群介绍
主题无相 (随机显示版	同地区群块其他地区)

ganrong ganrong 当前离线技术点技术点 V币点积分 13383 IP卡狗仔卡	2^# 发表于 2002-6-9 08:35:00 \| 只看该作者提示: 作者被禁止或删除内容自动屏蔽

	回复支持反对使用道具举报显身卡