Arrays

Is there any way in VB5 that I can set the contents of an array of strings with one line of code like with C?
for exapmle:
Array1 = ("one", "two", "three", "four")

to set Array1(0) to "one"
Array1(1) to "two"
etc...

Sure!

Code:

---

Dim test() As Variant
test = Array("jop", "hey", "how are you doing")
MsgBox test(2)

---