Dim t2 As Table = e.Form.controls("table1").Table Dim t3 As Table = Tables("视图") Dim S As String Dim RD As Row S=t2.DataTable.name Dim F As Integer = t3.FindRow("表名 =\'" & S & "\'") RD = t3.rows(F) Dim QQ As String QQ=RD("列设置") Tables("销售出货单_Table1").SetColVisibleWidth("\'" & QQ & "\'")
此主题相关图片如下:qq截图20180821175616.jpg
单号前面的日期列没有了 !!!
老师这个是什么问题 怎么
是列设置 字段太多了吗??
-- 作者:有点蓝
-- 发布时间:2018/8/21 20:02:00
--
Dim dr As DataRow = DataTables("视图").Find("表名 =\'" & S & "\'")
If dr IsNot Nothing AndAlso dr.IsNull("列设置") = False Then