From bb6492c6085f10570ae5087b667aaaa1e8fa3d01 Mon Sep 17 00:00:00 2001 From: Jamie Mansfield Date: Sat, 7 Mar 2015 19:10:16 +0000 Subject: Make .gitignore work. Fixes #15 Thanks to @kenzierocks and http://stackoverflow.com/questions/19663093/apply-gitignore-on-an-existing-repository-already-tracking-large-number-of-files --- Backup/windows 95/hwcv.vb | 43 ------------------------------------------- 1 file changed, 43 deletions(-) delete mode 100755 Backup/windows 95/hwcv.vb (limited to 'Backup/windows 95/hwcv.vb') diff --git a/Backup/windows 95/hwcv.vb b/Backup/windows 95/hwcv.vb deleted file mode 100755 index 1e4cc5b..0000000 --- a/Backup/windows 95/hwcv.vb +++ /dev/null @@ -1,43 +0,0 @@ -Public Class hwcv - Private Sub closebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles closebutton.Click - Me.Close() - 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 run_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load - look.Start() - Label3.Hide() - TextBox2.Focus() - 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 - - Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click - If TextBox2.Text = "www.12padams.com" Then - Label3.Show() - Label3.Text = "Hidden Content Found: Time Distorter" - close_everything_.timesoftware = "yes" - Else - Label3.Show() - Label3.Text = "No Content Found" - End If - End Sub - -End Class \ No newline at end of file -- cgit v1.2.3