Withevents Fehler bei close und show

  • VB.NET

Es gibt 5 Antworten in diesem Thema. Der letzte Beitrag () ist von RodFromGermany.

    Withevents Fehler bei close und show

    Hallo an alle!

    Ich habe mal wieder ein Problem und zwar, wenn ich jetzt mit Withevents eine Form erstelle, diese öffne, danach wieder schließe und schließlich nochmals öffne kommt ein fehler beim Öffnen:

    VB.NET-Quellcode

    1. Friend WithEvents a As New Form
    3. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    4. a.Show()
    5. End Sub
    7. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    8. a.Close()
    9. End Sub


    Ich hoffe ihr könnt mir helfen!

    LG Alpha11833

    Mach es so, da kannst Du auf den Buttons Klavier spielen und alles läuft:

    VB.NET-Quellcode

    1. Public Class Form1
    2. Dim a As Form2
    3. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    4. If a Is Nothing OrElse a.IsDisposed Then
    5. a = New Form2
    6. End If
    7. If Not a.Visible Then
    8. a.Show()
    9. End If
    10. End Sub
    11. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    12. If a IsNot Nothing AndAlso Not a.IsDisposed Then
    13. a.Close()
    14. End If
    15. End Sub
    16. End Class
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

Facebook