可以,比如有两个窗体FormA,FormB
在FormA中声明Private Withevents F as Form
然后在FormA某处代码中(如FormA_Load事件中)给F这样赋值:
Set F=FormB
这样在FormA中就可以捕获FormB的事件了,如UnLoad事件。
Private Sub F_UnLoad(cancel as integer)
msgbox "FormB is unloading"
end sub
在FormA中声明Private Withevents F as Form
然后在FormA某处代码中(如FormA_Load事件中)给F这样赋值:
Set F=FormB
这样在FormA中就可以捕获FormB的事件了,如UnLoad事件。
Private Sub F_UnLoad(cancel as integer)
msgbox "FormB is unloading"
end sub
解决方案 »
- VB回调DLL,其中有回调函数如何处理?
- msgbox 中显示的内容不完全!!!
- 安装程序后运行读取数据库时报错,提示“未找到提供程序。该程序可能未正确安装”,请各位兄弟姐妹帮帮忙!!!!
- 求救:用ado.stream读到tmp.rtf文件,全角双引号变成半角双引号的问题?
- 一个串口程序的问题?
- 如何才能保存sstab中修改过的?
- 请教一个控件刷新的问题。
- 如何用vba在word中读取任意行上的字符串·······(就这点分了)
- 帮忙看一下这个问题?(有关动态生成的COMMANDBUTTON的CLICK事件)
- VB 能否利用 TEXT 折行特性,把中英文混排文字段落分为几行?
- 一个关于dos下网卡的问题.
- 我需要这样的函数!!(参看“请前辈们帮我查错!!或帮我修改一下!”)
Form2.Show
Set F = Form2
End SubPrivate Sub F_Unload(Cancel As Integer)
MsgBox F.Name & " is unload"
End Sub