主题：关于加载窗体的问题

加载窗体时用什么方法能判断是用查找的方式打开的窗体还是正常加载窗体呢？因为正常加载窗体时数据时没有过滤过的全部数据。

 用变量记录一下。如，打开之前，

 

vars("窗口1_状态") = "查找"

Forms("窗口1").Open

有点色老师 不明白什么意思，能给一个详细的解决方法吗？

 

2楼说的够清楚了。上传例子说明

有点色老师

 

 

我是在“机具库存资料”表属性双击事件上写的

在“机具库存资料”表的字段="客户姓名" 双击即可按此值以查找的方式打开"客户资料入库窗体"或"流量卡资料窗体"，这样是能实现。 可是再按正常的方式打开“客户资料入库窗体”或 "流量卡资料窗体"时，它还是以上一次查找过的数据显示，不知道怎么解决。有点色老师给一个详细代码吧。谢谢！！

我想实现只有在双击“机具库存资料”字段="客户姓名" 时打开的"客户资料入库窗体" 是带有查找功能的，其他只要打开"客户资料入库窗体"就是所有的数据，不是查找过的数据， 

 

 

 你在什么时候打开窗口？在哪里写了open代码？

有点色老师   If e.Col.Name="客户姓名" Then e.Cancel= True Forms("客户资料入库窗体").OpenTo("机具库存资料") ElseIf e.Col.Name="机具条码" Then Forms("流量卡资料窗体").OpenTo("机具库存资料") End If     我是在“机具库存资料”表属性双击事件上写的 在“机具库存资料”表的字段="客户姓名" 双击即可按此值以查找的方式打开"客户资料入库窗体"或"流量卡资料窗体"，这样是能实现。 可是再按正常的方式打开“客户资料入库窗体”或 "流量卡资料窗体"时，它还是以上一次查找过的数据显示，不知道怎么解决。有点色老师给一个详细代码吧。谢谢！！ 我想实现只有在双击“机具库存资料”字段="客户姓名" 时打开的"客户资料入库窗体" 是带有查找功能的，其他只要打开"客户资料入库窗体"就是所有的数据，不是查找过的数据，

If e.Col.Name="客户姓名" Then
    e.Cancel= True

    vars("客户资料入库窗体_状态") = "查询"
    Forms("客户资料入库窗体").OpenTo("机具库存资料")
ElseIf e.Col.Name="机具条码" Then
    Forms("流量卡资料窗体").OpenTo("机具库存资料")

End If

 

 正常打开的话，就这样写

 

vars("客户资料入库窗体_状态") = "正常"

Forms("客户资料入库窗体").OpenTo("机具库存资料")

 

 你在afterLoad事件设置筛选代码？那就判断

 

If vars("客户资料入库窗体_状态") = "正常" Then

    '代码

ElseIf vars("客户资料入库窗体_状态") = "查询" Then

    '代码

End If

有点色老师，在那个事件写呢？

客户资料入库窗体_状态 字段是自己定义的吗？

 

认认真真看懂9楼。不会做，单独做一个例子发上来帮你写代码。

 

vars变量可以任意指定名字 http://www.foxtable.com/webhelp/scr/0325.htm