Solved

Add Progress bar to my Winform (VB.NET 2003)

Posted on 2010-11-16
8
971 Views
Last Modified: 2012-05-10
Hi Experts,

I have a simple Winform with a Listbox & RichTextBox. The Listbox loads RTF files from DIR into Listbox names... If I click on ListboxItem... it loads contents of that file into the RichTextBox.

Because the RFT files are located on a server, some of the files are 11mb.... & this takes time to streamread it into the RichTextBox... I would like to know how to add a progress bar to show loading progress.

Thanks,
Rob
Option Explicit On 

Imports System.IO

Imports System.Threading

Imports System.Diagnostics



Public Class Form1

    Inherits System.Windows.Forms.Form



Dim aDate As Date

Dim dateString As String



Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load



        LoadFiles()

        Try

            ' folder exists

            Dim path As String

            Dim di As System.IO.DirectoryInfo



            path = "\\server\share\folderA\"

            di = New System.IO.DirectoryInfo(path)



            If (Not di.Exists) Then

                di.Create()

            End If

        Catch ex As Exception

            MsgBox("Error code 22: The Dir doesn't exist!")

        End Try

        Label3.Text = ListBox1.Items.Count.ToString()

    End Sub



    Private Sub LoadFiles()

        Try

            Dim sourceFolder As String = "\\server\share\folderA\"

            ListBox1.BeginUpdate()

            ListBox1.Items.Clear()

            ListBox1.Items.AddRange((New System.IO.DirectoryInfo(sourceFolder)).GetFiles("*.rtf"))

            ListBox1.EndUpdate()

        Catch ex As Exception

            MsgBox("Error!")

        End Try



    End Sub



Private Sub LoadFiles()

        Try

            Dim sourceFolder As String = "\\server\share\folderA\"

            ListBox1.BeginUpdate()

            ListBox1.Items.Clear()

            ListBox1.Items.AddRange((New System.IO.DirectoryInfo(sourceFolder)).GetFiles("*.rtf"))

            ListBox1.EndUpdate()

        Catch ex As Exception

            MsgBox("Error code 45: The repository is empty!")

        End Try



    End Sub



 Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged

        

	dateString = aDate.Now.ToString("ddMMyyyy")

        Try

            If Not (ListBox1.SelectedItem Is Nothing) Then

                RichTextBox1.Rtf = CType(ListBox1.SelectedItem, System.IO.FileInfo).OpenText.ReadToEnd

            End If

            

            Dim filename As String = IO.Path.GetFileNameWithoutExtension(ListBox1.Text)

            Label1.Text = filename



        Catch ex As Exception

            MsgBox("Error!")

        End Try

     End Sub

Open in new window

0
Comment
Question by:RobertoFreemano
  • 2
  • 2
  • 2
  • +2
8 Comments
 
LVL 17

Accepted Solution

by:
Zhaolai earned 500 total points
ID: 34146989
Don't think you can use progressbar unless you load the file line by line. But you can add a busy cursor in the process, like this:

Try

            Cursor.Current = Cursors.WaitCursor

            If Not (ListBox1.SelectedItem Is Nothing) Then

                RichTextBox1.Rtf = CType(ListBox1.SelectedItem, System.IO.FileInfo).OpenText.ReadToEnd

            End If

            

            Dim filename As String = IO.Path.GetFileNameWithoutExtension(ListBox1.Text)

            Label1.Text = filename



        Catch ex As Exception

            MsgBox("Error!")

        Finally

            Cursor.Current = Cursors.Default

        End Try

Open in new window

0
 
LVL 38

Expert Comment

by:Tom Beck
ID: 34147889
Perhaps this thread can help you. I answered a similar question recently by suggesting the use of the BackgroundWorker class to accomplish the same thing. Note that a single thread cannot both download the file and update a progress bar, hence the need for one thread to handle the download and the main thread for the progress bar.

http://www.experts-exchange.com/Programming/Languages/.NET/Visual_CPP/Q_26569623.html
0
 
LVL 83

Expert Comment

by:CodeCruiser
ID: 34150471
To be able to show progress while reading a file, you need to read the file in chunks.

The other option is to use a Marquee type progressbar then you would have to load the file in a separate thread so that the UI thread can paint the progressbar.
0
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 34150815
He's working in VB.Net 2003 so the BackgroundWorker and Marquee style ProgressBar are out...   =\
0
DevOps Toolchain Recommendations

Read this Gartner Research Note and discover how your IT organization can automate and optimize DevOps processes using a toolchain architecture.

 
LVL 83

Expert Comment

by:CodeCruiser
ID: 34150888
Yeah but he can use threads and a custom progressbar.
0
 
LVL 38

Expert Comment

by:Tom Beck
ID: 34151912
@Idle_Mind,
Why do you say BackgroundWorker not an option for VS 2003? I use VS 2003 and the BackgroundWorker class.
0
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 34151947
...because it wasn't added until .Net 2.0 in VS2005:
http://msdn.microsoft.com/en-us/library/35f2fe4h.aspx
http://msdn.microsoft.com/en-us/library/t357fb32.aspx

Not sure what you're using in 2003?!...
0
 

Author Closing Comment

by:RobertoFreemano
ID: 34154621
Zhaolai,
Your "Cursor.Current = Cursors.WaitCursor" seems to work for me...

Thanks ;)
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A long time ago (May 2011), I have written an article showing you how to create a DLL using Visual Studio 2005 to be hosted in SQL Server 2005. That was valid at that time and it is still valid if you are still using these versions. You can still re…
It was really hard time for me to get the understanding of Delegates in C#. I went through many websites and articles but I found them very clumsy. After going through those sites, I noted down the points in a easy way so here I am sharing that unde…
The goal of this video is to provide viewers with basic examples to understand and use conditional statements in the C programming language.
The viewer will learn how to user default arguments when defining functions. This method of defining functions will be contrasted with the non-default-argument of defining functions.

910 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

23 Experts available now in Live!

Get 1:1 Help Now