Das Übergeben von Array byref bearbeitet das ursprüngliche Array nicht

Question

Ich versuche, eine Subroutine in Access 2003 zu schreiben, die alle Anführungszeichen aus Strings in einem Array entfernt. Die Subroutine entfernt die Anführungszeichen erfolgreich in der Routine selbst, aber nicht, wenn das Programm zur Übergabefunktion zurückkehrt. Ich bin sehr verwirrt, wie es ByRef getan wird.

Wie es heißt:

Call removeQuotes(wbs_numbers()) 

und das Unterprogramm selbst:

'goes through a string array and removes quotes from each element in the array' 
Sub removeQuotes(ByRef string_array() As String) 
    For Each element In string_array() 
    'chr(34) is quotation character. visual basic does not have escape characters.' 
    element = Replace$(element, Chr(34), "") 
    Next 
End Sub 

Kann jemand bitte erklären, was ich falsch mache? Ich würde dich für immer lieben!

Answer 1

Ihr Array ist möglicherweise per Referenz, aber element ist nicht. Iterieren Sie nach Index und setzen Sie den String wieder in das Array, nachdem Sie ihn manipuliert haben.

Answer 2

Sie erstellen eine neue Variable "element" und speichern sie nicht zurück in string_array, so dass sie sich nicht ändert.

Answer 3

Mein VB ist ein wenig rostig, aber eine schnelle Google-Suche tauchte so etwas wie dies oben:

Dim i As Integer 
For i = LBound(string_array) To UBound(string_array) 
    string_array(i) = Replace$(string_array(i), Chr(34), "") 
Next