Dim nr As Row = Tables("表A").AddNew
nr("第一列") = e.Form.Controls("TextBox1").Text
e.Form.Controls("TextBox1").Text = ""