VB.NET 2010 - pasek postepu. - Article 104727 - go-pugleaf

Article View: pl.comp.lang.vbasic

Article #104727

Back to pl.comp.lang.vbasic Previous Next

VB.NET 2010 - pasek postepu.

#104727

From: Jacek
Date: Fri, 10 Dec 2010 08:36

24 lines
1550 bytes

Witajcie.

Mam funkcje a w niej:

For Each fName As String In Directory.GetFiles(sourcePath)
            If File.Exists(fName) Then
                Dim dFile As String = String.Empty
                dFile = Path.GetFileName(fName)
                Dim dFilePath As String = String.Empty
                dFilePath = DestinationPath + dFile
                File.Copy(fName, dFilePath, True)
                ProgressBar1.Value = y
                ProgressBar1.Refresh()
                y = y + x
            End If
        Next

Sprawa polega na tym, ze nie odswieza sie pasek postepu.
Robilem juz rozne cuda i nic.
Samo powyzsze kopiowanie trwa okolo 5 min, wiec przydal by sie dzialajacy
progressbar, prawda?
Jak to ugryzc?

Pozdrawiam.

Technical Details

Message-ID: <1wp0hao771gwp.mm72xd3qfyvt$.dlg@40tude.net>

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
From: Jacek <ala@ola.pl>
Newsgroups: pl.comp.lang.vbasic
Subject: VB.NET 2010 - pasek postepu.
Date: Fri, 10 Dec 2010 09:36:54 +0100
Organization: "Portal Gazeta.pl -> http://www.gazeta.pl"
Lines: 24
Message-ID: <1wp0hao771gwp.mm72xd3qfyvt$.dlg@40tude.net>
NNTP-Posting-Host: 77-253-57-159.adsl.inetia.pl
Mime-Version: 1.0
X-Trace: inews.gazeta.pl 1291970211 10485 77.253.57.159 (10 Dec 2010 08:36:51 GMT)
X-Complaints-To: usenet@agora.pl
NNTP-Posting-Date: Fri, 10 Dec 2010 08:36:51 +0000 (UTC)
X-User: sha-lom
X-Antivirus: avast! (VPS 101209-1, 2010-12-09), Outbound message
X-Antivirus-Status: Clean
User-Agent: 40tude_Dialog/2.0.15.1pl
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit