将文本分配给数组

如何为数组分配一组文本值？我没有尝试过任何工作!

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

和其他我试过不工作!

以下是关于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()函数动态创建Variants数组:

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

但是没有类似的功能来创建除Variant之外的数据类型数组.但是,如果您使用的是VB6,则可以使用Split()函数创建String数组:

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