- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 合并列内容的问题？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=83038)
-- 发布时间：2016/3/30 9:33:00
-- 合并列内容的问题？
我的表中有“联系方式”，“常用联系方式”，“备用联系方式”列，通过代码合并后两列到“联系电话”列，但合并后中间没有分隔，想加一个分隔符，如“备用联系方式”没有内容则没有分隔符，求助！！
\'联系方式开始方案二
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "常用联系方式","备用联系方式"
dr("联系方式") = dr("常用联系方式") & dr("备用联系方式")
End Select
\'联系方式结束方案二
现在的情况是如图：
此主题相关图片如下：qq截图20160330092824.jpg
[此贴子已经被作者于2016/3/30 9:33:47编辑过]
-- 发布时间：2016/3/30 9:37:00
--
比如加个“，”分开
-- 发布时间：2016/3/30 10:05:00
--
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "常用联系方式","备用联系方式"
dr("联系方式") = dr("常用联系方式") & "," & dr("备用联系方式")
End Select