设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 29182|回复: 132
打印 上一主题 下一主题

[模块/函数] 调用另一窗体的事件代码方法

[复制链接]
跳转到指定楼层
1#
发表于 2009-9-5 22:52:14 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
本帖最后由 tanhong 于 2009-12-18 09:33 编辑

实例演示 A 窗体调用 B 窗体中的 Command0 按钮单击事件方法

我们所说的窗体,其实也是一个类对象,事件也就是类对象过程,调用方法和调用类对象方法是相同的。

假如:B 窗体有按钮 Command0 的单击事件,代码如下:
  1. Private Sub Command0_Click()
  2.     MsgBox "B窗体事件"
  3. End Sub
复制代码

要想让其它程序调用,我们必须把 Private 私有事件过程关键字,改为 Public 公有过程关键字, 这很关键, 代码如下:
  1. Public Sub Command0_Click()
  2.     MsgBox "B窗体事件"
  3. End Sub
复制代码

实现在 A 窗体中调用B窗体按钮单击事件。我们可以象调用类对象方法一样来调用这个按钮单击事件过程.代码如下
  1. Dim B As Form_B  '申明窗体类
  2. Private Sub Command0_Click()
  3.      '设定为窗体B
  4.          set B = Form_B
  5.          '调用窗体B事件过程
  6.     B.Command0_Click
  7. End Sub
复制代码



实例样本:
游客,如果您要查看本帖隐藏内容请回复

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

评分

参与人数 1经验 +10 收起 理由
Henry D. Sy + 10 精品文章

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏4 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

134#
发表于 2015-4-21 10:56:06 | 只看该作者
看一下,
回复

使用道具 举报

133#
发表于 2014-11-9 12:07:03 | 只看该作者
22222222222
132#
发表于 2014-11-7 15:23:38 来自手机 | 只看该作者
学习一下
回复

使用道具 举报

131#
发表于 2014-11-7 14:55:49 | 只看该作者
学习
回复

使用道具 举报

130#
发表于 2014-11-4 21:25:56 | 只看该作者
学习
回复

使用道具 举报

129#
发表于 2014-8-1 16:43:56 | 只看该作者
本窗口可调用吗
128#
发表于 2013-5-14 07:12:21 | 只看该作者
学习一下.
127#
发表于 2013-5-10 13:15:34 | 只看该作者
学习一下。
126#
发表于 2013-5-8 23:29:53 | 只看该作者
谢谢分享,下来学习学习,顶上~!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-9-20 16:51 , Processed in 0.121240 second(s), 36 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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