主题：请帮忙

dim dr as DataRow

Dim i As Integer

for i = 0 To DataTables("收文").DataRows.count-1
    dr=DataTables("收文").DataRows(i)

    if dr("责任单位") <> "网上文件" then

        Continue For

    end if

    dr("责任单位")=nothing

Next