- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 请帮看看代码提示错误说的是什么？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=1799)
-- 发布时间：2009/2/13 13:37:00
-- 请帮看看代码提示错误说的是什么？
请问窗口按钮中下列代码执行时提示错误是什么原因？（目的：在表二中列名2里找不到表一中列名1中的内容时，在表二中添加表一的该行相关列的内容）
Dim km As string = Tables("表一").Current("列名1")
Dim ykm As DataRow = DataTables("表二").Find("[列名2] = \'" & km & "\'")
if ykm Is Nothing Then
If MainTable.Name = "表一"
Dim f As New Filler
f.SourceTable = DataTables("表一")
f.SourceCols = "m,n,o,p,q,r"
f.DataTable = DataTables("表二")
f.DataCols = "a,b,c,d,e,f"
f.Fill() \'填充数据
End If
End If
此主题相关图片如下：未命名.jpg
[此贴子已经被作者于2009-2-13 14:20:26编辑过]
-- 发布时间：2009/2/13 14:26:00
--
有个东东不存在。
看看表名或者列名正确否
-- 发布时间：2009/2/13 17:01:00
--
以下是引用狐狸爸爸在2009-2-13 14:26:00的发言：
有个东东不存在。
看看表名或者列名正确否
哈～ 老爹是怎么看懂的，真厉害～～！ 确实是列名有误～～ 谢谢！
大家记住，这个提示是和列名有关哦～～～
[此贴子已经被作者于2009-2-13 17:02:21编辑过]
-- 发布时间：2009/2/13 19:15:00
--
记不住啦，它倒认识我，可惜俺不认识它。