将此函数从VB转换为c＃

Question

我一直在撞墙，试图将这个经典的asp（vb）转换为asp.net c＃而没有运气。

Function Decrypt1(s) 
    if isnull(s) then 
    Decrypt1 = "" 
    else 
    Dim r, i, ch 
    For i = 1 To Len(s)/2 
     ch = "&H" & Mid(s, (i-1)*2+1, 2) 
     ch = ch Xor 111 
     r = r & Chr(ch) 
    Next 
    Decrypt1 = strReverse(r) 
    end if 
End Function 

任何接受者？

提前致谢！

编辑 - “0B031D00180003030A07” 应该解密为 “HelloWorld” 的

Answer 1

更新

下面是用于解密你的字符串你的c-锐方法：

public static string Decrypt1(string s) 
    { 
     string functionReturnValue = null; 
     if (string.IsNullOrEmpty(s)) 
     { 
      functionReturnValue = ""; 
     } 
     else 
     { 
      string r = null; 
      int ch = null; 

      for (int i = 0; i < s.Length/2; i++) 
      { 
       ch = int.Parse(s.Substring((i) * 2, 2), NumberStyles.AllowHexSpecifier); 
       ch = ch^111; 
       r = r + (char)(ch); 
      } 

      var charArray = r.ToCharArray(); 
      Array.Reverse(charArray); 
      functionReturnValue = new string(charArray); 
     } 
     return functionReturnValue; 
    } 

Try it on Net Fiddle

Answer 2

你可以尝试在线转换器。

这里是其中的一个：http://converter.telerik.com/

Answer 3

这一个能与您的HelloWorld示例：

public static string Decrypt1(string s) 
    { 
     if (string.IsNullOrEmpty(s)) 
      return string.Empty; 

     string r = null; 
     for (int i = 1; i <= s.Length/2; i++) 
     { 
      var ch = Convert.ToUInt32(s.Substring((i - 1) * 2, 2), 16); 
      ch = ch^111; 
      r = r + (char)(ch); 
     } 

     var charArray = r.ToCharArray(); 
     Array.Reverse(charArray); 

     return new string(charArray); 
    }