提示没有可访问的item接受此数目的参数 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师，帮我看一下，提示没有可访问的item接受此数目的参数

wb.AppendHTML("<style>.mark{background-color:red; color:white;}</style>", True)

With wb.AddTable("","Table1")

.Alternate = 3

Dim nms() As String = {"单据编号","供应商","单据状态","制单时间"}

.Head.AddRow(nms)

For Each r As DataRow In dt.DataRows

If r("单据状态") = "审核" Then

With .Body.AddRow()

.AddCell(r("单据编号"))

.AddCell(r("供应商"))

.AddCell (r("单据状态","class='mark'"))

End With

End If

End With

主题：提示没有可访问的item接受此数目的参数