Dim dw As WinForm.TextBox = e.Form.Controls("单位名称")DataTables("调资基础数据").DeleteFor("[单位名称] = '" & dw.text & "'")