以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  设置列宽无效  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193484)

--  作者：13559187297 --  发布时间：2024/9/19 14:52:00 --  设置列宽无效 只需要设置前两列的列宽，代码如下，但是实际无作用，请问老师，这是代码哪里出问题了？ Dim e As RequestEventArgs = args(0) Dim wb As New WeUI Dim t As String = Date.Today.Year & "年" & Date.Today.Month & "月" wb.AddForm("", "form1", "shebeicydjb.htm") With wb.AddTable("", "Table1")     .RowHead = 1     .ColWidth = "15px,100px" \'设置列宽     .CreateFromDataTable(DataTables("设备点检明细"), False, "设备编号 = \'" & e.Cookies("shebeibianhao") & "\' and 年月 = \'" & t & "\'", "序号", "序号", "项目", "点检结果_1", "点检结果_2", "点检结果_3", "点检结果_4", "点检结果_5", "点检结果_6", "点检结果_7", "点检结果_8", "点检结果_9", "点检结果_10", "点检结果_11", "点检结果_12", "点检结果_13", "点检结果_14", "点检结果_15", "点检结果_16", "点检结果_17", "点检结果_18", "点检结果_19", "点检结果_20", "点检结果_21", "点检结果_22", "点检结果_23", "点检结果_24", "点检结果_25", "点检结果_26", "点检结果_27", "点检结果_28", "点检结果_29", "点检结果_30") End With With wb.AddButtonGroup("form1", "btg3", False)      .Add("btn1", "首页", "", "shouye.htm").Kind = 1 \'单击这个按钮可以打开设备管理页面     .Add("btn2", "保养", "", "shebeiby.htm")     .Add("btn3", "报修", "", "shebeibx.htm").Kind = 2     .Add("btn4", "点检", "", "shebeidj.htm") End With e.WriteString(wb.Build)

--  作者：有点蓝 --  发布时间：2024/9/19 15:14:00 --   列太多了。屏幕位置不够会挤到一起，是没有效果的