Evaluate

Die Evaluate-Funktion deutet den übergebenen String als Ausdruck, der dann übersetzt und ausgeführt wird.

Syntax
Result := Evaluate(Expression)
Rückgabewert
Typ	Beschreibung
Long	Fehlercode oder 0 bei erfolgreicher Ausführung
Parameter
Verwendung	Name	Typ	Übergabe	Beschreibung
Erforderlich	Expression	String	ByVal	Ausdruck, der vom Interpreter compiliert und ausgeführt werden soll

Beispiel:

Evaluate("MsgBox(""Hallo Welt"")")

Es erscheint eine Messagebox mit dem Text „Hallo Welt“

Evaluate("Anzahl := 10")

Die Variable Anzahl erhält den Wert 10

Eine andere Möglichkeit der Evaluierung besteht über die Verwendung von Referenzvariablen:

Für dieses Beispiel wurde eine Klassenvariable „Länge“ vom Typ Double angelegt.

Dim Ref As Reference

Ref.Expression := "Länge"

If Ref.ExpressionInvalid <> 0 Then

MsgBox "Ungültiger Ausdruck."

Return

End If

Ref := 20.45

#Überprüfung

MsgBox(Länge)

Die Variable Länge enthält nun den Wert 20.45