Question

VB 怎么让两个窗体同时最小化同时关闭

我创建了form1和form2 ，form2无边框， 想单击form1关闭按钮和最小化按钮 两个窗体能同时最小话和关闭，请高手指教

Answer 1

Private Sub Form_Resize()
if Me.WindowState=1 then
Form2.WindowState = Me.WindowState
end if
End Sub
Private Sub Form_Unload(Cancel As Integer)
Unload Form1
Unload Form2
End Sub

追问

可以同时最小化和关闭 但是最小化过后还原不能同时还原

追答

还原是状态值应该是0 你试下判断条件改成 if (Me.WindowState=0) or ((Me.WindowState=1) then

追问

可以了 但是from2最消化是到了左下角 不是和from1一起的 能不能做到最小化之后只看到from1的图标

追答

设置让from2不出现在任务栏中from2.showintaskbar=false

追问

Form2不是在任务栏中 是在开始菜单按钮的上面位置

追答

听不懂你说的什么 “在开始菜单按钮的上面位置 ”

Answer 2

你可以用" form2.windowstate=form1.windowstate"
一般是在子程序的最下面。