Sliding text but not sliding label or textbox

[Ali Rizwan]

Hi
I want to slide my text as in news but not wanna slide my label or textbox control.

[hariharanmca]

Hi
I want to slide my text as in news but not wanna slide my label or textbox control.

Use
1. timer Control

[CODE=VB]Dim strActualValue As String
Private Sub Form_Load()
strActualValue = "12345678901234 567890123456789 0"
End Sub

Private Sub Timer1_Timer()
lblName.Caption = Mid(strActualVa lue, InStr(1, strActualValue, Trim(lblName.Ca ption)) + 1, 5)
End Sub[/CODE]

[QVeen72]

Hi,

Add a Label On the Form and Rename it as LStat
Add a Timer Control and Set Interval =2000 (2 seconds) and write this code in Timer1_Timer Event :
Declare a FormLevel Variable at the top of the Form :

Dim TPos As Integer

[code=vb]
Dim mystr As String
mystr = "Wow !! Look, This Text Is Sliding.."
If TPos = 0 Or TPos > Len(mystr) Then TPos = 1
LStat.Caption = Mid(mystr, TPos)
TPos = TPos + 1
[/code]


Regards
Veena

[hariharanmca]

Hi,

Add a Label On the Form and Rename it as LStat
Add a Timer Control and Set Interval =2000 (2 seconds) and write this code in Timer1_Timer Event :
Declare a FormLevel Variable at the top of the Form :

Dim TPos As Integer

[code=vb]
Dim mystr As String
mystr = "Wow !! Look, This Text Is Sliding.."
If TPos = 0 Or TPos > Len(mystr) Then TPos = 1
LStat.Caption = Mid(mystr, TPos)
TPos = TPos + 1
[/code]


Regards
Veena

He/She is looking for Moving text like Marquee Text in HTML.


[CODE=vb]Private Sub Timer1_Timer()
lblName.Caption = Mid(strActualVa lue, InStr(1, strActualValue, Trim(lblName.Ca ption)) + 1, 5)
End Sub[/CODE]

This will help him

[QVeen72]

He/She is looking for Moving text like Marquee Text in HTML.


[CODE=vb]Private Sub Timer1_Timer()
lblName.Caption = Mid(strActualVa lue, InStr(1, strActualValue, Trim(lblName.Ca ption)) + 1, 5)
End Sub[/CODE]

This will help him

Hi,

Even My Code was for that only, I told him to change the Label Name to "LStat"
Read my post completely..

REgards
Veena

[hariharanmca]

Hi,

Even My Code was for that only, I told him to change the Label Name to "LStat"
Read my post completely..

REgards
Veena

Yes, But you never mension the method is in timer (Ther we can contron the speed in intervel).

[QVeen72]

Yes, But you never mension the method is in timer (Ther we can contron the speed in intervel).

Check this :

Add a Timer Control and Set Interval =2000 (2 seconds) and write this code in [B]Timer1_Timer Event [/B] :

REgards
Veena

[hariharanmca]

Check this :

Add a Timer Control and Set Interval =2000 (2 seconds) and write this code in [B]Timer1_Timer Event [/B] :

REgards
Veena

Hoh...No.Sorry, I didn't read your Post properly. Its okay.

[Ali Rizwan]

Thanks to all who answer my questions