25 lines
993 B
VB.net
25 lines
993 B
VB.net
Public Class Main_Menu
|
|
Private Sub Button_Individual_Click(sender As Object, e As EventArgs) Handles Button_Individual.Click
|
|
AppForm.fillMode = False
|
|
AppForm.Panel_Start.Controls.Clear()
|
|
Individual.TopLevel = False
|
|
AppForm.Panel_Start.Controls.Add(Individual)
|
|
Individual.Load_GUI()
|
|
Individual.Show()
|
|
End Sub
|
|
|
|
Private Sub Button_Multiple_Click(sender As Object, e As EventArgs) Handles Button_Multiple.Click
|
|
AppForm.fillMode = True
|
|
AppForm.Panel_Start.Controls.Clear()
|
|
Individual.TopLevel = False
|
|
AppForm.Panel_Start.Controls.Add(Individual)
|
|
Individual.Load_GUI()
|
|
Individual.Show()
|
|
End Sub
|
|
|
|
' ---------------------------------- Settings ----------------------------------
|
|
' --- Settings button clicked ---
|
|
Private Sub Button_Settings_Click(sender As Object, e As EventArgs) Handles Button_Settings.Click
|
|
Settings.ButtonClicked(sender, e)
|
|
End Sub
|
|
End Class |