App.PrevInstance = True时,另一个程序的窗体应该已经show出来,还show什么,再说两个实例一样,还不是show自己? 第二个问题 Private Sub Form_Click() Form1.WindowState = 1 End Sub
第一个问题: 你是不是想这样,当程序启动时判断是否已经有了一个相同实例程序在运行,如果已经有了, 如果那个程序窗口没有显示的话,就让那个程序显示窗口显示出来,然后再自己结束掉。 如果是这样,建议使用DDE或网络与另外的那个实例程序通讯,通知他有人又一次运行了同一个 文件,当它收到DDE或网络信息时,就做出显示窗口的反应。建议采用DDE进行通讯,如果要用 网络的话,建议使用UDP协议,向127.0.0.1的UDP端口发送信息第二个问题: 在窗体下加入以下代码: Private Sub Form_DblClick() Me.WindowState = 1 End Sub
第二个问题
Private Sub Form_Click()
Form1.WindowState = 1
End Sub
你是不是想这样,当程序启动时判断是否已经有了一个相同实例程序在运行,如果已经有了,
如果那个程序窗口没有显示的话,就让那个程序显示窗口显示出来,然后再自己结束掉。 如果是这样,建议使用DDE或网络与另外的那个实例程序通讯,通知他有人又一次运行了同一个
文件,当它收到DDE或网络信息时,就做出显示窗口的反应。建议采用DDE进行通讯,如果要用
网络的话,建议使用UDP协议,向127.0.0.1的UDP端口发送信息第二个问题:
在窗体下加入以下代码: Private Sub Form_DblClick()
Me.WindowState = 1
End Sub