以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 模拟关联表增加新行问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=65772)
|
-- 作者:swagger
-- 发布时间:2015/3/22 22:15:00
-- 模拟关联表增加新行问题
窗口中要点击订单明细表才能增加相应行,如果不点击明细表,则会在明细表增加空行,这个是什么原因
|
-- 作者:有点甜
-- 发布时间:2015/3/22 22:18:00
--
代码有问题。用类似下面的代码
Dim nr As Row = Tables("订单明细表").AddNew
nr("订单编号") = Tables("订单表").Current("订单编号")
|
-- 作者:swagger
-- 发布时间:2015/4/8 11:19:00
--
以下是引用有点甜在2015/3/22 22:18:00的发言:
代码有问题。用类似下面的代码
Dim nr As Row = Tables("订单明细表").AddNew
nr("订单编号") = Tables("订单表").Current("订单编号")
删除行呢?
Dim nr As Row = Tables("订单明细表").current.delete
不行,显示错误, boolean的值不能转换row
|
-- 作者:狐狸爸爸
-- 发布时间:2015/4/8 11:21:00
--
Tables("订单明细表").current.delete
|
-- 作者:swagger
-- 发布时间:2015/4/17 11:18:00
--
以下是引用狐狸爸爸在2015/4/8 11:21:00的发言: Tables("订单明细表").current.delete
不行的,刚刚打开的时候可以删,但是如果按了上一张或下一张 ( .Position = .Position + 1 )就删不了,或者点击列表弹出来也删不了,只有新增行可以删
|
-- 作者:Bin
-- 发布时间:2015/4/17 11:19:00
--
你切换了焦点,当前行就不是这一行了. 不是很明白你具体的情况
|
-- 作者:swagger
-- 发布时间:2015/4/17 11:34:00
--
如图片
此主题相关图片如下:1846.gif
[此贴子已经被作者于2015/4/17 11:34:34编辑过]
|
-- 作者:Bin
-- 发布时间:2015/4/17 11:35:00
--
没看懂
|
-- 作者:swagger
-- 发布时间:2015/4/17 11:42:00
--
以下是引用Bin在2015/4/17 11:35:00的发言: 没看懂
就是用模拟关联表的话,在添加货品那里要用类似下面的代码 才有效,不然会出现错误
Dim nr As Row = Tables("订单明细表").AddNew
nr("订单编号") = Tables("订单表").Current("订单编号")
但是删除货品的话呢,用什么代码? 如果直接用类似Tables("订单明细表").current.delete 这样会有问题的,譬如在图片上加个“上一张”按钮,点击这个按钮之后,再按删除货品就直接在明细表里面删除,而不是在窗口里面删除了
|
-- 作者:Bin
-- 发布时间:2015/4/17 11:43:00
--
你的是副本表?
那就 Tables("订窗口名_控件名").current.delete
|