如何确定某一个窗体已经打开,然后确定其显示位置?

Question

Form1和Form2
我已经将Form1和Form2显示于最前,现在是要
当Form1没有打开是Form2显示于Form2.Left = 0和Form2.Top = 1500,如果Form1已经是打开的,Form2则显示于Form2.Left = 0和Form2.Top = 5000
同样,当Form2没有打开是Form1显示于Form1.Left = 0和Form1.Top = 1500,如果Form2已经是打开的,Form1则显示于Form1.Left = 0和Form1.Top = 5000

Answer 1

看你的意思窗体隐藏了应该算是不打开的吧
用Form1.Visible或Form2.Visible来判断就行

Answer 2

不能这样用Visible的,程序刚开始时用户还未点开窗体,怎么来的Visible呢?有无其他办法可以确定窗体是否已经打开???

Answer 3

用FindWindow函数看看行不行Dim hWndFr2 as long
hwndfr2=findwindow(vbnullstring,form2的Caption)
if hwndfr2<>0 then
msgbox "Form2已经打开"else 
msgbox"form2没有打开"
endif

Answer 4

检查Forms集合里面是否存在Form1,Form2， 存在表示打开。