weui的确好用 但是查询表生成的NO可以做分页用 但是移动端因为显示的问题 想不显示如何处理呢  非常感谢!

S/elect Case e.Path
    C/ase "list.htm"
        \'获取要显示的页
        Dim page As Integer = 0 \'默认page为0,显示第一页
        Dim pageRows As Integer = 15 \'每页15行
        If e.GetValues.ContainsKey("page") Then  \'如果地址中有page参数
            Integer.TryParse(e.GetValues("page"), page) \'提取page参数
        End If
        Dim StartRow As Integer = page * pageRows + 1 \'此页第一行
        Dim EndRow As Integer = (page + 1) * pageRows \'此页最后一行       

        \'获取该页数据
        Dim c md As New SQLCommand
        c md.ConnectionName = "orders" \'记得设置数据源名称
        c md.CommandText = "S/elect Count(*) From {订单}"
        Dim Count As Integer = c md.ExecuteScalar() \'获取总的行数
        c md.CommandText = "S/elect * From (S/elect Row_Number() Over(Order by 日期) As [NO.], 产品,客户,数量,单价,日期 From 订单) As a "
        c md.CommandText = cmd.CommandText & "  Where [NO.]>= " & StartRow & " And [NO.] <= " & EndRow
        Dim dt As DataTable = cmd.ExecuteReader       

        \'根据此页数据生成网页
        Dim wb As New WeUI
        With wb.AddTable("","Table1")
            .CreateFromDataTable(dt)

            想隐藏NO.列,如何处理呢 ,NO.列仅做分页标记用
        End With
        With wb.AddButtonGroup("","btg2", False)
            If page > 0 Then
                .Add("btnPrev", "上一页","","List.htm?page=" & page - 1)
            End If
            If Endrow < count Then
                .Add("btnNext", "下一页","","List.htm?page=" & page + 1)
            End If
        End With
        e.WriteString(wb.Build)
E/nd S/elect