Access快速开发平台--在编辑窗口开始录数据的时候，根据主键条件刷新后台主窗口加载数据的解决笔记；学习Access每天进步一点，良心好受一点！-甘专栏

在编辑窗口开始录数据的时候，根据主键条件刷新后台主窗口加载数据

为了达到这个目的，折腾了我将近一个星期。今天终于弄出来，庆祝一下 [haha]

第1步：
先在新建模块中设置一个Public文本变量WindowState

第2步：
将主窗体Load事件过程改成Public Sub

第3步：
在主窗体Load事件过程中增加以下代码：
    If WindowState Like "Select * FROM NC汇总表（门灯横梁）*" Then
        Me.sfrList.Form.RecordSource = WindowState
    Else
        Me.sfrList.Form.RecordSource = "Select NC汇总表（门灯横梁）.* FROM NC汇总表（门灯横梁） Where (((NC汇总表（门灯横梁）.完成日期)<=Date()) AND ((NC汇总表（门灯横梁）.完成日期)>Date()-30))"
    End If
这段代码是防止有很多类似窗口都需要实现这个功能，为防止公共文本变量混乱，所以加了这段代码。

第4步：
在编辑窗口需要刷新主窗口的事件代码中增加代码：
WindowState = "Select * FROM NC汇总表（门灯横梁） Where [物料代码/特性值] Like '" & i(0) & "*" & "'"
Call [Form_frmNC汇总(门灯横梁)].Form_Load

OK，目标达成！
每天进步一点，良心好受一点！ [拳头]

收起全文d