Foxtable(狐表)用户栏目专家坐堂 → [求助]手工编码生成表格,如何控制表格线粗细与颜色


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

主题:[求助]手工编码生成表格,如何控制表格线粗细与颜色

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


加好友 发短信
等级:五尾狐 帖子:1104 积分:8956 威望:0 精华:0 注册:2014/10/25 11:24:00
[求助]手工编码生成表格,如何控制表格线粗细与颜色  发帖心情 Post By:2020/3/23 21:33:00 [只看该作者]

老师看下代码,请帮我举下例子,控制表格上线的粗细与颜色
另外,用.AddCells 方法添加多字段时能用class吗,就如:.AddCells("销售金额","回款金额","class='bth1'")  我试过这样写不行的

With wb.AddTable("","Table1")
    With .body.AddRow()
        .AddCell("合同/现金单汇总","colspan='5' class='sh1'")
    End With
    With .body.AddRow()
        .AddCell("项目","class='bth1'")
        .AddCell("方量","class='bth1'")
        .AddCell("均价","class='bth1'")
        .AddCell("销售金额","class='bth1'")
        .AddCell("回款金额","class='bth1'")
    End With
    Dim i As Integer = 888
    With .body.AddRow()
        .AddCell("统计日","class='bth1'")
        .AddCell(i,"class='nr'")
        .AddCell(i,"class='nr'")
        .AddCell(i,"class='nr'")
        .AddCell(i,"class='nr'")
    End With
    
End With

 回到顶部