求高手帮忙看下代码

[ayxyyq]

本人反编译了一段别人的代码如下：

Public Function MD5(ByVal sMessage As String, ByVal stype As Integer) As String
' This item is obfuscated and can not be translated.
Dim str As String
Dim str2 As String
Dim num As Integer
GoTo Label_001F
Label_0002:
Select Case num
Case 0
GoTo Label_0083
Case 1
Return str2
Case 2, 4
str2 = str
num = 1
GoTo Label_0002
Case 3
If (stype <> &H20) Then
str = Strings.LCase(Strings.Mid(str, 9, &H10))
num = 4
Else
num = 0
End If
GoTo Label_0002
End Select
Label_001F:
str = FormsAuthentication.HashPasswordForStoringInConfigFile(sMessage, "MD5")
num = 3
GoTo Label_0002
If (1 <> 0) Then
End If
str = Strings.LCase(str)
num = 2
GoTo Label_0002
End Function

Public Sub domain()
HttpContext.Current.Response.Write(Me.MD5(Strings.LCase(Me.MD5((Me.MD5(("domain.com" & "domain"), &H10) & Me.MD5(Strings.StrReverse(("domain.com" & "domain")), &H20)), &H10)), &H20))
End Sub

反编译出来有很多错误，，我是做c#开发的，，vb.net不是很懂，求高人给修改下

[qdu123]

这个应该是授权算法吧，不然不会闲的蛋疼弄goto的

[蝶恋花雨]

vb.net 转C# 工具
http://www.carlosag.net/Tools/CodeTranslator/
http://blog.csdn.net/weizhiai12/article/details/6936198

public string MD5(string sMessage, int stype) {
        //  This item is obfuscated and can not be translated.
        string str;
        string str2;
        int num;
        goto Label_001F;
    Label_0002:
        switch (num) {
            case 0:
                goto Label_0083;
                break;
            case 1:
                return str2;
                break;
            case 2:
            case 4:
                str2 = str;
                num = 1;
                goto Label_0002;
                break;
            case 3:
                if ((stype != 32)) {
                    str = str.Substring(8, 16).ToLower();
                    num = 4;
                }
                else {
                    num = 0;
                }
                goto Label_0002;
                break;
        }
    Label_001F:
        str = FormsAuthentication.HashPasswordForStoringInConfigFile(sMessage, "MD5");
        num = 3;
        goto Label_0002;
        if ((1 != 0)) {
            
        }
        str = str.ToLower();
        num = 2;
        goto Label_0002;
    }
    
    public void domain() {
        HttpContext.Current.Response.Write(this.MD5(this.MD5((this.MD5(("domain.com" + "domain"), 16) + this.MD5(Strings.StrReverse(("domain.com" + "domain")), 32)), 16).ToLower(), 32));
    }