VBA:整数数组到字符串数组，便于转换

Question

我的第一个问题回答得如此之快，以至于我想我会再问一个问题! :)

这对你们来说可能真的很简单，但我似乎无法理解。
我正在尝试将一个简单的整数数组转换为一个字符串数组，因为我遇到的问题很容易交叉字符串而不是 int 数组(或者我认为!)

但这里是到目前为止的代码:

    Dim Parent1s() As String
     For i = 1 To ChromoLength.Value
      y = y + Val(MyArray(rnd2, i))
      q = Val(MyArray(rnd2, i))
      Parents1(i) = q
  Next i

 For i = 0 To ChromoLength.Value
 Parent1s(i) = Val(Parents1(i))
 Next i
'Cells(8, 1) = Parent1s

我无法让 Parent1s 生成字符串，不断收到不匹配错误
当我散列 parent1s 语句时，其他所有内容都已正确调暗，导致其余代码正常工作。

多谢你们!

Answer 1

您可以使用 CStr()将值转换为 Strings 的函数.

Sub toString()

    Dim i As Integer
    Dim iStr As String
    i = 5

    iStr = CStr(i)

    MsgBox (iStr)


End Sub

但是，我怀疑您的问题可能是因为您没有使用 Option Explicit并且遇到了变量被命名为 Parent1s 的问题以及 Parents1 .如果您打算让它们如此相似，我强烈建议使用更好的命名约定。否则，以下似乎应该有效:

For i = 0 To ChromoLength.Value
     Parent1s(i) = CStr(Parents1(i))
 Next i