how to show progress while load the text?

[sarmad]

hi

i have a rich textbox and i have to load a large text in it

i want to show the progress bar or waiting message to user

while the text loaded complete

is there any way?



so thanks

 

[JohnH]

Add a ProgressBar to your form, set it's min/max to 0/100 (for percent).
Here is some code that will read a textfile while calculating and displaying progress in percent:

Dim f As New IO.FileInfo(Application.StartupPath & "\textfile.txt")
Dim filelength As Long = f.Length
Dim sr As New IO.StreamReader(f.FullName)
Me.RichTextBox1.Text = ""
Do While sr.Peek() >= 0
  RichTextBox1.AppendText(sr.ReadLine() & vbNewLine)
  ProgressBar1.Value = RichTextBox1.TextLength * 100 \ filelength
Loop
sr.Close()
ProgressBar1.Value = 0

 

[sarmad]

thanks but

i paste the text into a another richtextbox

and load it from that to my rich text box