將此函數從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); 
    }