参考
Dim r As Row = Tables("表A").AddNew
r("第一列") = e.Form.Controls("TextBox1").Text
r("第二列") = e.Form.Controls("TextBox2").Text
r.Save
或者参考 http://www.foxtable.com/help/topics/2263.htm