frm_menu.kbasic_form

f As frm_newgame

Class frm_menu Inherits Form
' ------------------------------------------------------------------------






  Sub CommandButton0_Click(m As Mouse)

    ' run form
    Dim f As New frm_newgame
    f.Open()

  End Sub

' ------------------------------------------------------------------------
End Class