Access数据库培训
网站公告
·Access快速平台QQ群号:277422564    ·Access快速开发平台下载地址及教程    ·欢迎添加微信交流账号:Accessoft7    ·如何快速搜索本站文章|示例|资料!    
您的位置: 首页 > 技术文章 > 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群 (群号:115120150)       access源码网店

最新评论 查看更多评论(1)

2018/12/5 9:05:00谢玉青
赞!

发表评论您的评论将提升作者分享的动力!快来评论一下吧!

用户名:
密 码:
内 容:
 

常见问答

技术分类

相关资源

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