甜哥,蓝老师:
项目一对多表关联,主表表A,与表B、表C关联,通过按钮,一次生成固定格式的表A和表C
如何做到只生成一次,按钮就不可用,或给个提示框,在关联下一条数据的时候,按钮回复功能,或不再提示
这样写,好像不符合要求
If Tables("表A.表B").Current IsNot Nothing AndAlso Tables("表A.表B").Current.IsNull("第二列") = False Then
msgbox("审核表已生成,不可重复生成!")
Else
Dim t As Table = Tables("表A.表B")
Dim nr11 = t.AddNew
nr11("第二列") = "1.记载情况(是否一致)"
Dim nr22 = t.AddNew
nr22("第三列") = "(1)最早形成材料记载"
Dim t2 As Table = Tables("表A.表C")
Dim tr11 = t2.AddNew
tr11("第二列") = "1.材料齐全?制作规范 "
End IF