Question

VB如何实现字符串奇偶位置的互换

比如FF 1F FF 1F FF 1F F1 FF如何将其转换为
1F FF 1F FF 1F FF FF F1

Answer 1

dim r as string ,a,i as integer,S as string
r="FF 1F FF 1F FF 1F F1 FF"
a=split(r," ")
for i=lbound(a) to ubound(a) step 2
S = S + a(i + 1) + " " + a(i) + " "
next i
print s