n= L en(s)
Dim a(1 to 100) as String
pos=1: k=0
For i=1 To n
ch= Mid(s,i,1)
If ch>="0" And ch <= ="9" Then
k=k+1
Else
Do While j>>=pos
a(j)=a(j-1)
j=j- 1
Loop
pos=pos+1
End If
Next i
s=““
For i=1 To n
s=s+a(i)
Next i
可供选择填入(1)(2)(3)中的代码有
①a(pos)=ch ②a(pos+k)=ch ③a(pos-1)=ch ④j=pos+k ⑤j= pos+k-1
其中正确的顺序是( )