-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathMenu.vb
120 lines (100 loc) · 3.47 KB
/
Menu.vb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
'Program compilation
'created by Michael Dao
'This is a compilation of all my programs made during highschool, they all helped me practice programming
'Started: 11/11/2016
Public Class frmMenu
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'LCD Demo
Me.Hide()
frmLCD_Demo.Show()
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'Dream calculator
Me.Hide()
frmDream_Calculator.Show()
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
'Basketball Scoreboard
Me.Hide()
frmBasketball_Scoreboard.Show()
frmBasketball_Scoreboard_2.Show()
timerstop = False
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
'quiz
Me.Hide()
frmQuiz.Show()
End Sub
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
'message boxes
Me.Hide()
frmMessage_Boxes.Show()
End Sub
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
'stopwatch
Me.Hide()
frmStopwatch.Show()
End Sub
Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
'Animation
Me.Hide()
frmAnimation.Show()
End Sub
Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
'Button Game
Me.Hide()
frmButton_Game.Show()
End Sub
Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
'Balloon chase
Me.Hide()
frmBalloon_Chase.Show()
End Sub
Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
'Investment Calculator
Me.Hide()
frmInvestment_Calculator.Show()
End Sub
Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click
'Dodge the tomatoes
Me.Hide()
frmDodge_The_Tomatoes.Show()
End Sub
Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
'Sandwich Shop
Me.Hide()
frmSandwich_Shop.Show()
End Sub
Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click
'Project 1: Racing Game
Me.Hide()
frmRacing_Game.Show()
End Sub
Private Sub Button14_Click_1(sender As Object, e As EventArgs) Handles Button14.Click
'Button Calculator
Me.Hide()
frmButton_Calculator.Show()
End Sub
Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click
'Guessing Game
Me.Hide()
frmGuessing_Game.Show()
End Sub
Private Sub Button16_Click(sender As Object, e As EventArgs) Handles Button16.Click
'Challenge the computer
Me.Hide()
frmChallenge_The_Computer.Show()
End Sub
Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click
'Student Budget Calculator
Me.Hide()
frmStudent_Budget_Calculator.Show()
End Sub
Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click
'Timetable Manger
Me.Hide()
frmTimetable_Manager.Show()
End Sub
Private Sub Button23_Click(sender As Object, e As EventArgs) Handles Button23.Click
End Sub
End Class