如果 表 数据 已经 保存,则创建一行,否则,提示请保存数据 Post By:2012/10/15 14:56:00 [显示全部帖子]
我的代码是这样的:
If Tables("计量单位").Current.Save() Then With Tables("计量单位") If .Current.DataRow.RowState = DataRowState.Unchanged Then '如果当前行未曾修改 Tables("计量单位").AddNew() End If End With Else massagebox("请先保存数据!") End If