Putting marquee in vb.net

'Class-level variables.
Private m_intMarqueeCounter As Integer = 1
Private m_bolMarqueeIncrementUp As Boolean = True

Private Sub YourMarqueeTimer_Tick()

   'You can decide what number is best for your app.
   If m_intMarqueeCounter = 10 Then

      m_bolMarqueeIncrementUp = False

   End If

   If m_intMarqueeCounter = 0 Then

      m_bolMarqueeIncrementUp = True

   End If

   Dim intX As Integer
   For intX = 0 to m_intMarqueeCounter

      frmYourForm.Text = " " & "Your Title"

   Next

   If m_bolMarqueeIncrementUp Then

      m_intMarqueeCounter += 1

   Else

      m_intMarqueeCounter -= 1

   End If

End Sub

Source: stackoverflow.com

Similar codes

0 vote338 views1 answer
Excel vba Column Name from Column Number
VBA
0 vote303 views1 answer
Vbnet check if number is even or odd
VBA
0 vote320 views1 answer
Send text to clipboard vb.net
VBA
0 vote337 views1 answer
Tester si une case est vide vba
VBA
0 vote304 views1 answer
Vba verticalalignment
VBA
11 votes446 views1 answer
Excel vba How to URL encode a string
VBA
0 vote333 views1 answer
Vba random number
VBA
0 vote324 views1 answer
Excel vba prevent saving workbook
VBA
0 vote319 views1 answer
Vba sort the data Z to A
VBA
0 vote310 views1 answer
Convert unix to date vba
VBA