essaies ceci


Sub Enthalpie (ByVal X As Single)
@EssaisVariable.Enthalpie = @EssaisVariable.Enthalpie +X;
End Sub