gracias ericon, era eso
Código:
MyOledbCommand.CommandText = "Update files Set " _
& "author='" & String1 & "', " _
& "source='" & String2 & "', " _
& "tags='" & String3 & "'" _
& "WHERE ID = " & Me.lstEditDatabase.SelectedItems(0).SubItems.Item(0).Text
Gracias de todas formas a todos