Jump to content

View in the app

A better way to browse. Learn more.

Tuts 4 You

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS

Tap the Share icon in Safari
Scroll the menu and tap Add to Home Screen.
Tap Add in the top-right corner.

To install this app on Android

Tap the 3-dot menu (⋮) in the top-right corner of the browser.
Tap Add to Home screen or Install app.
Confirm by tapping Install.

Tuts 4 You A Reverse Engineering Community

Existing user? Sign In
Sign In

Email Address

Password

Remember me
Not recommended on shared computers

Forgot your password?
Sign Up

Moving text effect

Followers

Posted June 9, 200817 yr

Sometimes keygens and websites use that feature, in a program you got a textbox and the text like moves to the left and it deletes a character everytime, but then the text reappears from the other side, thats where im stuck..

i can make it disappear to the left but i have no idea how to make it reappear again...

that's the code i wrote so far

Public back As StringPrivate Sub Command1_Click()	If (Timer1.Enabled = True) Then	Timer1.Enabled = False
	Else
	Timer1.Enabled = True	End If
End SubPrivate Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 80
End SubPrivate Sub Timer1_Timer()	If (LenB(Text1.Text) <> 0) Then	back = Text1.Text
	back = Mid$(back, 2, Len(Text1.Text))
	Text1.Text = back	Else
	End
	End If
End Sub

any suggestions how it should be done?