diff --git a/windows 95/2002 virus labels.vb b/windows 95/2002 virus labels.vb
index 3ea801e..ac8f8b8 100755
--- a/windows 95/2002 virus labels.vb	
+++ b/windows 95/2002 virus labels.vb	
@@ -1,7 +1,7 @@
 Public Class _2002_virus_labels
     Dim white As Boolean = True
     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
-        If white = True Then
+        If white Then
             original.ForeColor = Color.Black
             white = False
         Else
diff --git a/windows 95/Address Book.vb b/windows 95/Address Book.vb
index e5f34bc..4b4a520 100755
--- a/windows 95/Address Book.vb	
+++ b/windows 95/Address Book.vb	
@@ -9,7 +9,7 @@
     End Sub
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -19,7 +19,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -66,7 +65,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Command prompt.vb b/windows 95/Command prompt.vb
index f0cae53..c86560e 100755
--- a/windows 95/Command prompt.vb	
+++ b/windows 95/Command prompt.vb	
@@ -10,7 +10,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -20,7 +20,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -66,7 +65,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Downloader98.vb b/windows 95/Downloader98.vb
index 7f82600..3749f55 100755
--- a/windows 95/Downloader98.vb	
+++ b/windows 95/Downloader98.vb	
@@ -53,7 +53,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -63,7 +63,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -110,7 +109,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Guess The Number 98.vb b/windows 95/Guess The Number 98.vb
index 71aad64..11c0fd4 100755
--- a/windows 95/Guess The Number 98.vb	
+++ b/windows 95/Guess The Number 98.vb	
@@ -143,7 +143,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -153,7 +153,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -200,7 +199,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = windows98.desktopicons.Height - Me.Height
             mexlocation = windows98.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Guess The Number app.vb b/windows 95/Guess The Number app.vb
index 2718fc1..3ff4686 100755
--- a/windows 95/Guess The Number app.vb	
+++ b/windows 95/Guess The Number app.vb	
@@ -106,7 +106,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -116,7 +116,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -163,7 +162,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Installer95.vb b/windows 95/Installer95.vb
index e41310a..9414299 100755
--- a/windows 95/Installer95.vb	
+++ b/windows 95/Installer95.vb	
@@ -75,7 +75,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -85,7 +85,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -132,7 +131,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Installer98.vb b/windows 95/Installer98.vb
index c184fe1..c922746 100755
--- a/windows 95/Installer98.vb	
+++ b/windows 95/Installer98.vb	
@@ -76,7 +76,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -86,7 +86,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -133,7 +132,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Internet Explorer 52001.vb b/windows 95/Internet Explorer 52001.vb
index 6c72b7d..04e3ee1 100755
--- a/windows 95/Internet Explorer 52001.vb	
+++ b/windows 95/Internet Explorer 52001.vb	
@@ -243,7 +243,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -253,7 +253,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -300,7 +299,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Internetexplorer62002damaged.vb b/windows 95/Internetexplorer62002damaged.vb
index b03b4c8..cafb750 100755
--- a/windows 95/Internetexplorer62002damaged.vb	
+++ b/windows 95/Internetexplorer62002damaged.vb	
@@ -13,7 +13,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -23,7 +23,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -68,7 +67,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windowsxp2002damaged.desktopicons.Height - Me.Height
             mexlocation = Windowsxp2002damaged.desktopicons.Width - Me.Width
             mewidth = Me.Width
@@ -111,7 +110,7 @@
     End Sub
 
     Private Sub viruscountdown_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles labelflash.Tick
-        If white = True Then
+        If white Then
             original.ForeColor = Color.Black
             white = False
         Else
@@ -376,7 +375,7 @@
         If amount = 20 Then
             Title_Screen.Close()
         End If
-        amount = amount - 1
+        amount -= 1
     End Sub
 
 End Class
\ No newline at end of file
diff --git a/windows 95/Skindows 95.vb b/windows 95/Skindows 95.vb
index 5c1cdaf..3f84047 100755
--- a/windows 95/Skindows 95.vb	
+++ b/windows 95/Skindows 95.vb	
@@ -1229,7 +1229,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -1239,7 +1239,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -1286,7 +1285,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Start Runner95.vb b/windows 95/Start Runner95.vb
index dd37802..1a7600b 100755
--- a/windows 95/Start Runner95.vb	
+++ b/windows 95/Start Runner95.vb	
@@ -39,7 +39,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -49,7 +49,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -91,7 +90,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/StartRunner98.vb b/windows 95/StartRunner98.vb
index e319412..241b3b4 100755
--- a/windows 95/StartRunner98.vb	
+++ b/windows 95/StartRunner98.vb	
@@ -39,7 +39,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -49,7 +49,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -91,7 +90,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows98.desktopicons.Height - Me.Height
             mexlocation = Windows98.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Survive The Day.vb b/windows 95/Survive The Day.vb
index e9fe2ee..aca9ae6 100755
--- a/windows 95/Survive The Day.vb	
+++ b/windows 95/Survive The Day.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/Windows Xp messagebox.vb b/windows 95/Windows Xp messagebox.vb
index 941346d..c3cc893 100755
--- a/windows 95/Windows Xp messagebox.vb	
+++ b/windows 95/Windows Xp messagebox.vb	
@@ -47,7 +47,7 @@
         Timer3.Stop()
     End Sub
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -57,7 +57,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -104,7 +103,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windowsxp2002damaged.desktopicons.Height - Me.Height
             mexlocation = Windowsxp2002damaged.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/commandprompt2000.vb b/windows 95/commandprompt2000.vb
index 1487488..6220b04 100755
--- a/windows 95/commandprompt2000.vb	
+++ b/windows 95/commandprompt2000.vb	
@@ -6,7 +6,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -16,7 +16,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -63,7 +62,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/commandpromptxp.vb b/windows 95/commandpromptxp.vb
index ce770cf..c8bd50f 100755
--- a/windows 95/commandpromptxp.vb	
+++ b/windows 95/commandpromptxp.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If not maximize Then
             meylocation = Windowsxp2002damaged.desktopicons.Height - Me.Height
             mexlocation = Windowsxp2002damaged.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/downloader2000.vb b/windows 95/downloader2000.vb
index c5b8445..077234e 100755
--- a/windows 95/downloader2000.vb	
+++ b/windows 95/downloader2000.vb	
@@ -56,7 +56,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -66,7 +66,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -113,7 +112,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/downloader95.vb b/windows 95/downloader95.vb
index 4953a46..48fbfd4 100755
--- a/windows 95/downloader95.vb	
+++ b/windows 95/downloader95.vb	
@@ -53,7 +53,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -63,7 +63,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -110,7 +109,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/errorblaster2000.vb b/windows 95/errorblaster2000.vb
index d6a7c0d..7ed1d6a 100755
--- a/windows 95/errorblaster2000.vb	
+++ b/windows 95/errorblaster2000.vb	
@@ -57,7 +57,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -67,7 +67,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -114,7 +113,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/errorblaster95.vb b/windows 95/errorblaster95.vb
index a96dac0..c1f42f3 100755
--- a/windows 95/errorblaster95.vb	
+++ b/windows 95/errorblaster95.vb	
@@ -56,7 +56,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -66,7 +66,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -113,7 +112,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/errorblaster98.vb b/windows 95/errorblaster98.vb
index 5449572..1da021c 100755
--- a/windows 95/errorblaster98.vb	
+++ b/windows 95/errorblaster98.vb	
@@ -57,7 +57,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -67,7 +67,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -114,7 +113,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows98.desktopicons.Height - Me.Height
             mexlocation = Windows98.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/formDisplayproperties.vb b/windows 95/formDisplayproperties.vb
index 5deca22..b69ed51 100755
--- a/windows 95/formDisplayproperties.vb	
+++ b/windows 95/formDisplayproperties.vb	
@@ -266,7 +266,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -276,7 +276,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -323,7 +322,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/formcalculator.vb b/windows 95/formcalculator.vb
index e6741ad..5e66687 100755
--- a/windows 95/formcalculator.vb	
+++ b/windows 95/formcalculator.vb	
@@ -9,7 +9,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -19,7 +19,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -66,7 +65,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/formwindowshelp.vb b/windows 95/formwindowshelp.vb
index ca91130..a2fbc53 100755
--- a/windows 95/formwindowshelp.vb	
+++ b/windows 95/formwindowshelp.vb	
@@ -9,7 +9,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -19,7 +19,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -66,7 +65,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/guessthenumber2win2000.vb b/windows 95/guessthenumber2win2000.vb
index 16a2253..1c5ff50 100755
--- a/windows 95/guessthenumber2win2000.vb	
+++ b/windows 95/guessthenumber2win2000.vb	
@@ -143,7 +143,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -153,7 +153,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -200,7 +199,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/hwcv.vb b/windows 95/hwcv.vb
index 681bf04..7939100 100755
--- a/windows 95/hwcv.vb	
+++ b/windows 95/hwcv.vb	
@@ -22,7 +22,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -32,7 +32,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -79,7 +78,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/installer2000.vb b/windows 95/installer2000.vb
index 7b11b02..158ec2e 100755
--- a/windows 95/installer2000.vb	
+++ b/windows 95/installer2000.vb	
@@ -82,7 +82,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -92,7 +92,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -139,7 +138,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/installerxp.vb b/windows 95/installerxp.vb
index 66dbfa8..a3cf9ec 100755
--- a/windows 95/installerxp.vb	
+++ b/windows 95/installerxp.vb	
@@ -78,7 +78,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -88,7 +88,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -135,7 +134,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windowsxp2002damaged.desktopicons.Height - Me.Height
             mexlocation = Windowsxp2002damaged.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/internet explorer 4.vb b/windows 95/internet explorer 4.vb
index e6400d7..423a646 100755
--- a/windows 95/internet explorer 4.vb	
+++ b/windows 95/internet explorer 4.vb	
@@ -256,7 +256,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -266,7 +266,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -313,7 +312,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/internet explorer 5.vb b/windows 95/internet explorer 5.vb
index adcdcf8..0ba4f1e 100755
--- a/windows 95/internet explorer 5.vb	
+++ b/windows 95/internet explorer 5.vb	
@@ -255,7 +255,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -265,7 +265,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -312,7 +311,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/notepad.vb b/windows 95/notepad.vb
index 6428f7f..aae3f5b 100755
--- a/windows 95/notepad.vb	
+++ b/windows 95/notepad.vb	
@@ -14,7 +14,7 @@
 
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -24,7 +24,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -71,7 +70,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/notepad2000.vb b/windows 95/notepad2000.vb
index e1f5bc4..95b4ca8 100755
--- a/windows 95/notepad2000.vb	
+++ b/windows 95/notepad2000.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/notepadxp.vb b/windows 95/notepadxp.vb
index 8ecb241..114cdfe 100755
--- a/windows 95/notepadxp.vb	
+++ b/windows 95/notepadxp.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/paint.vb b/windows 95/paint.vb
index ac05d7b..976b178 100755
--- a/windows 95/paint.vb	
+++ b/windows 95/paint.vb	
@@ -640,7 +640,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -650,7 +650,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -697,7 +696,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/phone dialer.vb b/windows 95/phone dialer.vb
index d873e79..25f75fb 100755
--- a/windows 95/phone dialer.vb	
+++ b/windows 95/phone dialer.vb	
@@ -11,7 +11,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -21,7 +21,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -68,7 +67,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/run.vb b/windows 95/run.vb
index 44d7200..d98327f 100755
--- a/windows 95/run.vb	
+++ b/windows 95/run.vb	
@@ -9,7 +9,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -19,7 +19,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -66,7 +65,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/startrunner2000.vb b/windows 95/startrunner2000.vb
index 0e82623..7b4c3d3 100755
--- a/windows 95/startrunner2000.vb	
+++ b/windows 95/startrunner2000.vb	
@@ -39,7 +39,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -49,7 +49,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -91,7 +90,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/template2000.vb b/windows 95/template2000.vb
index 3f7912f..57ab25d 100755
--- a/windows 95/template2000.vb	
+++ b/windows 95/template2000.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/templatexp.vb b/windows 95/templatexp.vb
index cad32d9..5ef5dc2 100755
--- a/windows 95/templatexp.vb	
+++ b/windows 95/templatexp.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windowsxp2002damaged.desktopicons.Height - Me.Height
             mexlocation = Windowsxp2002damaged.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/templete95and98.vb b/windows 95/templete95and98.vb
index 5dec644..6f6ea87 100755
--- a/windows 95/templete95and98.vb	
+++ b/windows 95/templete95and98.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/templetevista.vb b/windows 95/templetevista.vb
index 00e8ac9..219b29b 100755
--- a/windows 95/templetevista.vb	
+++ b/windows 95/templetevista.vb	
@@ -5,7 +5,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -15,7 +15,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -62,7 +61,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = windowsvista.desktopicons.Height - Me.Height
             mexlocation = windowsvista.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/time distorter 0.2.vb b/windows 95/time distorter 0.2.vb
index eef5878..95eb3c3 100755
--- a/windows 95/time distorter 0.2.vb	
+++ b/windows 95/time distorter 0.2.vb	
@@ -7,7 +7,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -17,7 +17,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -63,7 +62,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/time distorter.vb b/windows 95/time distorter.vb
index 2baf566..abf181d 100755
--- a/windows 95/time distorter.vb	
+++ b/windows 95/time distorter.vb	
@@ -840,7 +840,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -850,7 +850,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -897,7 +896,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/timedistorter0.32000.vb b/windows 95/timedistorter0.32000.vb
index 0a7b379..9b19266 100755
--- a/windows 95/timedistorter0.32000.vb	
+++ b/windows 95/timedistorter0.32000.vb	
@@ -7,7 +7,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -17,7 +17,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -64,7 +63,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/timedistorter032002xp.vb b/windows 95/timedistorter032002xp.vb
index b0da4c1..d8a6c35 100755
--- a/windows 95/timedistorter032002xp.vb	
+++ b/windows 95/timedistorter032002xp.vb	
@@ -7,7 +7,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles top.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 top.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -17,7 +17,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -64,7 +63,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windowsxp2002damaged.desktopicons.Height - Me.Height
             mexlocation = Windowsxp2002damaged.desktopicons.Width - Me.Width
             mewidth = Me.Width
@@ -212,7 +211,7 @@
             countdown.Text = countdownnum
             commandpromptxp.TextBox1.Text = commandpromptxp.TextBox1.Text + ("The Hidden Hacker: Ok... you chose the year 2000." & Environment.NewLine)
         End If
-        If timergo = True Then
+        If timergo Then
             countdown.Text = countdownnum
         End If
 
diff --git a/windows 95/volume control.vb b/windows 95/volume control.vb
index 44add41..7807c38 100755
--- a/windows 95/volume control.vb	
+++ b/windows 95/volume control.vb	
@@ -14,7 +14,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -24,7 +24,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -71,7 +70,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/windows explorer.vb b/windows 95/windows explorer.vb
index 7a54e1a..d3f7eff 100755
--- a/windows 95/windows explorer.vb	
+++ b/windows 95/windows explorer.vb	
@@ -24,7 +24,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -34,7 +34,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -81,7 +80,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/windows2000messagebox.vb b/windows 95/windows2000messagebox.vb
index 22f313e..15219c7 100755
--- a/windows 95/windows2000messagebox.vb	
+++ b/windows 95/windows2000messagebox.vb	
@@ -48,7 +48,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -58,7 +58,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -105,7 +104,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows2000.desktopicons.Height - Me.Height
             mexlocation = Windows2000.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/windows95messagebox.vb b/windows 95/windows95messagebox.vb
index 47d55f3..dc03497 100755
--- a/windows 95/windows95messagebox.vb	
+++ b/windows 95/windows95messagebox.vb	
@@ -43,7 +43,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -53,7 +53,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -100,7 +99,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows95.desktopicons.Height - Me.Height
             mexlocation = Windows95.desktopicons.Width - Me.Width
             mewidth = Me.Width
diff --git a/windows 95/windows98messagebox.vb b/windows 95/windows98messagebox.vb
index b17f5ab..16d5dc5 100755
--- a/windows 95/windows98messagebox.vb	
+++ b/windows 95/windows98messagebox.vb	
@@ -48,7 +48,7 @@
     Dim maximize As Boolean
 
     Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If moveable = True Then
+        If moveable Then
             If e.Button = MouseButtons.Left Then
                 programtopbar.Capture = False
                 Const WM_NCLBUTTONDOWN As Integer = &HA1S
@@ -58,7 +58,6 @@
                         New IntPtr(HTCAPTION), IntPtr.Zero)
                 Me.DefWndProc(msg)
             End If
-        Else
         End If
     End Sub
 
@@ -105,7 +104,7 @@
     End Sub
 
     Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-        If maximize = False Then
+        If Not maximize Then
             meylocation = Windows98.desktopicons.Height - Me.Height
             mexlocation = Windows98.desktopicons.Width - Me.Width
             mewidth = Me.Width