Come creare un checksum del testo in un modulo VBA

" . 0s " Il comando checksum viene utilizzato per calcolare l'utilizzo di un programma di " 1s " e questo è l'uso più semplice di codice binario . Quando un programma è costituito da codice binario , il checksum può tornare utile per la risoluzione dei codici . Se si sta scrivendo in codice binario attraverso il programma di Visual Basic , è possibile eseguire un checksum con poca fatica , utilizzando alcuni comandi . Istruzioni
1

Caricare il programma che si desidera eseguire il checksum per in Visual Basic
2

Digitare quanto segue nella parte superiore del codice : .

"Imports System.IOImports System.Security.Cryptography "

3 Scorrere verso il basso per il "Corpo di Classe " segmento del programma . Digitare questo codice nel corpo della classe :

"Private Shared Function getchecksum (file come stringa) come StringUsing flusso come FileStream = File.OpenRead ( file) Dim sha come SHA256Managed = New SHA256Managed ( ) Dim checksum come byte [ ,". ] = sha.ComputeHash (stream ) BitConverter.ToString Return ( checksum ) Sostituire ( " - " , String.Empty ) End Function UsingEnd "
4

Scorrere fino al fondo del programma e digitare quanto segue nella codifica:

" Dim checksumValue as String = YourClassName.GetChecksum ( " C : \\ path \\ to \\ file.ext " ) "
5

premere "Enter" per esportare il testo di checksum .

• Come convertire da THM SIS 
• Come introdurre un ritardo in un programma applicativo CircleOS