Breadcrumbs

[tvs praveen]

Hi, Now i`m gonna show how to make TypeWritter text effect

its really too simple, First you insert 1 Label, And design your Label as you wish, I mean set Label`s Font style, Color e.t.c in Properties

Then inert this code under Public Class Form1

Code: Select all

Dim WithEvents b As New System.ComponentModel.BackgroundWorker
Dim Str As String = "Super Cool Type Writer Effect"
Dim GlobalString As String

Insert this code into Form1 Load Events

Code: Select all

b.WorkerReportsProgress = True
b.RunWorkerAsync()

And insert this code below Load Events code

Code: Select all

Sub work() Handles b.DoWork
Dim s As New System.Text.StringBuilder(Str)
While True
For i = 0 To str.length - 1
globalstring = globalstring & s(i)
b.reportprogress(0)
threading.thread.sleep(100)
If globalstring.length = s.length Then globalstring = Nothing
Next
End While
End Sub
Sub rpt() Handles b.ProgressChanged
Label1.text = GlobalString
End Sub

Note: Just remove "Super Cool Type Writer Effect" text in under Public Class Form1 code and insert your text whatever you wish!


*******************Thanks for reading my tutorial, I think this Tutorial will be most helpful to you!*******************

If you want any custom tutorial for you or you need any help in VS.NET, VB.NET, Software Coding, Designing and much more any help in Computer stuffs just ask me

Mostly i will help everyone in coding and design stuffs in on Computer

- Best regards hehaho;

- Tvs Praveen wahooo;

- Thanks CodeNStuff! for this amazing Website cooll;

[Nery]

Very nice Label effect, good job.

[tvs praveen]

Very nice Label effect, good job.

Thanks Nery

[Lewis]

Nice code

[tvs praveen]

Nice code

Thanks

[Lewis]

No Problem