网友 快乐天使<soniajing@163.com> 15:23:31 问题
对于access数据库,怎么用代码来更新表中一个字段 为必填项?
Accessoft--红尘如烟 15:24:51
你判断不能为空就可以了,不一定要改表中字段类型
If IsNull(Me.字段名) Then
MsgBox "请输入数据!", vbCritical, "提示:"
Exit Sub
End If
快乐天使<soniajing@163.com> 15:27:05
亲,数据库字段属性原来设计错了,这个字段必须为必填,原来设计的时候是允许为空的,现在需要用代码强制改过来,关键是不知道代码怎么写了
Accessoft--红尘如烟 15:30:05
'必填项设为是
currentdb.TableDefs("表名称").Fields("字段名").Required=True
'必填项设为否
currentdb.TableDefs("表名称").Fields("字段名").Required=False
附 件:
点击下载此示例
演 示: