- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于导入 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88297)
-- 发布时间：2016/7/31 9:26:00
-- 关于导入
各位大神，我现在有一个记录表“A”，“A”中第一列记录了其他表的表名，第二列记录了表名中的“B”列名，第三列记录了要输入的“C”数据。然后，怎么把“C”数值填入到“A”表“B”列填充对应的。跪求代码。 |
-- 发布时间：2016/7/31 9:35:00
--
参考
| 下载信息 [文件大小：340.0 KB 下载次数：25] | |
 点击浏览该文件:操作日志.table |
-- 发布时间：2016/7/31 15:17:00
--
我的代码如下，请问为什么实现不了啊？[quote]Dim tb1 As Table = Tables("表A")
-- 发布时间：2016/7/31 18:41:00
--
Select Case e.DataCol.Name
Case "第一列","第二列","第三列"
If e.DataRow.IsNull("第一列") = False AndAlso e.DataRow.IsNull("第二列") = False Then
Dim bm As String = e.DataRow("第一列")
Dim lm As String = e.DataRow("第二列")
DataTables(bm).ReplaceFor(lm, e.DataRow("第三列"))
End If
End Select