Access判断窗体控件空值的两种写法
时 间:2022-09-20 08:44:11
作 者:欧志华 ID:51519 城市:广州
摘 要:判断窗体控件空值的两种写法。
正 文:
一、问题描述:
用IsNull来判断控件内容为空值时,有时会出现判断不准,代码如下:
Private Sub 本笔保存_Click() Dim rst As DAO.Recordset If IsNull(Me.宾客姓名) Then MsgBox "请输入嘉宾姓名", vbCritical, "提示" Me.宾客姓名.SetFocus Exit Sub End If If IsNull(Me.金额) Then MsgBox "请输入金额", vbCritical, "提示" Me.金额.SetFocus Exit Sub End If If IsNull(Me.莅临现场) Then MsgBox "请选择宾客到场情况", vbCritical, "提示" Me.莅临现场.SetFocus Exit Sub End If
判断为空如下图错误提示:
二、解决方法:
为了确保万无一失,可以判断字符数的方式,用Len函数,如果控件没有填字符,则长度为0,代码如下:
If Len(Me.莅临现场)=0 Then MsgBox "请选择宾客到场情况", vbCritical, "提示" Me.莅临现场.SetFocus Exit Sub End If就可以解决。
Access软件网QQ交流群 (群号:483923997) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- 【Access窗体导出PDF】...(04.08)
- 【Access窗体导出PDF】...(04.07)
- Access两种方式实现即时更...(03.01)
- Access隐藏与显示lacc...(01.12)
- 【Access高效办公】将每个...(12.23)
- Access21点游戏源代码(12.13)
- 【Access窗体导出Exce...(11.15)
- 【Access开发】Acces...(11.14)
- 通过Access宏录入数据到选...(11.10)
学习心得
最新文章
- ACCESS精华集锦资料.CHM(04.25)
- Access VBA语句If Me...(04.24)
- 【Access修改记录示例】编辑选...(04.22)
- 【Access表名称命名建议】将A...(04.20)
- Access学习笔记--用Acce...(04.19)
- 【Access重复项查询示例】将A...(04.17)
- Access快速开发平台企业版--...(04.16)
- 【Access模块示例】通过模块代...(04.15)
- Access查询里面分组合计功能添...(04.13)
- 【Access删除查询】删除数字最...(04.12)