VB6 - Определение строкового массива

Question

Я делаю проект, и мне нужно использовать VB6. Я борюсь с несколькими основными задачами, частично из-за (я думаю) отсутствия документации, а частично потому, что я обычно использую языки с синтаксисом на основе C.

Когда я определяю массив в C#, как правило, следующим образом:

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

Я хочу сделать это в VB6.

Но в VB6, все, что я делал это:

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

Есть ли более эффективный способ определения массива в VB6, чем пример, который я показанном выше? Способ, похожий на подход C#?

Answer 1

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

Answer 2

Если вы хотите Строки массива, в отличие от Variant массива Array() уступит;

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

Вот еще одна возможность:

Dim S() As String 

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