如何使用函数vb6拆分两个堆叠数？

Question

如何在vb 6.0中拆分？ Image Attached

我正在使用，

Dim root2() As String
root2 = Split(root(1), " ")
MsgBox root2(0)
MsgBox root2(1)

但这没有任何回报。

Answer 1

有几个原因它没有返回任何东西。首先，您使用的是动态数组，必须使用ReDim命令重新指定它才能向其中添加元素。你还没有这样做。其次，您没有为字符串变量赋值。试试这个：

Dim root2(2) As String
root2(0) = "Hello World"
root2(2) = Split(root2(0), " ")
MsgBox root2(0)
MsgBox root2(1)

那会给你一些东西。看看你是否可以从那里解决剩下的问题。您可以查看ReDim here。