|
|
|
Есть MDI приложениее. При виборе какого-либо пункта меню, загружается дочеряя форма. Вот кусок кода:
Private Sub mnuPrazdnik_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuPrazdnik.Click
Dim k As New frmKalendar()
k.MdiParent =
Me
k.Show()
End Sub
Проблема в том, что сколько бы пользователь раз не нажал на этот пункт меню, столько и будет создано экземпляров дочерней формы. Как не допустить создание последующих екземпляров дочерней формы? Dim k As New frmKalendar() объяви вне функции, а остальное без изменения.
|
|
|
|
|
|
|