Form bereits geladen? (.NET) Mit dieser Funktion prüfen Sie, ob eine bestimmte Form bereits geladen wurde oder nicht.
Autor:   Dieter Otter	Bewertung:	Views:  26.448
www.tools4vb.de	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Mit dieser Funktion prüfen Sie, ob eine bestimmte Form bereits geladen wurde oder nicht.
Dies ist bspw. immer dann sinnvoll, wenn sichergestellt werden muss, dass eine Form nur genau einmal geladen und angezeigt werden soll.

Fügen Sie nachfolgende Funktion am besten in ein Modul ein:

''' <summary>
''' Prüft, ob eine bestimmte Form bereits geladen ist 
''' und gibt im Erfolgsfall True zurück
''' </summary>
''' <param name="sName">Name des Form-Objekts</param>
Public Function FormIsLoaded(ByVal sName As String) As Boolean
  Dim bResult As Boolean = False
 
  ' alle geöffneten Forms durchlauden
  For Each oForm As Form In Application.OpenForms
    If oForm.Name.ToLower = sName.ToLower Then
      bResult = True : Exit For
    End If
  Next
 
  Return (bResult)
End Function

Aufrufbeispiel:

' Prüfen, ob 2. Form bereits geladen
' Falls nicht, jetzt laden und anzeigen
If Not FormIsLoaded("form2") Then
  Dim oForm As New Form2
  oForm.Show()
Else
  MsgBox("Form2 ist bereits geladen!")
End If

Copyright ©2000-2025 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.