Imports System.IOImports System.SecurityImports System.Security.CryptographyImports System.Text Public Function funcMD5()Function funcMD5(ByVal str As String) As String Return BitConverter.ToString(CType(CryptoConfig.CreateFromName("MD5"), HashAlgorithm).ComputeHash((New UnicodeEncoding).GetBytes(Trim(str)))) End Function