以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  选定多行克隆  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=158373)

--  作者:透明人生
--  发布时间:2020/11/17 23:56:00
--  选定多行克隆
字符串的空行正常,如高精度小数列为空时,克隆时会变为0,怎么做到,所有空行克隆为还是空行,不填为0。
Dim t As Table = CurrentTable
For i As Integer = t.TopRow To t.BottomRow
    Dim dr As DataRow = t.DataTable.Addnew()
    For Each c As Col In t.Cols
       dr(c.Name) = t.Rows(i)(c.Name)
    Next
Next

--  作者:有点蓝
--  发布时间:2020/11/18 8:38:00
--  
比如:

    For Each c As Col In t.Cols
if t.Rows(i).isnull(c.Name) = false then
       dr(c.Name) = t.Rows(i)(c.Name)
end if
    Next

--  作者:透明人生
--  发布时间:2020/11/18 19:36:00
--  
谢谢!