| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请老师指导错误何在？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=64698) |
| -- 作者：peterx -- 发布时间：2015/2/27 12:04:00 -- 请老师指导错误何在？ 下代码运行时出错：无法将类型为“System.Boolean”的对象强制转换为类型“Foxtable.Row”。 请问，如何修改？谢谢 Dim dr As Row = Tables("购置申请管理").Current If dr.Isnull("购置申请编号")=False Then vars("IDH")=dr("购置申请编号") \' MessageBox.show(vars("IDH")) Dim fdr As Row =Tables("设备采购管理").Filter="购置申请编号 = \'" & vars("IDH") & "\'" If fdr Is Nothing fdr = Tables("设备采购管理").AddNew fdr("购置申请编号") = dr("购置申请编号") End If Else MessageBox.show("购置申请编号为空") End If
[此贴子已经被作者于2015/2/27 13:47:25编辑过]
|
| -- 作者：Bin -- 发布时间：2015/2/27 14:12:00 -- Filter 不是这么用的 是用来筛选表的 http://www.foxtable.com/help/topics/1432.htm |
| -- 作者：peterx -- 发布时间：2015/2/27 16:04:00 -- 谢谢。明白了 |