VB6 - Xác định một mảng chuỗi

Question

Tôi đang thực hiện một dự án và tôi cần sử dụng VB6. Tôi đang đấu tranh với một vài nhiệm vụ cơ bản, một phần do (những gì tôi nghĩ) là thiếu tài liệu, và một phần vì tôi thường sử dụng ngôn ngữ với cú pháp dựa trên C.

Khi tôi xác định một mảng trong C#, nó thường sau:

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

Tôi muốn làm điều này trong VB6.

Nhưng trong VB6, tất cả tôi đã làm điều này:

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

Có cách nào hiệu quả hơn để xác định một mảng trong VB6 hơn ví dụ tôi minh họa ở trên? Một cách tương tự như cách tiếp cận C#?

Answer 1

Dim s 
s = Array("a", "b", "c", "d") 

Answer 2

Nếu bạn muốn có một Chuỗi mảng như trái ngược với Variant mảng Array() sẽ mang lại;

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") 

Answer 3

Đây là một khả năng:

Dim S() As String 

S = Split("a|b|c|d", "|")