ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 5709|回复: 8

[求助] 如何将ACCESS中一个窗体中的ID号赋值给关联窗体中的ID变量中?^_^

[复制链接]

TA的精华主题

TA的得分主题

发表于 2010-4-4 14:50 | 显示全部楼层 |阅读模式
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
假设有5个ACCESS窗体,每个窗体中都有ID变量,而且每个窗体中的ID变量都通过“关系”进行关联,

现在想达到的是:假设我从第一个窗体中的ID变量框中输入ID号值后,假设为100001,然后在该窗体所有变量录完之后跳转到下一个关联窗体的ID号变量框时,自动将100001赋值给该关联窗体的ID变量,这样能达到吗?

非常感谢,非常希望能得到解答,^_^

TA的精华主题

TA的得分主题

发表于 2010-4-4 15:35 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
楼主有附件能传上来吗?
你在要自动赋值的窗体的加载代码里面给文本框变量赋值,值取第一个窗体的ID.

TA的精华主题

TA的得分主题

 楼主| 发表于 2010-4-4 20:36 | 显示全部楼层
原帖由 lrlxxqxa 于 2010-4-4 15:35 发表
楼主有附件能传上来吗?
你在要自动赋值的窗体的加载代码里面给文本框变量赋值,值取第一个窗体的ID.


好的,附件的mdb文件包括两个窗体,1、基本信息,2、吸烟状况。
录完基本信息窗体里面最后一个变量“职业”后,光标会跳转到按钮“转入到 吸烟状况 调查”,点击后关联到第二个窗体“吸烟状况”,我想达到的是在跳转到第二个窗体时,同时将第一个窗体中的ID号自动赋值到第二个窗体中,不知道怎么操作,^_^

非常希望楼上的可以解答一下,先谢谢啦,^_^

[ 本帖最后由 明玥 于 2010-4-4 20:39 编辑 ]

ID关联.part1.rar

224.61 KB, 下载次数: 39

ID关联实例.part1

ID关联.part2.rar

80.38 KB, 下载次数: 24

ID关联实例.part2

TA的精华主题

TA的得分主题

 楼主| 发表于 2010-4-5 10:27 | 显示全部楼层
查找到论坛中相关帖子的回复
试了下面两种方法,好像都不行,不知道怎么回事
方法1:
Private Sub ID_Click()
  Me![初诊-询问-吸烟状况]![ID] = [Forms]![初诊-询问-基本信息]![ID]
End Sub


Private Sub ID_Click()
  [Forms]![初诊-询问-吸烟状况]![ID] = [Forms]![初诊-询问-基本信息]![ID]
End Sub

方法2:直接将控件默认值设为
= [Forms]![初诊-询问-基本信息]![ID]

TA的精华主题

TA的得分主题

发表于 2010-4-5 18:11 | 显示全部楼层
看一下。是否是这个方式

ID关联-OK.rar

299.43 KB, 下载次数: 138

TA的精华主题

TA的得分主题

发表于 2010-4-5 22:19 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

方法很多,比如使用openargs ,全局变量等

使用openargs

在调用的窗体使用如下语句:

docmd.openform "被调用的窗体", , , , , , "参数值"

在被调用的窗体使用me.openargs即可获取传递过来的参数

20100405160059.rar

467.32 KB, 下载次数: 93

TA的精华主题

TA的得分主题

发表于 2010-4-5 22:35 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2010-4-5 22:44 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2010-4-5 22:49 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
原帖由 lrlxxqxa 于 2010-4-5 22:19 发表
使用openargs

在调用的窗体使用如下语句:

docmd.openform "被调用的窗体", , , , , , "参数值"

在被调用的窗体使用me.openargs即可获取传递过来的参数


也谢谢rlxxqxa啦,也能达到,不过自己感觉5楼的似乎可能更好一些,因为他在第二个窗体给ID号赋值后,光标直接跳到下一个变量啦!

不过两位都是高手,先学习啦,真的很感谢楼上的两位,^_^
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2025-1-12 20:47 , Processed in 0.024294 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表