Forgot something

z1g Project Hub Universal/Form3.vb

@@ -438,12 +438,12 @@ Public Class Form3
         Label2.Text = getuser.ReadToEnd
     End Sub
 
-    Private Sub Button4_Click(sender As Object, e As EventArgs) 
+    Private Sub Button4_Click(sender As Object, e As EventArgs)
         Form2.Show()
         Panel6.Visible = False
     End Sub
 
-    Private Sub Button1_Click(sender As Object, e As EventArgs) 
+    Private Sub Button1_Click(sender As Object, e As EventArgs)
         Dim getpassword As New System.IO.StreamReader(My.Settings.savelocation + "password.dat")
         TextBox2.Text = getpassword.ReadToEnd
 
@@ -471,7 +471,7 @@ Public Class Form3
 
     End Sub
 
-    Private Sub Button6_Click(sender As Object, e As EventArgs) 
+    Private Sub Button6_Click(sender As Object, e As EventArgs)
         Button6.Enabled = False
         Label43.Text = My.Computer.Name
 
@@ -492,7 +492,7 @@ Public Class Form3
         Button6.Enabled = True
     End Sub
 
-    Private Async Sub Button7_Click(sender As Object, e As EventArgs) 
+    Private Async Sub Button7_Click(sender As Object, e As EventArgs)
         Try
             Button7.Enabled = False
             Using client As New HttpClient()
@@ -830,10 +830,12 @@ Public Class Form3
         If My.Computer.FileSystem.FileExists("C:\z1g Apps\Blurreds Vault\Blurred's Vault.exe") Then
             Process.Start("C:\z1g Apps\Blurreds Vault\Blurred's Vault.exe")
         Else
+            Me.Cursor = Cursors.WaitCursor
             My.Computer.Network.DownloadFile("https://cdn.z1g-project.repl.co/z1g-hub/client/blurreds-vault.zip", "C:\z1g Apps\Blurreds Vault\blurreds-vault.zip")
             ZipFile.ExtractToDirectory("C:\z1g Apps\Blurreds Vault\blurreds-vault.zip", "C:\Users\Public\Blurreds Vault\")
             System.IO.Directory.CreateDirectory("C:\Users\Public\Blurreds Vault\")
             Process.Start("C:\z1g Apps\Blurreds Vault\Blurred's Vault.exe")
+            Me.Cursor = Cursors.Default
         End If
     End Sub
 
@@ -842,10 +844,12 @@ Public Class Form3
         If My.Computer.FileSystem.FileExists("C:\z1g Apps\Blurreds Vault\Blurred's Vault.exe") Then
             Process.Start("C:\z1g Apps\Blurreds Vault\Blurred's Vault.exe")
         Else
+            Me.Cursor = Cursors.WaitCursor
             My.Computer.Network.DownloadFile("https://cdn.z1g-project.repl.co/z1g-hub/client/blurreds-vault.zip", "C:\z1g Apps\Blurreds Vault\blurreds-vault.zip")
             ZipFile.ExtractToDirectory("C:\z1g Apps\Blurreds Vault\blurreds-vault.zip", "C:\Users\Public\Blurreds Vault\")
             System.IO.Directory.CreateDirectory("C:\Users\Public\Blurreds Vault\")
             Process.Start("C:\z1g Apps\Blurreds Vault\Blurred's Vault.exe")
+            Me.Cursor = Cursors.Default
         End If
     End Sub