网友 快乐天使<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

附   件:

演   示: