以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自定义窗口  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=134709)
--  作者：admin22327
--  发布时间：2019/5/5 8:17:00
--  自定义窗口
我做了一个项目，有2个问题 1、想在窗口中按照自定义窗口二的范例输入财务负责人，在主表中正常，改在主表的副本中报错，帮我看一下。2、窗口加载过程中，通过逻辑列筛选，一种加载没有选中的（比如表中是否转换为潜在客户，），一个是加载选中的，代码怎么写。谢谢
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:速达客户管理系统.foxdb

[此贴子已经被作者于2019/5/5 8:17:08编辑过]
--  作者：有点甜
--  发布时间：2019/5/5 9:24:00
--  

afterOpenProject的代码 Tables("资源客户_Table1").Cols("财务负责人_姓名").DropForm = "人员下拉"

 

写到窗口的afterLoad事件，即可。
--  作者：admin22327
--  发布时间：2019/5/5 13:28:00
--  
 
第一个问题我就是按你说的那样子做到，不行，我把项目发你了，你可以试试，
 
 
 
 
第二个问题求代码，窗口加载的时候，不加载选定的逻辑列和加载选定的逻辑列  代码，位置我知道在哪了
--  作者：有点甜
--  发布时间：2019/5/5 14:32:00
--  

afterOpenProject删除这句代码啊

 

Tables("资源客户_Table1").Cols("财务负责人_姓名").DropForm = "人员下拉"
--  作者：admin22327
--  发布时间：2019/5/6 8:18:00
--  

窗口的表为副本，通过筛选加载了主表的一部分，现在需要按设定的条件继续进行筛选，怎么才可以只筛选副本中的内容，而不是筛选主表中内容，比如，只筛选窗口中副本的客户。下边代码哪里有问题（这个代码筛选的主表的）

Dim Filter As String

With e.Form.Controls("cmbProduct")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "客户名称 = \'" & .Value & "\'"
    End If
End With


If Filter > "" Then
    Tables("VIP客户_Table1").Filter = Filter
End If
--  作者：有点甜
--  发布时间：2019/5/6 9:22:00
--  

1、在afterLoad事件，记录你副本表的筛选条件，如

 

vars("条件") = "第一列=\'123\'"

 

2、代码改一下

 

Tables("VIP客户_Table1").Filter = Filter & " and " & vars("条件")