---

Hallo,

ich beginne gerade, mich in VBA einzuarbeiten.
Ich habe eine prinzipielle Frage:

ich rufe eine function oder eine sub auf und will von der aufgerufenen function oder sub einen Wert zurückhaben.
In Lisp wird der zuletzt ausgewertete Asdruck übergeben in VisualObjects schreibe ich am Ende
Return MyVar (wobei natürlich MyVar die Variable mit dem gewünschten Wert ist.
Wie läuft das unter VBA?

VG, Fred

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Fred,

eigentlich ganz einfach:

Eine Sub liefert keinen Rückgabewert sondern führt in der Regel eine Funktion aus. Soll ein globaler Wert geändert werden musst du den im Deklarationsabschnitt deklarieren.

Public Wert as long
Diese Variable gilt dann im ganzen Projekt

Dim Wert as long
gilt sie nur im aktuellen Modul

Eine Function liefert den Wert zurück für den sie definiert ( as ..)ist. Sowohl bei der Sub als auch bei der Funktion kannst du Parameter mit übergeben.

function MyFunction () as boolean
function MyFunction (Parameter as string,Parameter as integer) as String

Stelli

------------------
Warum lisp'eln wenn's auch anders geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Noch Zusätzlich. Den Rückgabewert setzt du so, dass zu den Functionsnamen als Variable betrachtest

z.B.: als kleiner Test, eine Function, die einfach 2 Werte addiert, und die Summe als Rückgabewert zurückgibt

Function Addiere (w1 as interger, w2 as integer) as integer
Addiere= w1 + w2
end function

verwende kannst du die Function dann so

res = Addiere (5,6)

------------------

Ing. Anton Fuchs
WWW.FFZELL.AT.TC

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke an alle!

VG, Fred

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP