Dim wb As New WeUI
With wb.AddTable("","Table1")
    Dim nms() As String = {"产品","客户","数量","单价","日期"}
    .Head.AddRow(nms)
    For Each r As DataRow In DataTables("订单").DataRows
        With .Body.AddRow(r("产品"),r("客户"),r("数量"))
            .Primarykey = r("_Identify") \'设置主键
            .AddCell(Format(r("单价"),"#0.00"))
            .AddCell(Format(r("日期"),"MM月dd日"))
        End With
    Next
End With

这种如果我想隐藏日期列该如何操作，后面我还想调用日期列