表副本控件的CurrentChanged属性 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 表副本控件的CurrentChanged属性

共有8951人关注过本帖树形打印复制链接主题：表副本控件的CurrentChanged属性

hdf0913

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：50 积分：588 威望：0 精华：0 注册：2012/8/2 16:08:00

表副本控件的CurrentChanged属性 发帖心情

Post By：2012/9/11 11:49:00 [只看该作者]

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

原表的PrepareEdit属性设置代码

If e.Col.Name = "数量" Then
e.Cancel = True
Forms("采购goodsid").Open()
End If

在将表做为副本控件后加入前面的代码，点击“数量”列窗口Forms("采购goodsid")不能弹出

给解决下