Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

A窗体的字段赋值到B窗体作为B窗体的筛选条件并打开B窗体

2005284111  发表于:2011-10-13 10:40:04  
复制

设定环境:【资料库清单】为记录清单

 

                      【资料库编辑】为对某个记录进行修改作业

 

期望结果:在【资料库清单】单击【确定】按钮后,把当前记录的【编号】赋值到【资料库编辑】窗体,

 

                     作为【资料库编辑】的筛选条件,并打开【资料库编辑】窗体对该记录作修改作业。

 

 

 

P.S:详见以下附件,是用繁体系统做的例子,打开会有点麻烦。

 

          今晚我会再上传一个简体版,这事有点急,请各位帮帮忙!

 

 

点击下载此附件

 

Top
网行者 发表于:2011-10-13 18:42:01

一、首先创建一个新模块ModCode,并在模块中定义一个全局变量g_ID:Public g_ID As String

二、在【资料库清单】窗体【确定】的单击事件中给全局变量g_ID赋值:g_ID=me.编号

三、在【资料库编辑】窗体加载事件中加入:

    Me.RecordSource = "select * from 资料库 where 编号 ='" & g_ID & "'"



2005284111 发表于:2011-10-14 10:27:57

Dear   網行者:

 

          好像,運行不了,或者上傳修改后的例子給我參考一下,謝謝!



网行者 发表于:2011-10-14 11:31:14
你的附件VBE打不开

网行者 发表于:2011-10-14 11:47:32
access爱好者 发表于:2011-10-14 13:38:15
点击下载此附件 是这样吗?不知道做什么用。。。。。。。

2005284111 发表于:2011-10-14 14:52:18

Dear   網行者:

 

           感謝你的提示,問題已解決了一大部分,但能解決以下問題,更完美:

 

待我轉到【資料庫編輯】窗體時,是跑到我需要的記錄,但若我滑動鼠標,還是會跑到其他記錄,請問,能否只是顯示我需要的記錄呢?

 

                                                                                                                     感謝!!!



网行者 发表于:2011-10-14 17:10:18
2005284111 发表于:2011-10-17 11:49:40

Dear   網行者:

 

            謝謝你的幫忙,問題已經解決!



总记录:8篇  页次:1/1 9 1 :