VB.net 2008 Form Application Tips

Open Visual Studio 2008 on the File menu, click New Project. In the Templates pane of the New Project dialog box, click Windows Application (Windows application). Click OK (OK)

Form Application Tip One, create a floating form.

After you create a new project, select the Form1 form and add the Timer1 and Timer2 controls. Choose a nice background for your form, and of course you can use the system default background.

Into the Code Editor, enter the code:

Public Class Form1

Inherits System.Windows.Forms.Form

Private Sub Form1_Load (ByVal sender as System.Object,

ByVal e as System.EventArgs) Handles MyBase.Load

Dim pos as points = New point (100, 50) ' Sets the initial position of the form

Me.desktoplocation = pos

Timer1.interval = 10 ' Set Timer's value

timer1.enabled = True

Timer2.interval = 10

timer2.enabled = False

End Sub

Enter Timer1_Tick Event

Private Sub Timer1_Tick (ByVal sender as System.Object, ByVal e as System.EventArgs)

Handles Timer1.tick

Dim pos as Point = New Point (me.desktoplocation.x + 2, ME.DESKTOPLOCATION.Y + 1)

' Form the top left of the horizontal axis of timer1 plus

If Pos. X < Or pos. Y < Then

Me.desktoplocation = pos

Else

timer1.enabled = False

timer2.enabled = True

End If

End Sub

Enter Timer2_tick Event

Private Sub Timer2_tick (ByVal sender as System.Object, ByVal e as System.EventArgs)

Handles Timer2.tick

Dim pos as Point = New Point (me.desktoplocation.x-2, me.desktoplocation.y-1)

' The upper-left horizontal axis of the form with Timer2 minus one

If Pos. X > Or pos. Y > Then

Me.desktoplocation = pos

Else

timer1.enabled = True

timer2.enabled = False

End If

End Sub

After the creation, we ran the program to test, the test was successful, and the program kept moving back and forth in the screen.