以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [灌水]帮助文件中的错误代码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=16840)

--  作者:kitty
--  发布时间:2012/2/25 12:31:00
--  [灌水]帮助文件中的错误代码

在帮助中“用Table控件模拟关联表”这一章节中:

第4步中,

4、窗口的AfterLoad事件设为:

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

此段代码确保打开窗口后,Tables("窗口1_Table1")只显示当前选定产品的订单。

---------------------------我是分割线----------------------------------

此段中

 t.Filter = "产品编号 = " & .Current("产品编号")应改为

 t.Filter = "产品编号 = \'" & .Current("产品编号") & "\'"
原因详见帮助中“动态合成表达式”章节。

同理步骤中的5也有相同错误。



--  作者:小猪鑫鑫
--  发布时间:2012/2/25 17:17:00
--  
楼主:我个人认为如果这个"产品编号"的数据类型是数字类型,则帮助中的代码是对的,如果是字符型则帮助中的代码需要改进;
--  作者:e-png
--  发布时间:2012/2/25 23:39:00
--  
说明搂住您:帮助看得不够,实战干得不够。 呵呵
--  作者:狐狸爸爸
--  发布时间:2012/2/26 8:33:00
--  

楼主看这里,要细致地看完:

 

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