Dim MP3Tag As New UltraID3
MP3Tag.Read(File name gose here)
Try
Dim pics = MP3Tag.ID3v23Tag.Frames.GetFrames(MultipleInstanceFrameTypes.Picture)
picbox1.BackgroundImage = CType(pics(0), ID3PictureFrame).Picture
Catch ex As Exception
picbox1.BackgroundImage = My.Resources.Theme_icon
End Try
hope this helps