Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
datalist1 在材料单查找没定义
foxtable已经取消了DataList控件了。