以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63197)

--  作者:geast
--  发布时间:2015/1/15 20:38:00
--  [求助]


图片点击可在新窗口打开查看此主题相关图片如下:20150115202730.png
图片点击可在新窗口打开查看

这个窗口的录入框绑定的凭证的主表,下面的绑定的是凭证关联表的明细表,利用凭证号建立了关联,

如何才能在新增凭证的时候,能够在凭证明细窗口录入当前的凭证明细?并能在点新增的时候,凭证明细新增多行空白,以方便录入数据,保存时候,只保存有数据的行,

 

求老师,帮忙指点!


--  作者:有点甜
--  发布时间:2015/1/15 20:55:00
--  

 1、新增10行 Tables("凭证.凭证明细").AddNew(10)

 

 2、保存有数据的行,先删除空行,再保存

 

For Each r As Row In Tables("凭证.凭证明细").Rows
    If r.IsNull("第一列") OrElse r.IsNull("第二列") Then
        r.Delete
    Else
        r.Save
    End If
Next


--  作者:geast
--  发布时间:2015/1/15 21:01:00
--  [求助]

如果是两个表的话,点击父表的当前行,就能对子表进行操作,可是换了这个窗口格式,新增凭证的时候,却无法对子表编辑了,点子表没有反应,我该怎么写啊


--  作者:有点甜
--  发布时间:2015/1/15 21:04:00
--  
 无法编辑?表控件那里,允许编辑设置成true啊
--  作者:geast
--  发布时间:2015/1/15 21:07:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:20150115210618.png
图片点击可在新窗口打开查看

允许编辑,好像设置的没错啊


--  作者:有点甜
--  发布时间:2015/1/15 21:09:00
--  

 那就不可能不允许编辑。

 

 例子说明。


--  作者:geast
--  发布时间:2015/1/15 21:14:00
--  

嗯,谢谢老师,我再研究研究,可能是我代码写的有问题。

 

哦对了,还有个问题,我刚开始设计的凭证号是自动编号,后来改了,发现自动编号,无法设置关联

 

还有,如果是自动编号的话,是不是无法修改啊,只能让系统自己编号


--  作者:有点甜
--  发布时间:2015/1/15 21:25:00
--  

 自动编号,这样做

 

http://www.foxtable.com/help/topics/0630.htm

 

http://www.foxtable.com/help/topics/2403.htm

 


--  作者:geast
--  发布时间:2015/1/25 22:51:00
--  
以下是引用有点甜在2015-1-15 20:55:00的发言:

 1、新增10行 Tables("凭证.凭证明细").AddNew(10)

 

 2、保存有数据的行,先删除空行,再保存

 

For Each r As Row In Tables("凭证.凭证明细").Rows
    If r.IsNull("第一列") OrElse r.IsNull("第二列") Then
        r.Delete
    Else
        r.Save
    End If
Next

 

甜老师,这段代码,真的没问题吗,为什么我点一下保存,就删除2行,多点几下就全部删除完了,一行也没保存啊。


--  作者:有点甜
--  发布时间:2015/1/25 22:56:00
--  

 有点问题

 

For i As Integer = Tables("表A").Rows.Count - 1 To 0 Step -1
    Dim r As Row = Tables("表A").Rows(i)
    If r.IsNull("第一列") OrElse r.IsNull("第二列") Then
        r.Delete
    Else
        r.Save
    End If
Next