Leandro Gracias por tu respuesta, mira use esta sentencia
Dim RM As Resources.ResourceManager
RM = New Resources.ResourceManager("Transporte.Resources", System.Reflection.Assembly.GetExecutingAssembly)
Asiento.Image = RM.GetObject(dt.Rows(x - 1)("Imagen_Gestion"))
y me tira el error:
"No se encontraron recursos adecuados para la referencia cultural especificada o para la referencia cultural neutra. Compruebe si "Transporte.Resources.resources" se ha incrustado o vinculado correctamente en el ensamblado "Transporte" durante el tiempo
de compilación o que todos los ensamblados satélite requeridos pueden cargarse y están completamente firmados."