以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  空值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176172)

--  作者:Dxm123456789
--  发布时间:2022/4/2 16:05:00
--  空值
For Each r1 As Row In Tables("添加生产产品_Table1").GetCheckedRows
    Dim r2 As Row = Tables("生产单.生产明细").AddNew
    r2("宽度") = r1("宽度")
Next


复选框选中的添加到生产明细中,但宽度列为空时,添加过来的是0,怎样让添加的值也为空,不显示0

--  作者:有点蓝
--  发布时间:2022/4/2 16:27:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50080

For Each r1 As Row In Tables("添加生产产品_Table1").GetCheckedRows
    Dim r2 As Row = Tables("生产单.生产明细").AddNew
if r1.isnull("宽度") then
r2("宽度") =nothing
else
    r2("宽度") = r1("宽度")
endif
Next