ファイルのMD5ハッシュ値を計算する

ファイルとデータ ストリームの読み取りと暗号サービスのクラスを使用します。

vbnet

Imports System.IO
Imports System.Security.Cryptography

MD5.ComputeHashメソッドにファイルの内容を入力し、結果を整形します。

vbnet

Dim md5HashAlgorithm As MD5 = MD5.Create()
Dim path As String = "filename.ext"
Using stream As Stream = File.OpenRead(path)
    Console.WriteLine(String.Concat(md5HashAlgorithm.ComputeHash(stream).Select(Function(x) String.Format("{0:X2}", x))))
End Using

結果は次のようになります。

823CC703C3D49CF68F7D3C3FE7E32FBF