将文本分配给数组

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下，您可以创建   一系列Variants即时使用   Array（）函数：

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

  

但没有类似的功能   创建除。之外的数据类型数组   变种。但是，如果您使用的是VB6，   你可以用。创建String数组   Split（）函数：

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

如果是vb.net那么：

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