VB6 - Definition ein String-Array

Ich mache ein Projekt, und ich VB6.
Ich habe Mühe mit ein paar grundlegende Aufgaben, teilweise wegen der (was ich denke), ist ein Mangel an Dokumentation, und teilweise, weil ich in der Regel verwenden Sie Sprachen, die mit C-basierten syntax.

Wenn ich definiere ein array in C# ist es in der Regel folgt:

string[] s = {"a", "b", "c", "d" };

Ich möchte das in VB6.

Aber in VB6 habe ich dies mache:

Dim s(0 To 3) As String
s(0) = "a"
s(1) = "b"
s(2) = "c"
s(3) = "d"

Gibt es eine effizientere Art und Weise zu definieren, die ein array in VB6 als das Beispiel, das ich oben dargestellt? Ähnlich wie der C# Ansatz?

InformationsquelleAutor Loren Kuich | 2013-07-03
  1. 11
    Dim s
s = Array("a", "b", "c", "d")
    • Einfach, überraschend, ich konnte nicht finden, dass überall, haha. Danke!
    • Es sollte betont werden, dass dies ein array von Varianten nicht "Strings"
    InformationsquelleAutor Anderson
  2. 9

    Hier eine andere Möglichkeit:

    Dim S() As String

S = Split("a|b|c|d", "|")
    • Dies ist nicht erstaunlich effizient. Die Split () - Funktion liefert einen Variant mit einem array von String, und dann kopiert es die gesamte array in ein neues array von Strings.
    • Ist es nicht eine unglaublich schlechte Darsteller. Wenn Sie neu erstellen zu müssen das array, in einer engen Schleife können Sie ein array erstellen, die diese Weise außerhalb der Schleife und dann kopieren Sie es in ein zweites array-variable innerhalb der Schleife für jede iteration.
    InformationsquelleAutor Bob77
  3. 8

    Wenn Sie möchten, eine String Arrays im Gegensatz zu der Variante array Array() Ausbeute;

    Function ArrayString(ParamArray tokens()) As String()
    ReDim arr(UBound(tokens)) As String
    Dim i As Long
    For i = 0 To UBound(tokens)
        arr(i) = tokens(i)
    Next
    ArrayString = arr
End Function

...

Dim a() As String
a = ArrayString("foo", "bar", ..., "qux")
    InformationsquelleAutor Alex K.
Schreibe einen Kommentar