请教在子窗体中CALL主窗体的事件过程

大连海员

各位高手：

我的数据库需要在子窗体的数据更新后，调用主窗体中的事件过程，以便重新计算主窗体中的数据，我只会在主窗体内部用CALL语句调用本窗体内的其它事件过程。

我曾经试用过如下语句(在子窗体数据更新时），但显示“数据或成员未找到”：

CALL_主窗体名称.form_dirty

请指教此语句应该如何修改？

若有其它复杂的方法，请最好能够详细一点，我不是太在行。

再次感谢。

一点通

1.这种方法不行

2.在子窗体中重写一次这样的语句

3.将代码写到模块中去,然后调用

wu8313

主窗体中的事件 使用 public 声明。

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

改变子窗体中的姓名，将会调用 主窗体 中按钮事件。

[此贴子已经被作者于2007-3-1 20:56:56编辑过]

gallonchai

wu8313 说的对,主窗体的过程一定要用 Public 声明,然后在子窗体的过程里直接写



forms("主窗体名称").主窗体过程名



就行了

大连海员

非常感谢三位高手的指教。

按照三位的指示，在应用IF　THEN语句时仍然出现了问题，现将WU8313先生提供的示例略做修改，以表示我所需要解决的问题，请看示例。

要求：在子窗体中的“给分”变化时，主窗体中的“分数1”会自动进行变化。

再次感谢。

sgrshh29

二个问题，1、Call Forms("窗体1").命令2_Click 应该在 给分_AfterUpdate 事件中，而不是在 姓名_AfterUpdate 事件中。 2、在主窗体的按钮事件中，首先应该刷主新窗体数据。

fan0217

其实窗体也是个类，可以采用这种方法调用：

窗体1代码：

Public Sub Command1_Click()'使用 public 声明
    MsgBox "你好！"
End Sub

窗体2代码：

Private Sub Command0_Click()
Dim frm As New Form_窗体1
    Call frm.Command1_Click
End Sub

这样就可以调用窗体1的Command1_Click过程。

大连海员

非常感谢几位高手的再次帮助，现在问题已经解决。

再次感谢。