- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请问一下，这一堆的0有没有办法让他不默认为0呢，虽然列是整数类型，但不想默认为0 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=111631)
-- 发布时间：2017/12/26 15:30:00
-- 请问一下，这一堆的0有没有办法让他不默认为0呢，虽然列是整数类型，但不想默认为0
请问一下，这一堆的0有没有办法让他不默认为0呢，虽然列是整数类型，但不想默认为0
此主题相关图片如下：qq截图20171226152843.png
-- 发布时间：2017/12/26 15:45:00
--
Dim t As Table = Tables("表A")
For Each r As Row In t.rows
For Each c As Col In t.cols
If c.IsNumeric AndAlso r(c) = 0 Then
r(c) = Nothing
End If
Next
Next
-- 发布时间：2017/12/26 17:09:00
--
好的，谢谢
-- 发布时间：2017/12/26 17:34:00
--
这里有几个表，我想用数组来解决，但是这样出错了，要怎么改呀
Dim t() As Table = {Tables("其他渠道"),Tables("渠道表"),Tables("个人")}
For i As Integer=0 To t.length-1
For Each r As Row In t(i).rows
For Each c As Col In t.cols
If c.IsNumeric AndAlso r(c) = 0 Then
r(c) = Nothing
End If
Next
Next
Next
-- 发布时间：2017/12/26 17:39:00
--
Dim ts() As Table = {Tables("其他渠道"),Tables("渠道表"),Tables("个人")}
For Each t As Table In ts
For Each r As Row In t.rows
For Each c As Col In t.cols
If c.IsNumeric AndAlso r(c) = 0 Then
r(c) = Nothing
End If
Next
Next
Next
-- 发布时间：2017/12/26 17:59:00
--
是这样。。好的，谢谢