-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathDevMenu.vb
More file actions
42 lines (27 loc) · 1.26 KB
/
DevMenu.vb
File metadata and controls
42 lines (27 loc) · 1.26 KB
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
Imports System.Windows.Forms
Public Class DevMenu
Private Sub DevMenu_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.Location = New Point(Form1.Left + Form1.Width, Form1.Top)
WindowLocationTimer.Start()
End Sub
Private Sub DevMenu_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
WindowLocationTimer.Stop()
End Sub
Private Sub WindowLocationTimer_Tick(sender As Object, e As EventArgs) Handles WindowLocationTimer.Tick
Me.Location = New Point(Form1.Left + Form1.Width, Form1.Top)
End Sub
' DEV BUTTONS '
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' Run FirstRun Button In Dev Menu
FirstRun.Show()
End Sub
Private Sub TestButton1_Click(sender As Object, e As EventArgs) Handles TestButton1.Click
End Sub
Private Sub TestButton2_Click(sender As Object, e As EventArgs) Handles TestButton2.Click
End Sub
Private Sub TestButton3_Click(sender As Object, e As EventArgs) Handles TestButton3.Click
End Sub
Private Sub TestButtonUpdateAvailable_Click(sender As Object, e As EventArgs) Handles TestButtonUpdateAvailable.Click
UpdateAvailable.Show()
End Sub
End Class