Hola!
Tengo un pequeño problema, al ejecutar el siguiente código cargo el nombres de unos archivos en una lista, para después al pulsar un botón los renombre según un texto. Lo que me pasa es que al intentar renombrarlos me dice que los archivos siguen en uso, y no sé como cerrarlos...
Código:
Private Sub btncargar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncargar.Click
Dim nombre As String
ListBox1.Items.Clear()
Try
For Each Archivo As String In My.Computer.FileSystem.GetFiles( _
txtruta.Text, _
FileIO.SearchOption.SearchAllSubDirectories, _
"*.jpg")
nombre = Archivo.ToString.Replace(txtruta.Text, "")
ListBox1.Items.Add(nombre)
Dim myImage As System.Drawing.Image = Image.FromFile(txtruta.Text & nombre)
ImageList1.Images.Add(myImage)
Next
Catch oe As Exception
MsgBox(oe.Message, MsgBoxStyle.Critical)
End Try
End Sub
A ver si me podéis ayudar, muchas gracias ^^