-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathLoadFormsModule.vb
More file actions
43 lines (26 loc) · 782 Bytes
/
Copy pathLoadFormsModule.vb
File metadata and controls
43 lines (26 loc) · 782 Bytes
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
Module LoadFormsModule
Public Sub LoadBattleForm()
'Declare BattleForm as variable
Dim frmBattleForm As New BattleForm
'Show BattleForm
frmBattleForm.Show()
End Sub
Public Sub LoadBonusIForm()
'Declare BonusIForm as variable
Dim frmBonusIForm As New BonusIForm
'Show BonusIForm
frmBonusIForm.Show()
End Sub
Public Sub LoadBonusIIForm()
'Declare BonusIIForm as vairable
Dim frmBonusIIForm As New BonusIIForm
'Show BonusIIForm
frmBonusIIForm.Show()
End Sub
Public Sub LoadHelpForm()
'Declare HelpForm as variable
Dim frmHelpForm As New HelpForm
'Show HelpForm
frmHelpForm.ShowDialog()
End Sub
End Module