用VB.Net自带的MD5加密

Imports System.Text
Imports
   Private End Function  ;;system.security.cryptography>

------------------------------------------

上面的那个，我试后好像会出现乱码
如果不行的话试试下的这个吧：
首先在引用里面添加一个System.Web.dll这个引用
Imports System.Web.Security
    Public Class MD5
        Public Function MD5(ByVal StrValue  As String)  As String
            MD5 = FormsAuthentication.HashPasswordForStoringInConfigFile(StrValue, "md5")
        End Function
    End Class
用的时候直接调用上面的类:S=md5("你要加密的值")