diff options
| author | Jamie Mansfield <[email protected]> | 2015-03-07 19:48:26 +0000 |
|---|---|---|
| committer | Jamie Mansfield <[email protected]> | 2015-03-07 19:48:26 +0000 |
| commit | 6337ebe79a71f4434e50733b9426fbacc01bf5c6 (patch) | |
| tree | 203dd32fc52cb6782fcaba5d3788b0728ddb49bb /windows 95/notepadxp.vb | |
| parent | bb6492c6085f10570ae5087b667aaaa1e8fa3d01 (diff) | |
| download | histacom-6337ebe79a71f4434e50733b9426fbacc01bf5c6.tar.gz histacom-6337ebe79a71f4434e50733b9426fbacc01bf5c6.tar.bz2 histacom-6337ebe79a71f4434e50733b9426fbacc01bf5c6.zip | |
Use the 'Not' operator
Diffstat (limited to 'windows 95/notepadxp.vb')
| -rwxr-xr-x | windows 95/notepadxp.vb | 5 |
1 files changed, 2 insertions, 3 deletions
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
|