public f as string窗体A调用C时: f="A" A.hide窗体B调用C时: f="B" B.hide窗体C的unload中 if f="A" then A.show elseif f="B" then B.show end if
在窗体C中定一个一个PUBLIC的窗体变量用来记录调用它的窗体: 大致代码如下: 窗体C:Option Explicit Public ParentForm as Form ...Sub Form_Unload() ParentForm.Show End Sub窗体A或窗体B: Sub Command1_Click() Dim FormC as FormC Set FormC = New FormC Set FormC.ParentForm =me FormC.Show End Sub ...简单吧。
f="A"
A.hide窗体B调用C时:
f="B"
B.hide窗体C的unload中
if f="A" then
A.show
elseif f="B" then
B.show
end if
大致代码如下:
窗体C:Option Explicit
Public ParentForm as Form
...Sub Form_Unload()
ParentForm.Show
End Sub窗体A或窗体B:
Sub Command1_Click()
Dim FormC as FormC
Set FormC = New FormC
Set FormC.ParentForm =me
FormC.Show
End Sub
...简单吧。
这个办法好,我开始也是这样做的,:(不过,少了个Set,郁闷......
记录窗体名也是可以的,当调用的窗体比较多的时间,工作量就有点大了...嘿嘿
结贴了哦