那位大哥帮我把这段代码转换成VBscript啊?
public static String resetpass(String spass)
{
String s_r="";
String[] ss=spass.split("-");
byte[] b=new byte[ss.length];
for(int i=0;i<ss.length;i++){
b[i]=Byte.parseByte(ss[i]);
}
for(int i=0;i<b.length;i++)
{
b[i]-=(b.length-(i+9));
}
s_r=new String(b);
return s_r;
}