* Bonjour *
Avec Delphi, on peut passer une Fonction en argument d'une autre Fonction, voir exemple ci-dessous.
Peut-on faire la même chose avec VBA ?
Code delphi : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Program Fx; {$APPTYPE CONSOLE} Type TFx = function(a: Double): Double; function F1(Fx: TFx; x: Double): Double; begin F1 := Fx(x); end; function F(x: Double): Double; begin F := x*x + x + 1; end; begin Writeln(F1(F, 10.0):0:0); Readln; end.
Partager