请问在主窗体控制次窗体的代码!
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Select Case ComboBox1.SelectedIndex
Case Is = "0"
Dim f2 As New Form2()
Panel4.Height = f2.Height - 34
f2.TopLevel = False
f2.Parent = Me.Panel4
f2.Show()
Case Is = "1"
...
Case Is = "2"
...
Case Is = "3"
...
End Select
end sub
ComboBox1下拉菜单里有4项,我希望每次选择ComboBox1就会在Panel4里打开新的form2(或者是form3,form4,form5),关闭旧的已经打开过的form(N),请高手帮忙一下,关闭的不会写,老是出错!主窗体是form1,其它的4个窗体是form2,form3,form4,form5.请告诉我Case部分怎么写,或者还要加个全局变量,(我猜的,^-^,不用最好),谢谢了.
问题点数：20、回复次数：1Top
1 楼aycn（木乃伊）回复于 2004-09-01 20:55:23 得分 20
试一试这样关闭看行不行：
For i = 0 To panel.controls.Count - 1
If typeof panel.controls(i) Is form Then
panel.Controls.Remove(panel.controls(i))
End If
Next
Top
