[高分求助]帮忙转下代码(ASP(VBSCRIPT) TO C#)谢谢~!

function mistake(preString)
      Dim texts
      Dim seed
      Dim i,length
      prestring = trim(preString)
      length = len(preString)
      seed = length
      Randomize(length)
      texts = ""
      for i = 1 to length
            seed = int(94*rnd(-asc(mid(preString,i,1))-seed*asc(right(prestring,1)))+32)
            texts = texts & chr(seed) & chr(int(94*rnd(-seed)+32))
      next
dim dist
dist=""
for i = 1 to len(texts)
  if mid(texts,i,1) <>"'"  then
      dist=dist+mid(texts,i,1)
      end if
    next
    mistake = dist
end function

---

在线等啊!~!~!~!~!~!~!~!~  来人啊!~!~!~!~

---

啊啊啊啊啊啊啊啊啊

---

我倒!~

---

C# code:
public String mistake(string preString)
{
int i;
preString = preString.Trim();
int length = preString.Length;
int seed = length;
VBMath.Randomize(length);