Question

字符串怎么拆分成VBA数组？

Answer 1

答：数组的合并和字符串拆分（Join & Split）：多个字符的合并和字符串按规律的拆分是经常遇到的，如： A-REW-E-RWC-2-RWC 按分隔符-拆分成6个字符放在一个数组中 有一组数array(23,45,7,1,76)想用分隔符-连接成一个字符串 上面两种情况VBA提供了一对函数，即： split（字符串,"分隔符"）拆分字符串 join(数组,"分隔符") 用分隔连接数组的每个元成一个字符串 Sub t1() Dim arr, myst As String arr = Split(myst, "-") '按-分隔成一组数装入数组中 'MsgBox arr(0) '显示数组的第一个数(分隔后的数组最小下标为0,不是1),显示结果为A MsgBox Join(arr, ",") '再用","把数组的每个值连接成一个字符串,结果为"A,REW,E,RWC,2,RWC"