”S1:CDQ2B100-40DZ
S2:CDQ2WB100-40DZ“
这样一行字符串
想筛选出
CDQ2B100-40DZ
CDQ2B100-40DZ
这两条数据应该怎么做
用两次split函数。
Dim LString As String
Dim LArray() As String
Dim RltArray() As String
LString = ”S1:CDQ2B100-40DZ S2:CDQ2WB100-40DZ“
LString = Trim(LString) //去掉首尾空格
LArray = Split(LString) //以空格分隔
MsgBox LArray(0) // S1:CDQ2B100-40DZ
MsgBox LArray(1) // S2:CDQ2WB100-40DZ
RltArray() = Split(LArray(0),":") //以:分隔
MsgBox RltArray(1) //CDQ2B100-40DZ
RltArray() = Split(LArray(1),":") //以:分隔
MsgBox RltArray(1) //CDQ2WB100-40DZ
如果对您有帮助,请采纳答案好吗,谢谢!
split分割成行,再trim