由於很久不用VB了,语法全忘了。大致是
If ” & Text 35 & “ = Nothing Then
MsgBox (Can not leave Year Blank")
End If
请问错在哪里?应如何修改?谢谢
Access, 点击1个按钮时,会将一个文本框中的数据添加到1个表格中,然後要先用VBA检查文本框中是否有数据
答案:2 悬赏:20 手机版
解决时间 2021-02-10 05:05
- 提问者网友:原来太熟悉了会陌生
- 2021-02-10 00:15
最佳答案
- 五星知识达人网友:山有枢
- 2021-02-10 00:42
If Nz(Text35,"") = "" Then
MsgBox "Can not leave Year Blank"
End If注意:Text35要是你当前窗体中的文本框的名称才可以。
直接用Text35相当于Text35.value, 它是一个值,不是对象,所以不能和Nothing进行比较。
Nz(Text35,"")这个函数意思是如果Text35为Null,则返回"",否则返回Text35的值的意思。
MsgBox "Can not leave Year Blank"
End If注意:Text35要是你当前窗体中的文本框的名称才可以。
直接用Text35相当于Text35.value, 它是一个值,不是对象,所以不能和Nothing进行比较。
Nz(Text35,"")这个函数意思是如果Text35为Null,则返回"",否则返回Text35的值的意思。
全部回答
- 1楼网友:笑迎怀羞
- 2021-02-10 02:05
1)如果查询结果只有一条记录,可以将文本框的控件来源属性设为域合计函数,如:
=dlookup("字段1","表1","id=1")
或
=dsum("字段1","表1","id>1")
之类的
2)如果查询结果多于一条记录,建议换成列表框或组合框控件,设置其行来源属性。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯