数组位数相加的问题@.@
本帖最后由 chengjinn 于 2009-8-1 17:11 编辑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
for $s=1 to $array
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]
要如何实现.!!有没有高手教一下>!! 晕死了.刚刚自已又试了一下..没有改东西居然又可以了.`.`.`
页:
[1]