Código
Este código puede ser muy útil, lo comparto con todo el que lo necesite
' Para que este código funcione "tal cual está" necesitas: ' Form1 y dentro TextBox1 (multilínea activado) Imports System.IO Imports System.Text Imports System.Security.Cryptography Public Class Form1 Protected Function MD5Checksum(ByVal fileName As String) As String Dim md5 As MD5 = New MD5CryptoServiceProvider() Dim sb As New StringBuilder() For i As Integer = 0 To retVal.Length - 1 sb.Append(retVal(i).ToString("x2")) Next Return sb.ToString() End Function Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Text = MD5Checksum("C:\imagen1.jpg").ToString + vbCrLf + MD5Checksum("C:\imagen1 - copia.jpg").ToString End Sub End Class
Si alguien sabe hacer lo que pido, por favor que avise, he probado a poner la ruta de un proceso .exe que se esté ejecutando, y da error, si alguien sabe cómo hacerlo sin cerrar dicho proceso, se los agradezco.
saludos.