Dim txt As String = e.Form.Controls("TextBox2").TextDim dt1 As DataTable = DataTables("单次来电_Table1")
dt1.LoadFilter ="编号 = '" & txt & "'"dt1.Load