VB 请大家看看这个表达式应该怎么做，谢谢

Question

有一串数字，如235474123365687126896345，从左边第一位开始取，当取到第二位、第四位、第六位、第八、时，
遇1则改为B-，遇2则改为D-，遇3则改为S-，遇4则改为N-，遇5则改为M-，遇6则改为P-，遇7则改为W-，遇8则改为H-，遇9则改为V-，遇0则改为U-。
当取到第一位、第三位、第五位、第柒位、时，就是原来的数。即：2S-5N-7N-1D-3S-6M-6H-7B-2P-8V-6S-4M-，呵呵，最后的“-”应该不要的,请帮忙了,谢谢

Answer 1

赞成，
先用不定长数组取需要的数，
然后用case进行判断

Answer 2

s="235474123365687126896345"for i=1 to len(s) step 2
c1=mid(s,i,1)
c2=mid(s,i+1,1)
select case c2
case  1 '遇1则改为B-，
 cc="B-"
case  2 '遇2则改为D-，
 cc="D-"case  3 '遇3则改为S-，
 cc="S-"case  4 '遇4则改为N-，
 cc="N-"case  5 '遇5则改为M-，
 cc="M-"case  6 '遇6则改为P-，
 cc="P-"case  7 '遇7则改为W-，
 cc="W-"case  8 '遇8则改为H-，
 cc="H-"case  9 '遇9则改为V-，
 cc="V-"case  0 '遇0则改为U-。
 cc="U-"end select 
ss=ss +c1 +cc
next