打开子窗体问题
ou108兄弟:
前几天在您的帮助下解决了用字符串打开子窗体问题,今天出现了新问题:
打开一个子窗体再单击同一个节点,如果这个窗体已最小化那么将这个子窗体还原,这样没问题,但如果已打开一个子窗体,再单击其他节点就无法打开其他子窗体?
Private Sub TreeView1_NodeMouseClick1(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseClick
Dim frm As Object = " "
Dim ftype As Type
Try
If e.Node.IsExpanded Then
e.Node.Collapse()
Else
e.Node.Expand()
End If
If e.Node.Tag = " " Then Exit Sub
ftype = Type.GetType( "KCKDBMS. " & e.Node.Tag)
Dim fassembly As System.Reflection.Assembly
fassembly = System.Reflection.Assembly.GetAssembly(ftype)
frm = fassembly.CreateInstance(ftype.ToString)
For Each frm In Me.MdiChildren
If frm.Name = e.Node.Tag Then
frm.MdiParent = Me
frm.Focus()
frm.Show()
frm.WindowState = FormWindowState.Normal
frm.StartPosition = FormStartPosition.CenterScreen
Me.ToolStripStatusLabel2.Text = e.Node.Text
Exit Sub
End If
Next
frm.MdiParent = Me
'frm.Focus()
frm.Show()
frm.WindowState = FormWindowState.Normal
frm.StartPosition = FormStartPosition.CenterScreen
Me.ToolStripStatusLabel2.Text = e.Node.Text
Catch ex As Exception
MessageBox.Show(ex.Message.ToString, "错误 ", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub
[解决办法]
呵呵,lz把分散了吧.
[解决办法]
顶,散分吧。。。呵呵