Progressbar in VB 2008

sabato 14 marzo 2009 - 13.32

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

Roberto P. Profilo | Newbie

9 messaggi | Data Invio: sab 14 mar 2009 - 13:32

Premetto che ho appena iniziato ad addentrarmi nel campo della programmazione e
c'è ancora molta" nebbia".
Ho creato una piccolissima applicazione in VB 2008 expr. per aggiornare dei
file su un PC locale copiandoli da un percorso di una LAN. Ho inserito una
progressbar (tanto per ingannare l'attesa!) ma mi piacerebbe che
l'avanzamento della barra seguisse effettivamente il tempo reale
dell'operazione di copia. Come posso fare a legare le due cose?
questo è il codice che ho compilato (variando solo sorgente e destinazione
della copia):

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

FileCopy("E:\boxE\doc1.doc", "C:\boxC\doc1.doc")
Timer1.Start()

End Sub
Public Sub FileCopy(ByVal strSourcePath As String, ByVal strDestinationPath
As String)
Dim fso As Object
Dim fil As Object
fso = CreateObject("Scripting.FileSystemObject")
fil = fso.getfile(strSourcePath)
fil.Copy(strDestinationPath)
fil = Nothing
fso = Nothing
End Sub

Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Label1.Click

End Sub

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

End Sub

Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Label2.Click

End Sub

Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles ProgressBar1.Click

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
If ProgressBar1.Value = ProgressBar1.Maximum Then
End If
End Sub
End Class
________________________________
Grazie per l'eventuale aiuto.
Sensei

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !