Home

How To Fix Broken USB Flash Drive

2014-02-20T10:43:00.000-08:00

This tutorial shows you how to fix your broken USB flash drive :)

2013-06-15T06:43:00.002-07:00

RAPER DESIGN BLOG

http://www.internetawesomestuff.blospot.com

2012-08-03T07:21:00.000-07:00

http://www.internetawesomestuff.blogspot.com

33. Lesson - Analog Clock

2012-02-07T02:05:00.001-08:00

Public Class Form1
Dim tick As Integer = 270
Dim tick2 As Integer = 270

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label13.ForeColor = Color.DarkSlateBlue
Label1.Location = New Point(505, 203)
Label2.Location = New Point(561, 261)
Label3.Location = New Point(592, 335)
Label4.Location = New Point(561, 404)
Label5.Location = New Point(505, 464)
Label6.Location = New Point(430, 489)
Label7.Location = New Point(357, 463)
Label8.Location = New Point(305, 408)
Label9.Location = New Point(272, 334)
Label10.Location = New Point(302, 259)
Label11.Location = New Point(354, 200)
Label12.Location = New Point(430, 177)
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim seconds As Integer = (Now.Second * 6) + 270
Dim minutes As Integer = (Now.Minute * 6) + 270
Dim hours As Integer = (Now.Hour * 30) + 270
Label13.Text = Now
Dim g As Graphics
g = Me.CreateGraphics
Dim hour As New Pen(Color.Red)
Dim hour2 As New Pen(Color.White)
Dim second As New Pen(Color.Black)
Dim minute As New Pen(Color.Aquamarine)
Dim minute2 As New Pen(Color.White)
Dim white As New Pen(Color.White)
Dim circle As New Pen(Color.Black)
hour.Width = 8
hour2.Width = 10
second.Width = 1
minute.Width = 4
minute2.Width = 4
white.Width = 10
circle.Width = 5
g.DrawPie(hour2, 319, 219, 240, 240, hours - 30, 360)
g.DrawPie(minute2, 289, 189, 300, 300, minutes - 6, 360)
g.DrawPie(Pens.White, 269, 169, 340, 340, seconds - 6, 360)
g.DrawPie(hour, 319, 219, 240, 240, hours, 360)
g.DrawEllipse(white, 319, 219, 240, 240)
g.DrawPie(minute, 289, 189, 300, 300, minutes, 360)
g.DrawEllipse(white, 289, 189, 300, 300)
g.DrawPie(second, 269, 169, 340, 340, seconds, 360)
g.DrawEllipse(white, 269, 169, 340, 340)
g.DrawEllipse(circle, 249, 149, 380, 380)
End Sub

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
tick += 6
tick2 += 30
Dim g As Graphics
Dim hoursMarks As New Pen(Color.Black)
hoursMarks.Width = 5
g = Me.CreateGraphics
g.DrawPie(Pens.Black, 249, 149, 380, 380, tick, 360)
g.DrawPie(hoursMarks, 249, 149, 380, 380, tick2, 360)
g.DrawEllipse(Pens.White, 269, 169, 340, 340)
g.FillEllipse(Brushes.White, 269, 169, 340, 340)
If tick > 800 Then
Timer2.Stop()
tick = 270
tick2 = 270
End If
End Sub
End Class

Visual Basic 2010 31. Lesson - Text font

2012-02-06T03:39:00.001-08:00

Visual Basic 2010 30. Lesson - Button Round edges

2012-02-06T00:45:00.003-08:00

Visual Basic 2010 29. Lesson - Link label

2012-02-06T00:45:00.001-08:00

Visual Basic 2010 28. Lesson - Stopwatch

2012-02-06T00:44:00.003-08:00

Visual Basic 2010 27. Lesson - Progress bar

2012-02-06T00:44:00.001-08:00

Visual Basic 2010 26. Lesson - Save text file

2012-02-06T00:43:00.002-08:00

Visual Basic 2010 25. Lesson - Fade in and out

2012-02-06T00:43:00.000-08:00

Visual Basic 2010 24. Lesson - Round edges

2012-02-06T00:42:00.003-08:00

Visual Basic 2010 23. Lesson - Label Close

2012-02-06T00:42:00.001-08:00

Visual Basic 2010 22. Lesson - Password Login

2012-02-06T00:41:00.002-08:00

Visual Basic 2010 21. Lesson - Tray Icon

2012-02-06T00:41:00.000-08:00

Visual Basic 2010 20. Lesson - Click Game

2011-11-20T11:53:00.000-08:00

Visual Basic 19. Lesson - Countdown Timer

2011-11-04T11:41:00.000-07:00

Computer Tutorial 5. - Administrator Rights

2011-10-31T00:42:00.001-07:00

Computer Tutorial 4. - Best Computer Performance

2011-10-31T00:41:00.001-07:00

Computer Tutorial 3. - Enable Wireless Zero Configuration / WLAN Auto Config

2011-10-30T07:19:00.000-07:00

Computer Tutorial 2. - Invisible Folder

2011-10-30T07:18:00.000-07:00

Computer Tutorial 1. - Startup Applications

2011-10-29T04:24:00.000-07:00

Visual Basic 2008 18. Lesson - Background Music

2011-10-27T04:43:00.000-07:00

Visual Basic 2008 17. Lesson - Beep Application

2011-10-20T04:14:00.000-07:00

Visual Basic 2008 16. Lesson - Clock

2011-10-17T09:33:00.001-07:00