如何将一组文本值分配给字符串数组？

Question

我该如何将一组文本值分配给数组？我尝试的所有方法都不起作用！

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

其他我尝试过的都不起作用！

- Chris Gunner

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()函数临时创建一个Variant数组：

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

但是没有类似的功能可以创建除Variant之外的数据类型数组。然而，如果您使用的是VB6，您可以使用Split()函数创建字符串数组：

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

- Stephen Pape

Answer 2

我相信你只能这样做：

 dim months(2) as string

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

- Mark Biek

---

尽可能地使用集合是非常烦人的。 - Mark Biek

Answer 3

如果你在谈论VBScript，那么这个代码可以实现：

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

如果是vb.net的话：

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

- Seth Reno