以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]addtable能不能设置字体大小?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=136855)

--  作者:lxq3736
--  发布时间:2019/6/23 9:11:00
--  [求助]addtable能不能设置字体大小?
如果不能,有其他的方法吗?
--  作者:有点甜
--  发布时间:2019/6/23 11:02:00
--  

Select Case e.Path
    Case "test.htm", ""
        Dim wb As New WeUI
        With wb.AddTable("","Table1")
            .head.AddRow("部门","姓名","年龄","电话","地址") \'表头
            .body.AddRow("技术部","张三","36","110","中国北京") \'数据
            .body.AddRow("技术部","李四","38","110","中国上海")
            .body.AddRow("技术部","王五","39","110","中国深圳")
            .body.AddRow("生产部","赵六","39","110","中国深圳")
            .body.AddRow("生产部","刘七","39","110","中国深圳")
        End With
        wb.InsertHTML("<style>.fox_table td{font-size:20px;} .fox_table th{font-size:20px;}style>")
        e.WriteString(wb.Build)
End Select