Foxtable(狐表)用户栏目专家坐堂 → 表格下显示内容


  共有1499人关注过本帖平板打印复制链接

主题:表格下显示内容

帅哥哟,离线,有人找我吗?
ycs5801
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:911 积分:6617 威望:0 精华:0 注册:2009/6/24 9:44:00
表格下显示内容  发帖心情 Post By:2023/5/15 15:15:00 [只看该作者]

  With wb.AddTable("", "Table1")
                .Alternate = 3
                .RowHead = 1
                .ColWidth = "12px"
                Dim nms() As String = {"", "责任人", "是否完成", "完成时间"}
                .Head.AddRow(nms)
                Dim cnt As Integer
                For Each r As DataRow In DataTables("事项进度").Select("主键编号 =" & name1)
                    cnt = cnt + 1
                    With .Body.AddRow(cnt, r("录入人员"), r("是否完成"))
                        .AddCell(Format(r("录入时间"), "yyyy年MM月dd日"))
                    End With                  
                Next
                
            End With     
    
图片点击可在新窗口打开查看此主题相关图片如下:2023-05-15_150533.jpg
图片点击可在新窗口打开查看

1、我想点那个表格,下边自动会显示出r行的,完成进度列的内容。
2、是否完成列和完成时间列如图显示。

 回到顶部
总数 12 1 2 下一页