phpvariant数组技巧_VBA Variant数组

文章目录 [+]

Variant数组是一种包含Variant数据类型的数组。
Variant类型可以包含任意数据类型：文本，数字，日期，韶光，乃至工具。

Variant数组上风

Variant数组之以是分外，是由于他比一样平常的数组更随意马虎利用。

phpvariant数组技巧_VBA Variant数组

更随意马虎定义。
不须要关心数组里面的元素类型，由于variant可以是任何数据类型。
Variant数组可以用Array函数进行初始化。
定义Variant数组

可以通过以下代码迅速定义Variant数组。

（图片来自网络侵删）

Dim varNames()

我们可以把他当作动态Variant数组。

要把稳的是，我们不须要指天命据类型（由于所有元素默认都是Variant类型），也不须要定义数组维度。

Variant数组赋值

之条件过，Variant数组的元素可以是任意数据类型：文本，数字，日期，韶光，乃至工具。

我们可以用Array函数迅速给Variant数组赋值。

Dim varNames()varNames() = Array("Fred", "Wilma", "Barney", "Betty") '赋值

跟传统数组的赋值办法比较，Variant数组赋值办法要随意马虎很多。

' 一样平常数组的赋值办法，须要手动给每个元素赋值。写起来比较费劲。 varNames(0) = "Fred" varNames(1) = "Wilma" varNames(2) = "Barney" varNames(3) = "Betty"改变Variant数组维度

动态Variant数组可以在运行时改变维度，而不须要利用Redim或者Redim Preserve去改变维度大小，以是Variant数组很高效。

示例

Putting all this together, this procedure will populate, and repopulate a variant array:

完全代码如下，我们定义了一个Variant数组，并初始化该数组。
开始给数组赋值了4个元素，后面又重新给数组赋值两个元素，直接改变了数组大小。

Sub TestArray()'声明变量 Dim varNames() As Variant'变量初始化赋值 varNames() = Array("Fred", "Wilma", "Barney", "Betty")'返回变量值 MsgBox Join(varNames, ",")'重新赋值 varNames() = Array(400, 500)'返回新的值 MsgBox Join(varNames, ",")End Sub