数组位数相加的问题@.@

chengjinn

dim $yu,$array,$s,$ss,$c,$aa
$yu=inputbox('加密测试','请输入一串任意字符')
$ss='0`1@2#3$4%5^6&7*8-9=q+w\e]rtyui[opasdfg}hjkl{zxc|vb"nm\ZX/C?V>B,NM<ASDFGHJKLPOIUYTREWQ'
$array1=stringsplit($SS,'')
$array=stringsplit($yu,'')
$s=1
$c=1
for $c=1 to $array1[0] 
for $s=1 to $array[0]
if $array[$s]=$array1[$c] then 
        $aa=$aa&$array1[$c]&$array1[$c]&$array1[$c]
        EndIf
Next
Next
MSGBOX(0,"",$aa)

以上的代码我想改成color=DarkOrange]$aa=$aa&$array1[$c+1]&$array1[$c+2]&$array1[$c+3]
[/code]要如何实现.!!有没有高手教一下>!!

chengjinn

晕死了.刚刚自已又试了一下..没有改东西居然又可以了.`.`.`