Dim tb As Table = Tables(e.Form.Name & "_Table2")Dim dt As DataTable = tb.DataTableFor Each c As Col In Tables("彩单管理总表").Cols ' dt.DataCols.Add(c.Name,Gettype(C列属性))Next
老师,如上代码,如何可以获取列属性