例如：
資料：10 00 90 03 00 35 72 30 30 30 30 30 30 30 30 30 30 30 30 09 56 23 01 00 10 10 13
最終MD5計算為：
MD5-16 : 96A6D9C2146BA87E
MD5-32 : 3BF9933796A6D9C2146BA87EB266BC69
有大神用VB.NET做過MD5值計算實體么？網上找不到相關源代碼
uj5u.com熱心網友回復：
確定是這個資料？哪些資料是byte陣列吧？算出來不對呀，我算的是 B6-4C-17-9C-C1-53-87-0E-6B-E4-6E-D5-1D-0F-D8-EE
uj5u.com熱心網友回復：
不是吧，工具是回復這個，不確定是否準確
uj5u.com熱心網友回復：
不知道你用的什么工具，md5處理只要呼叫自帶的庫即可
Public Function GetMd5() As String
Dim Data As Byte() = {10, 0, 90, 3, 0, 35, 72, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 9, 56, 23, 1, 0, 10, 10, 13}
Dim Md5 = New System.Security.Cryptography.MD5CryptoServiceProvider
Dim a = BitConverter.ToString(Md5.ComputeHash(Data))
Return a.ToString
End Function
uj5u.com熱心網友回復：
你這個值應該不是直接加密出來的吧，你用你那程式輸123456試試看加密出來是什么值，對比這里的值uj5u.com熱心網友回復：
12 34 56
MD5-16 : 49BA59ABBE56E057
MD5-32 : E10ADC3949BA59ABBE56E057F20F883E
你試下對的到么
uj5u.com熱心網友回復：
不是加密的
12 34 56
MD5-16 : 49BA59ABBE56E057
MD5-32 : E10ADC3949BA59ABBE56E057F20F883E
uj5u.com熱心網友回復：
那就是去掉空格的加密資料。。
Dim contentText = "10 00 90 03 00 35 72 30 30 30 30 30 30 30 30 30 30 30 30 09 56 23 01 00 10 10 13".Replace(" ", "")
Dim md5 = New System.Security.Cryptography.MD5CryptoServiceProvider
Dim md5_16 = BitConverter.ToString(md5.ComputeHash(Encoding.UTF8.GetBytes(contentText)), 4, 8).Replace("-", "")
Dim md5_32 = BitConverter.ToString(md5.ComputeHash(Encoding.UTF8.GetBytes(contentText))).Replace("-", "")
Console.WriteLine(md5_16)
Console.WriteLine(md5_32)
uj5u.com熱心網友回復：
還真是去空格的字串，整的和位元組陣列一樣，繞蒙了。
uj5u.com熱心網友回復：
https://www.cnblogs.com/kangjin/p/6093453.htmluj5u.com熱心網友回復：
MD5CryptoServiceProvider()
StringBuilder()
這些都是提示未定義
uj5u.com熱心網友回復：
你用的是什么？.NET Framework？還是.NET Core？版本多少？正常情況下，這兩個都是自動參考的，是命名空間沒寫完整嗎？錯誤的自動提示有讓你匯入命名空間嗎？
uj5u.com熱心網友回復：
.NET Framework 我寫的應用界面的。就提示未定義型別uj5u.com熱心網友回復：
命名空間匯入沒？截個圖吧轉載請註明出處，本文鏈接：https://www.uj5u.com/net/24510.html
標籤：VB.NET
下一篇：Messagebox隱藏