arrays - VB - 附加到数组？

Question

这可能是一个 super 简单的问题。但是我有这个数组，我需要从中去除无用的部分。但我仍然希望它在一个数组中。

所以，当它进来时，数组看起来像这样:

ArrValues(0) "Firstname=FIRSTNAME"
ArrValues(1) "Lastname=LASTNAME"
ArrValues(2) "Username=USERNAME"
ArrValues(3) "Displayname=DISPLAYNAME"

然后我通过这个代码片段发送这个数组:

For Each s In arrValues
    s = Split(s, "=")
    s = s(1)
Next

这会剥离字符串，所以我只得到 FIRSTNAME等等。
但是，我想再次将每个清理过的字符串发送到一个数组中。我怎么做？

Answer 1

要写回数组，您需要使用 ArrValues(index) = new_value符号。因此，您需要使用常规 For循环而不是 For Each ，并通过它们的索引访问数组元素。以下是您可以这样做的方法:

For i = LBound(ArrValues) To UBound(ArrValues)
 s = ArrValues(i)
 s = Split(s, "=")
 ArrValues(i) = s(1)
Next