VBA分解字符串

在VBA中，可以使用Split函数将字符串拆分成数组。Split函数需要两个参数：要拆分的字符串和分隔符。例如，下面的代码将字符串“apple,banana,orange”拆分成一个数组：

Dim str As String
Dim arr() As String

str = "apple,banana,orange"
arr = Split(str, ",")

在上面的代码中，Split函数使用逗号作为分隔符，将字符串拆分成一个名为arr的数组。现在，arr数组的元素分别为“apple”，“banana”和“orange”。

如果要将字符串拆分成多个变量，可以使用类似下面的代码：

Dim str As String
Dim arr() As String
Dim var1 As String
Dim var2 As String
Dim var3 As String

str = "apple,banana,orange"
arr = Split(str, ",")
var1 = arr(0)
var2 = arr(1)
var3 = arr(2)

在上面的代码中，Split函数将字符串拆分成一个数组，然后分配给三个变量：var1，var2和var3。现在，var1的值为“apple”，var2的值为“banana”，var3的值为“orange”。

如果要将字符串拆分成更多的变量，只需在代码中添加更多的变量即可