martin2k

ForumsVB6GamesSoftwareDirectoryHTMLArticlesBlogContact

How to Scroll a Form's Title Bar Text by MUZMMAL YASEEN


 

Home

Read and add posts to the Visual Basic 6.0 Forums

Download some of my programs and OCXs

Read the Tips here

The old style forum is still available here

Contact


 

Beginner Tip

1)Take A Timer Control And Set The Interval To 150
2)Gernal Declaration Code type
3)Form load Code Type

Option Explicit
Dim
t As Integer
Dim
y As Integer
Dim
dada As String

Private Sub Form_Load()
dada = Form1.Caption
t = Len(dada)
y = 1
End Sub

Private Sub Timer1_Timer()
Form1.Caption = Mid$(dada, y, t)
y = y + 0.8
If y > t Then
    y = 1
End If
End Sub


blog comments powered by Disqus
Martin Allen 1999 - 2011.  Last updated Saturday 13 August 2011 12:12:01 AM +0100.