Marquee in VB.Net


 

Download source

y1pV9Hx_0SqkTiOC9Ah_c9zaJpmWNTK34Kz2r4JvBANsqLeA3NY5eyBlQrQiXi78WBp 

Code:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       
Me.Timer1.Enabled = True
   
End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       
‘//เลื่อนไปทางซ้าย
       
”If Me.Label1.Left <= 1 Then
       
”    Me.Label1.Left = Form1.ActiveForm.Width – 5
       
”Else
       
”    Me.Label1.Left = Me.Label1.Left – 5
       
”End If

       
‘//เลื่อนขึ้น
        If Me.Label1.Top <= 1 Then

           
Me.Label1.Top = Form1.ActiveForm.Height  5
       
Else
           
Me.Label1.Top = Me.Label1.Top  5
       
End If
   
End Sub
End Class

Download Source


เกี่ยวกับ

Nuchit Atjanawat is a Microsoft MVP, GreatFriends Community Leader, WindowsITPro Columnist(Mr.Nano), Silverlight Business Application Instructor, Speaker in various Microsoft events, Author, passionate Blogger and a Software Engineer by profession. He has a very good skill over Silverlight, LightSwitch, C#, XAML & Blend. He shares his technical findings, tutorials in his technical blog. Follow his Blog and Facebook page to be updated on latest articles. - Technical Blog: https://janawat.wordpress.com - WindowsITPro Columnist(Mr.Nano): http://windowsitpro.net - The GreatFriends.Biz Community Discussion Board (nano): http://greatfriends.biz - witter: https://twitter.com/janawat - Facebook Page: https://www.facebook.com/nuchit - Instructor: http://bit.ly/GF250-01, http://bit.ly/GF150-02

เขียนใน Windows Application

ใส่ความเห็น

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / เปลี่ยนแปลง )

Twitter picture

You are commenting using your Twitter account. Log Out / เปลี่ยนแปลง )

Facebook photo

You are commenting using your Facebook account. Log Out / เปลี่ยนแปลง )

Google+ photo

You are commenting using your Google+ account. Log Out / เปลี่ยนแปลง )

Connecting to %s

In Archive
%d bloggers like this: