Public Class immsBDmain
    Dim Board01 As New immsBDboard
 
    Private Sub immsBDmain_auswahlBTN_Click(ByVal sender As System.Object, _
      ByVal e As System.EventArgs) Handles immsBDmain_auswahlBTN.Click
        Board01.Show()
    End Sub
End Class