主题：亮度不够

        With wb.AddTable("","Table1")
            .Highlight = 0  '关闭高亮显示功能
            .RowHead = 1
            .head.AddRow("","部门","姓名","年龄","电话","地址")
            .body.AddRow("1","技术部","张三","36","110","中国北京")
            .body.AddRow("2","技术部","李四","38","110","中国上海")
            .body.AddRow("3","技术部","王五","39","110","中国深圳")
            .body.AddRow("4","生产部","赵六","39","110","中国深圳")
            .body.AddRow("5","生产部","刘七","39","110","中国深圳")
        End With
        e.WriteString(wb.Build)

比如

 

Select Case e.Path
    Case "test.htm",""
        Dim wb As New weui
        With wb.AddTable("","Table1")
            .Highlight = 0  '关闭高亮显示功能
            .RowHead = 1
            .head.AddRow("","部门","姓名","年龄","电话","地址")
            .body.AddRow("1","技术部","张三","36","110","中国北京")
            .body.AddRow("2","技术部","李四","38","110","中国上海")
            .body.AddRow("3","技术部","王五","39","110","中国深圳")
            .body.AddRow("4","生产部","赵六","39","110","中国深圳")
            .body.AddRow("5","生产部","刘七","39","110","中国深圳")
        End With
        wb.InsertHTML("<style>.fox_table tr.sel, .fox_table tr.alt, .fox_table td.sel{    background-color: red;}</style>")
        e.WriteString(wb.Build)
End Select

这是新代码的亮度，还是不明显。
此主题相关图片如下：无标题.png

你没有用到weui？

 

http://www.foxtable.com/mobilehelp/scr/0011.htm

 

这三个文件是有的。
此主题相关图片如下：无标题.png

肯定没有用到，或者没有放对地方，否则2楼代码不会是3楼的效果