将文本分配给数组

Question

如何将一组文本值分配给数组？我试过的东西没有用！

Months = Array("Jan", "Feb", ..., "Dec") 

和其他我试过了不行！

Answer 1

下面是一些关于VB：http://www.devx.com/vb2themax/Tip/18322

Visual Basic不提供任何 声明数组，同时初始化其 元素。在大多数 情况下，你最终，设置 各个元素逐一为：

Dim strArray(0 To 3) As String 
    strArray(0) = "Spring" 
    strArray(1) = "Summer" 
    strArray(2) = "Fall" 
    strArray(3) = "Winter" 

在VB4，VB5和VB6可以动态创建 变量数组，使用 的Array（）函数：

Dim varArray() As Variant 
    varArray() = Array("Spring", "Summer", "Fall", "Winter") 

但目前还没有类似的乐趣到 创建除 Variant之外的其他数据类型的数组。

Dim varArray() As String 
    ' arrays returned by Split are always zero-based 
    varArray() = Split("Spring;Summer;Fall;Winter", ";") 

Answer 2

我敢肯定，你只能做这样的：

dim months(2) as string 

months(0) = "Jan" 
months(1) = "Feb" 
months(2) = "Mar" 

Answer 3

如果你谈论的VBScript那么这个工程：

months = Array("may","june","july") 

如果您使用VB6，但是， 可以使用 斯普利特（）函数创建的字符串数组如果是vb.net，则：

dim months() as string = {"may","june","july"}