Access动态修改表字段的默认值

在Access表中，字段可以设置默认值，设置默认值后，可以在录入数据的时候默认填充该值。

在表中可直接修改字段属性，如图：

也可以用代码动态修改字段的默认值：

Private Sub Command0_Click()
    CurrentDb.TableDefs("tbl1").Fields("网站").DefaultValue = "Office交流网"
   '也可以设置为当前时间  
    'CurrentDb.TableDefs("tbl1").Fields("网站").DefaultValue = now()
   '清空字段默认值
    'CurrentDb.TableDefs("tbl1").Fields("网站").DefaultValue =""
End Sub