Multiplicar un dato de un Form por uno de una tabla en ACCESS

[Taribo007]

Tambien puedes usar dlookup:

Me.kilometraje = Me.num_klm * nz(dlookup("euros_km","sala_maquinas","id=1"),0)

Con la idea de quimfv, pero con dao, tienes que activar la refrencia microsoft dao X.XX object library. La tienes (con la ventana del editor de VBA abierta) en Herramientas >> Referencias

Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("SELECT euros_km FROM sala_maquinas WHERE id=1")

Me.kilometraje = Me.num_klm * rs!euros_km

rs.Close
Set rs = Nothing

Un saludo