von komma4 » Sa, 05.09.2009 07:31
Nein, so etwas gibt es (als "öffentliche" Variable) nicht (nur intern für
ERR)
Code: Alles auswählen
Private rufendeFkt as String
Sub Main
' ... irgendwas
msgbox f1
End Sub
Function f1
rufendeFkt = "f1"
wert = f2
msgbox f2
f1 = "rückgabe"
end
Sub meine2
msgbox "aufrufende func " & rufendeFkt
End Sub
Anmerkungen:
* eine
FUNCTION ist vorgesehen, um einen Wert zurück zu geben, sonst nutze
SUB
* der Name darf nicht mit einer Ziffer beginnen
Nein, so etwas gibt es (als "öffentliche" Variable) nicht (nur intern für [color=#008000]ERR[/color])
[code]Private rufendeFkt as String
Sub Main
' ... irgendwas
msgbox f1
End Sub
Function f1
rufendeFkt = "f1"
wert = f2
msgbox f2
f1 = "rückgabe"
end
Sub meine2
msgbox "aufrufende func " & rufendeFkt
End Sub [/code]
Anmerkungen:
* eine [color=#008000]FUNCTION[/color] ist vorgesehen, um einen Wert zurück zu geben, sonst nutze [color=#008000]SUB[/color]
* der Name darf nicht mit einer Ziffer beginnen