现在我有一个form1,里面的一个按钮触发form2.show 1
form2的一个按钮触发unload me。
现在我想在关闭form2,回到form1的时候,触发一个按钮中的事件,类似刷新。
用了以下的代码
private sub form_gotfocus()
Command1_Click
end sub
但是好像不能触发事件。
请问怎么样可以达到我要的效果。谢谢。

解决方案 »

  1.   

    form窗体应该有关闭事件,你在事件中重新new一下form1就可以了吧
      

  2.   

    'Form1 Code
    Option Explicit
    Public Sub Command1_Click()
        Print "123"
    End SubPrivate Sub Command2_Click()
        Form2.Show
        Unload Form1
    End Sub'Form2 Code
    Option ExplicitPrivate Sub Form_Unload(Cancel As Integer)
        Form1.Show
        Form1.Command1_Click
    End Sub
      

  3.   

    如果是模态显示的话,直接在Show的那句后边触发就可以了:
    call Form2.show(vbmodal)
    command1.value = true
      

  4.   

    zdingyun:
    我有form2.show 1, 好像这个代码就不行了。
    sonic_andy:
    请问具体怎么调用的代码,谢谢。 
      

  5.   

    'Form1 Code
    Option Explicit
    Public Sub Command1_Click()
        Print "123"
    End SubPrivate Sub Command2_Click()
        Form2.Show
        Unload Form1
    End Sub'Form2 Code
    Option ExplicitPrivate Sub Form_Unload(Cancel As Integer)
        Form1.Show
        Form1.Command1_Click
    End Sub