- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]单元格=单元格中间的数据？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=82767)
-- 发布时间：2016/3/24 14:38:00
-- [求助]单元格=单元格中间的数据？
已知：
表A第一列为：&A&
表A第二列为：&A&
表A第三列为：&A&
求代码：
表B第一列=表A第一列，并去除 "&" “&”
表B第二列=表A第二列，并去除 "&" “&”
表B第三列=表A第三列，并去除 "&" “&”
要求结果：
表B第一列为：A
表B第二列为：A
表B第三列为：A
[此贴子已经被作者于2016/3/24 14:44:45编辑过]
-- 发布时间：2016/3/24 14:55:00
--
Dim Cols1() As String = {"第一列","第二列","第三列"}
Dim Cols2() As String = {"第一列","第二列","第三列"}
For Each dr1 As DataRow In DataTables("表A").Select("")
Dim dr2 As DataRow = DataTables("表B").AddNew()
For i As Integer = 0 To Cols1.Length -1
dr2(Cols2(i)) = dr1(Cols1(i)).replace("&", "")
Next
Next
-- 发布时间：2016/3/24 15:17:00
--
你好，如果是要去除单元格两个不同的数值呢
比如：表A第一列为：&A#
表B第一列=表A第一列，并去除&，#
这个代码用replace解决不到哦
-- 发布时间：2016/3/24 15:31:00
--
dr2(Cols2(i)) = dr1(Cols1(i)).replace("&", "").replace("#", "")
-- 发布时间：2016/3/24 16:37:00
--
谢谢
