diff options
Diffstat (limited to 'Backup/windows 95/notepad.vb')
| -rwxr-xr-x | Backup/windows 95/notepad.vb | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/Backup/windows 95/notepad.vb b/Backup/windows 95/notepad.vb deleted file mode 100755 index d1c24eb..0000000 --- a/Backup/windows 95/notepad.vb +++ /dev/null @@ -1,37 +0,0 @@ -Public Class formnotepad
-
- Private Sub closebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles closebutton.Click
- Me.Close()
- End Sub
-
- Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
- Me.Close()
- End Sub
-
- Private Sub maximizebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles maximizebutton.Click
-
- End Sub
-
- Private Sub formnotepad_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- look.Start()
- End Sub
-
- Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
- If e.Button = MouseButtons.Left Then
- programtopbar.Capture = False
-
- Const WM_NCLBUTTONDOWN As Integer = &HA1S
- Const HTCAPTION As Integer = 2
- Dim msg As Message = _
- Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _
- New IntPtr(HTCAPTION), IntPtr.Zero)
- Me.DefWndProc(msg)
- End If
- End Sub
-
- Private Sub look_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles look.Tick
- Me.programtopbar.BackColor = Windows95.exampleprogramtopbar.BackColor
- Me.programtopbar.BackgroundImage = Windows95.exampleprogramtopbar.BackgroundImage
- Me.programname.BackColor = Windows95.exampleprogramtext.BackColor
- End Sub
-End Class
\ No newline at end of file |
