Dienstag, 16. April 2024, 16:10 UTC+2

Sie sind nicht angemeldet.

  • Anmelden
  • Registrieren

Wothan

unregistriert

1

Dienstag, 1. März 2016, 12:33

Arrays in Sub oder Function übergeben.

Hallo liebe VBSler,

bin grade an einer recht einfachen Sache am verzweifeln.

Ich habe recht einfaches Sub als bsp.


Sub kopiere_vektor(ziel(), quelle(), ndim)
For i=1 To ndim
ziel(i) = quelle(i)
Next
End Sub

Wenn ich dieses ausführe bekomme ich die Meldung
DebugInternal487 ")" erwartet

Ist es möglich in vbs Arrays als parameter zu übermitteln und wenn ja woran hackt es bei mir?

Der Sub- Aufruf sieht wie folg aus.

kopiere_vektor minimum, xneu, ndim


habe bereits

kopiere_vektor minimum(), xneu(), ndim<- Skalar



probiert aber will einfach nicht, bin dieses vorgehen aus VBA gewöhnt, aber in vbs macht es nicht so ganz mit.


Muss ich alle Arrays global definieren um die Parameterübermittlung zu umgehen ?


Grüße W.T.A. :)

Wothan

unregistriert

2

Dienstag, 1. März 2016, 13:00

Fehler glaube ich gefunden.
In der Funktions-definition

Sub kopiere_vektor(ziel(), quelle(), ndim)
For i=1 To ndim
ziel(i) = quelle(i)
Next
End Sub



Müssen die klammern entfernt werden, das Array wird automatisch übermittelt




Sub kopiere_vektor(ziel, quelle, ndim)
For i=1 To ndim
ziel(i) = quelle(i)
Next
End Sub



Grüße W.T.A.