-
Notifications
You must be signed in to change notification settings - Fork 0
/
Home.vb
43 lines (29 loc) · 1002 Bytes
/
Home.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
Public Class Home
'Contains code related to redirection to specified modules at Buttonclick
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.Hide()
Dim reg = New register
reg.Show()
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Me.Hide()
Dim rep = New repair
rep.Show()
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Me.Hide()
Dim adm = New adminlog
adm.Show()
End Sub
Private Sub Label2_Click(sender As Object, e As EventArgs) Handles Label2.Click
Me.Close()
End
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Me.Hide()
Dim stc = New Checkav
stc.Show()
End Sub
Private Sub Home_Load(sender As Object, e As EventArgs) Handles MyBase.Load
End Sub
End Class