设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 27476|回复: 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 分享分享 分享淘帖 订阅订阅
2#
发表于 2009-9-6 00:45:52 | 只看该作者
顶下,看一下
3#
发表于 2009-9-6 08:20:59 | 只看该作者
see
4#
发表于 2009-9-6 08:21:52 | 只看该作者
高!
5#
发表于 2009-9-6 18:38:01 | 只看该作者
学习
6#
发表于 2009-9-6 20:04:42 | 只看该作者
7#
发表于 2009-9-6 20:37:49 | 只看该作者
8#
发表于 2009-9-7 08:11:58 | 只看该作者
学习学习!!
9#
发表于 2009-9-7 08:30:23 | 只看该作者
快看看
10#
发表于 2009-9-7 08:54:25 | 只看该作者
学习一下.
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-5-7 01:13 , Processed in 0.129100 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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