Ciao a tutti,
ho realizzato tramite questo pezzo di codice la scrittura su DB Access di alcuni record contenuti in un file CSV:
codice:
Dim diag As New Dialog1()
diag.ShowDialog()
Try
objconn.Open()
risputente = objcomm.ExecuteNonQuery()
If risputente = 1 Then
nrinserimenti = nrinserimenti + 1
Dialog1.ProgressBar1.Increment(1)
objconn.Close()
End If
Catch es As Exception
MsgBox("Errore inserimento: riga nr " & riga & vbCrLf & "SQL: " & stringasql)
objconn.Close()
End Try
ho creato la finestra di dialogo Dialog1 (contenente solo una progressbar) in questo modo:
codice:
Private Sub Dialog1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ProgressBar1.Maximum = Form1.nrarticoli
End Sub
in modo da indicare la dimensione massima della progressbar.
Il mio problema è che la progressbar non avanza... L'avanzamento degli inserimenti viene fatto dalla Form1, mentre la progressbar è nella Dialog1. Pensavo si potesse realizzare con:
codice:
Dialog1.ProgressBar1.Increment(1)
Come si può risolvere questo problema???
Grazie a tutti!!!!
Alessio