Public Class frmPruefplan

    Private Sub frmFinmaStammdaten_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim KategorieTree As New clsKategorieTree
        KategorieTree.Load_Treeview(Me.TreeStammdaten)

    End Sub

    Private Sub TreeStammdaten_Click(sender As Object, e As EventArgs) Handles TreeStammdaten.Click

    End Sub

    Private Sub TSBtnQuit_Click(sender As Object, e As EventArgs) Handles TSBtnQuit.Click

    End Sub

    Private Sub BeendenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BeendenToolStripMenuItem.Click
        Me.Close()
    End Sub
End Class