然后一个按钮的代码
Tables("费用单_Table1").AllowEdit = True
Tables("费用单_Table1").AddNew
Tables("费用单_Table1").Current("FYDH")="ZBCDZ"
Tables("费用单_Table1").Current("RQ")=Date.Today 这个是对的 '
Tables("费用单_Table1").AllowEdit = True
Tables("费用单_Table1").AddNew
e.Form.Controls("DateTimePicker1").value=Date.Today
e.Form.Controls("TextBox1").value="ZBCDZ"
这个不行,
详细看帮助的 " 数据绑定与值的读写" 这一章