Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-窗体/数据页

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

时 间:2018-12-04 18:28:07
作 者:祝康胜   ID:48957  城市:昆山
摘 要:在编辑窗口开始录数据的时候,根据主键条件刷新后台主窗口加载数据。
正 文:

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

为了达到这个目的,折腾了我将近一个星期。今天终于弄出来,庆祝一下[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

Access软件网官方交流QQ群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助