A
Arne
hi,
I'm having a problem with the code listed below:
If I move the form, my "label-update" won't work (lblstatus.text)
anyone who can enlighten me ?
Arne
For Each fileName In files
Dim fi As New FileInfo(fileName)
info = fi.Name()
Try
m_rapi.CopyFileToDevice(fileName, txtDestination.Text & info, True)
Catch ex As Exception
MsgBox(ex.Message)
End Try
i += 1
lblStatus.Text = "Overført " & i & " af " & files.Length
Me.Update()
Next fileName
I'm having a problem with the code listed below:
If I move the form, my "label-update" won't work (lblstatus.text)
anyone who can enlighten me ?
Arne
For Each fileName In files
Dim fi As New FileInfo(fileName)
info = fi.Name()
Try
m_rapi.CopyFileToDevice(fileName, txtDestination.Text & info, True)
Catch ex As Exception
MsgBox(ex.Message)
End Try
i += 1
lblStatus.Text = "Overført " & i & " af " & files.Length
Me.Update()
Next fileName