xsdlsbm =DataTables("销售单").sqlCompute("max(销售单编号)")xsdlsbm=xsdlsbm+1Tables("销售单_table1").Filter ="[销售单编号]='"& xsdlsbm &"'"e.Form.Controls("TextBox1").value="xsd"+ & xsdlsbm
最后一句出错了