主题：不显示零值

老师：

    我作的表中，想整个表的所有列，不显示零值。要怎么写代码或设置啊？

执行代码

Dim t As Table = Tables("表A")
For Each r As Row In t.rows
    For Each c As Col In t.cols
        If cstr(r(c)) = "0" Then
            r(c) = Nothing
        End If
    Next
Next