Problem bei Übergabe eines Paramarrays
28.10.2003 15:10:31
Christian
ich will eine Argumentenliste an eine Funktion übergeben. Leider klappt das ganze nicht so, wie ich es gerne hätte. Nachfolgend der VBC code.
Function ShowArglist(ParamArray SearchArray()) As Variant
Dim i As Integer
For i = 0 To UBound(SearchArray)
MsgBox SearchArray(i)
Next i
End Function
Sub main()
Dim argList As Variant
argList = Array("A", 7, 0)
ShowArglist "A", 7, 0
ShowArglist (argList)
End Sub
Das Problem:
============
Der erste Aufruf der Funktion ShowArglist mittels:
ShowArglist "A", 7, 0 klappt einwandfrei und liefert nacheinander die einzelnen Werte.
Der zweite Aufruf jedoch bricht mit einem Laufzeitfehler ab. Was mache ich falsch?
Weiss irgendjemand eine Lösung?
Danke und Gruss
Christian