Excel VBA: Wie übergeben Sie eine Zeichenfolge als Zeiger auf ein Verfahren, um die Zeichenfolge anzuhängen?

StackOverflow https://stackoverflow.com/questions/6045592

  •  15-11-2019
  •  | 
  •  

Frage

Ich möchte eine Zeichenfolge als In / Out-Parameter zu einem Verfahren bestehen.Ich weiß, dass dies nicht der Fall ist, dass vba normalerweise funktioniert, aber dies liegt an einem Sonderfall.Ich habe ein bereits vorhandenes Codegenerator-Tool - Generierungscode für ein Parser mit Datei-Format generieren.Und ich möchte diesen Code nicht hacken.Die generierte Syntax kann mit dem Text problemlos in VBA konvertiert werden, indem er diese nicht große Deal ersetzen (ich habe das schon getan).Es ist jedoch schwierig, Fertigungen auf Funktionen zu ändern.

Was ich herausgefunden habe, ist, wie ich eine Zeichenfolge verlängern kann, indem ich seinen Zeiger übergeben kann.Aber wie kann ich die Zeichen an die Zeichenfolge anhängen? generasacodicetagpre.

War es hilfreich?

Lösung

VBA can do this natively

Sub AppendString(byref str as string, i_what As String)
    str = str & i_what
end sub

To test

Sub Test()
    Dim s As String

    s = "Hello"

    AppendString s, " World"
    Debug.Print s
End Sub
Lizenziert unter: CC-BY-SA mit Zuschreibung
Nicht verbunden mit StackOverflow
scroll top