主题：绑定表保存增加按钮

你table1和就是销售表啊，所以不需要新增保存，直接保存即可啊，如

If e.Form.controls("TextBox1").value = "" Then
    MessageBox.Show("请录入厂商名称!", "提示", MessageBoxButtons.Ok, MessageBoxIcon.Information)
    Return
End If

For Each dr As Row In e.Form.Controls("Table1").Table.Rows  
    dr("客户") = Trim(e.Form.controls("TextBox1").text)
    dr("日期") = Trim(e.Form.controls("TextBox2").text)
    dr("单号") = Trim(e.Form.controls("TextBox3").text)
Next
DataTables("销售表").Save()
e.Form.Controls("Table1").Table.addnew

如果你table1是另一个表（不是销售表），那你用你以前的代码或者6楼的代码，都可以。