一个单元格有多行照片名，如何将这个单元格内容，复制到另一个单元格？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 一个单元格有多行照片名，如何将这个单元格内容，复制到另一个单元格？

共有1701人关注过本帖树形打印复制链接主题：一个单元格有多行照片名，如何将这个单元格内容，复制到另一个单元格？

zhangjian222200

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1533 积分：10818 威望：0 精华：0 注册：2016/9/12 11:18:00

一个单元格有多行照片名，如何将这个单元格内容，复制到另一个单元格？ 发帖心情

Post By：2017/9/24 22:47:00 [显示全部帖子]

如题：

zhangjian222200

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1533 积分：10818 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2017/9/25 0:10:00 [显示全部帖子]

Dim drbianh As String = e.Cookies("drbianhao") '为cookie传递数据

Dim dr1 As DataRow

Dim dr2 As DataRow

dr1 = DataTables("会员资料").sqlFind("会员编号 = '" & drbianh & "'")

If dr1 IsNot Nothing Then

dr2 = DataTables("员工资料").AddNew()

If dr2 IsNot Nothing Then

For Each shz As String In dr1.Lines("生活照") '就是希望把"会员资料"表生活照列,保存到"员工这里"表生活照列,测试保存没有成功

dr2("学历照片") &= iif(dr1.IsNull("生活照"), "", vbcrlf) & shz

dr2.save

End If

[此贴子已经被作者于2017/9/25 0:41:58编辑过]

zhangjian222200

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1533 积分：10818 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2017/9/25 0:43:00 [显示全部帖子]

处理后，把行拉高，发现3楼代码成功保存了

主题：一个单元格有多行照片名，如何将这个单元格内容，复制到另一个单元格？