Cómo crear una suma de comprobación del texto en un módulo de VBA

. " 0s " El comando de la suma de comprobación se utiliza para calcular el uso de un programa de " 1s " y este es el uso más básico de código binario. Cuando un programa se compone de código binario, la suma de control puede ser útil para solucionar problemas de los códigos. Si va a escribir en código binario a través del programa de Visual Basic, puede ejecutar una comprobación con poca molestia con unos pocos comandos . Instrucciones
1

carga el programa que desea ejecutar la suma de control en Visual Basic
2

Escriba el siguiente en la parte superior del código : .
< p > " Importaciones System.IOImports System.Security.Cryptography "
3

Desplácese hasta la "Clase Body" segmento de su programa. Escriba este código en el cuerpo de la clase :

"Private Shared Function GetChecksum ( archivo como String) como StringUsing corriente como FileStream = File.OpenRead (archivo) Dim sha como SHA256Managed = New SHA256Managed () Dim checksum como byte [ ,". ] = sha.ComputeHash ( stream) BitConverter.ToString retorno ( checksum) Reemplazar ("- " , String.Empty ) End Function UsingEnd "
4

Desplácese hasta la parte inferior del programa y escriba lo siguiente en el código :

" checksumValue dévil como secuencia = YourClassName.GetChecksum (" C: \\ path \\ to \\ archivo.ext ") "
5

Pulse el botón " Enter" para exportar el texto checksum .