以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  单元格数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=192210)

--  作者:1234567
--  发布时间:2024/6/3 14:05:00
--  单元格数据
用什么代码可以在单元格内添加数据?
--  作者:有点蓝
--  发布时间:2024/6/3 14:27:00
--  
比如:http://www.foxtable.com/webhelp/topics/0445.htm
--  作者:1234567
--  发布时间:2024/6/3 15:06:00
--  
当我在【承接日期】或【内容】列输入数据后,【过程记录】自动录入相应数据,比如2024-06-02 接单
当我在【出货日期】或【出货情况】列输入数据后,【过程记录】换行后增加相应数据。

--  作者:1234567
--  发布时间: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 "
承接日期","内容","出货日期","出货情况"
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