以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个代码如何修改  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25710)

--  作者:blackzhu
--  发布时间:2012/11/15 10:08:00
--  这个代码如何修改
 

If Forms("窗口1").Opened() \'一定要判断用于模拟关联表的窗口是否已经打开
    Dim
t As Table = Tables("窗口1_Table1"
)
    With
Tables("产品"
)
        If
.Current Is Nothing
Then
            t.Filter =
"False"
       
Else
            t.Filter =
"产品编号 = " & .Current("产品编号")
        End
IF
   
End With
End
If

 

 

 老大 这个代码 我不能删除产品的当前行 删除 会提示. 不能通过已删除的行来访问该行的信息   我应该如何修改?


--  作者:狐狸爸爸
--  发布时间:2012/11/15 10:12:00
--  

我打开CaseStudy目录下的示例文件“模拟关联表.Table”,没有你说的问题啊。

最好用例子说话。


--  作者:lin_hailun
--  发布时间:2012/11/15 10:14:00
--  
 所给的信息不足够吧?什么意思?