Foxtable(狐表)用户栏目专家坐堂 → 多列关联


  共有8501人关注过本帖平板打印复制链接

主题:多列关联

帅哥哟,离线,有人找我吗?
hdf0913
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:50 积分:588 威望:0 精华:0 注册:2012/8/2 16:08:00
多列关联  发帖心情 Post By:2012/9/11 14:26:00 [只看该作者]

If Forms("采购goodsid").Opened() '一定要判断用于模拟关联表的窗口是否已经打开
    Dim t As Table = Tables("采购明细")
    With Tables("采购输入_tabel1")
        If .Current Is Nothing Then
            t.Filter = "False"
        Else
            t.Filter = "采购单号 = '" & .Current("采购单号") & "'" 
            t.Filter = "货号 = '" & .Current("货号") & "'"
        End If
    End With
End If

 

要求是“采购单号”=“采购单号”,“货号”=“货号”(都是字符型)

上述代码对吗,主要是

            t.Filter = "采购单号 = '" & .Current("采购单号") & "'" 
            t.Filter = "货号 = '" & .Current("货号") & "'"
这句是这样吗?

 

 


 回到顶部