Feedback

VB - MDI Child Form nur einmal öffnen

Veröffentlicht von am 17.07.2009
(1 Bewertungen)
Dieser Code prüft das vorhanden sein eines MDIChild über alle MDIChild''s hinweg, wenn noch keins mit dem Namen existiert wird eins erstellt. Der nächste Öffnen-Versuch geht dann ins Leere und aktiviert das schon geöffnete MDIChild-Fenster.
Den Code einfach im Button/Menü kopieren und Form anpassen.
GFU-Schulungen  [Anzeige]

Visual Studio Team Foundation Server 2017/2015 (TFS) - Komplett 

Visual Studio Team Foundation Server 2017/2015 (TFS) für Entwickler - Kompakt

Nach Teilnahme an dieser Schulung kennen Sie alle wesentlichen Funktionen des TFS für Entwickler. Sie setzen Software-Entwicklung mit dem Visual Studio Team Foundation Server erfolgreich um.

Dim kForm As Form
Dim kformExistiert As Boolean = False
For Each kForm In Me.MdiChildren
	If Not TypeName(kForm) = "MDIForm" Then
		If kForm.Name = "frmKunden" Then
			'' Es gibt mind. 1 geöffnetes Browser-Fenster
			kForm.Activate()
			kformExistiert = True
		End If
	End If
Next
If Not kformExistiert Then
	kForm = New frmKunden
	kForm.MdiParent = Me
	kForm.Show()
End If
Abgelegt unter MDIChild, öffnen, MDI, Children, Form.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!