以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  能否在With wb.Add Table("form1","Table1") 里面增加隐藏列  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=145799)

--  作者：lanbor --  发布时间：2020/2/7 16:33:00 --  能否在With wb.Add Table("form1","Table1") 里面增加隐藏列 请问专家： 能否在 With wb.Add Table("for m1","Table1")     .PageNumber=page    For Each sr As Data Row In dt.Data Rows         With .Body.AddRow()             .addcell(sr("wx_id"),"class=\'alignC\'")             .addcell(sr("wx_8s"),"class=\'alignC\'")             .addcell(sr("wx_areaName"),"class=\'alignC\'")             .addcell(sr("wx_bear_name"),"class=\'alignC\'")             .addcell(sr("wx_state"),"class=\'alignC\'")             .addcell(Format(sr("wx_dateQA"),"MM/dd"))             比如在这里：我希望增加一隐藏列“员工编号”            请专家指点一下，谢谢你！             .Primarykey =sr("_Identify") \'为此行指定主键值sr("io_iid") \'   End With 我希望在表格的身体里增加一隐藏列，以便后期能像引用.Primarykey那样去直接引用它！ 谢谢专家！ [此贴子已经被作者于2020/2/7 16:35:04编辑过]

--  作者：有点蓝 --  发布时间：2020/2/7 17:16:00 --   参考： Select Case e.Path     Case "test.htm"         Dim wb As New WeUI         wb.AppendHTML("<style>.mark{display:none;}</style>", True) \'添加样式         With wb.AddTable("","Table1")             .head.AddRow("部门","姓名","年龄","电话","地址")             For i As Integer = 1 To 5                 With .body.AddRow()                     .AddCell("技术部")                     .AddCell("李四")                     .AddCells("38","110")                     .AddCell("中国上海")                     .AddCell(i,"class=\'mark\'")                 End With             Next         End With         e.WriteString(wb.Build) End Select

--  作者：lanbor --  发布时间：2020/2/7 18:21:00 --  谢谢专家指教 谢谢专家指教