vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Array als Funktionsparameter 
Autor: Micha
Datum: 29.04.02 12:01

Hallo Leute,

ich habe ein Problem bei der Übergabe eines Array (Datenfeldes) an eine Funktion.
Das Array wurde in einer Funktion private deklariert:
In einer weiteren Funktion (ModArray) wird das Array neu sortiert (leere Elemente entfernt) und in der Größe angepaßt.
Allerdings scheint die Übergabe immer als ByVal zu erfolgen und nicht als ByRef, da nach der Ausführung der ModArray Funktion
das Datenfeld MyArray noch immer die alten Werte hat.

Kann mir jemand sagen, was ich hier falsch mache?

private Sub Fkt_1( )
Dim MyArray as Variant

MyArray=Fuellarray( )
ModArray( MyArray )

' Hier hat MyArray noch immer den alten Inhalt!!!

End Sub

' Hilfsfunktion zum Füllen des Datenfeldes
public Function FuellArray( ) as Variant
Dim hlpArray as String
Redim hlpArray(10)
Fuellarray=hlpArray
End Function

'Funktion zum Verändern des Datenfeldes, Übergabe sollte byReference erfolgen...
private sub ModArray( ByRef arName as Variant )
arName(1)=arName(2)
arName(2)=""
Redim preserve arName(UBound(arName) -1 )
end sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Array als Funktionsparameter49Micha29.04.02 12:01
Re: Array als Funktionsparameter269ModeratorDieter29.04.02 12:13
Re: Array als Funktionsparameter27Micha29.04.02 13:02
Re: Array als Funktionsparameter33Micha29.04.02 15:11

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel