- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 单元格数据 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=192210)
-- 发布时间：2024/6/3 14:05:00
-- 单元格数据
用什么代码可以在单元格内添加数据？
-- 发布时间：2024/6/3 14:27:00
--
比如：http://www.foxtable.com/webhelp/topics/0445.htm
-- 发布时间：2024/6/3 15:06:00
--
当我在【承接日期】或【内容】列输入数据后，【过程记录】自动录入相应数据，比如2024-06-02 接单。
当我在【出货日期】或【出货情况】列输入数据后，【过程记录】换行后增加相应数据。
-- 发布时间：2024/6/3 15:07:00
--
此主题相关图片如下：2.png
-- 发布时间：2024/6/3 15:33:00
--
参考：http://www.foxtable.com/webhelp/topics/1452.htm
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "承接日期","内容","出货日期","出货情况"
Select Case e.DataCol.Name
Case "承接日期","内容","出货日期","出货情况"
Dim s as string
if dr.isnull("承接日期")=false andalso dr.isnull("内容")=false
s = dr("承接日期") & " " & dr("内容")
end if
if s > "" then s = s & vbcrlf
if dr.isnull("出货日期")=false andalso dr.isnull("出货情况")=false
s = s & dr("出货日期") & " " & dr("出货情况")
end if
dr("过程记录") = s
End Select
End Select