From 6337ebe79a71f4434e50733b9426fbacc01bf5c6 Mon Sep 17 00:00:00 2001 From: Jamie Mansfield Date: Sat, 7 Mar 2015 19:48:26 +0000 Subject: Use the 'Not' operator --- windows 95/timedistorter032002xp.vb | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'windows 95/timedistorter032002xp.vb') 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 -- cgit v1.2.3