Dim r1 As row = Tables("表A").AddNew
r1("第一列") = 123
Dim r2 As row = Tables("表A").AddNew
r2("第一列") = 456