Come creare un checksum del testo in un modulo VBA

February 9

Il comando checksum viene utilizzato per calcolare l'uso di un programma di "1s" e "0s". Questa è l'uso più semplice di codice binario. Quando un programma è costituito da codice binario, il checksum può rivelarsi utile per la risoluzione dei problemi 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.

istruzione

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.IO
Le importazioni System.Security.Cryptography "

3 Scorrere verso il basso per il segmento "Classe corpo" del vostro programma. Digita il codice nel corpo della classe:

"Funzione comune GetChecksum (file as String) Privato as String
Utilizzando flusso come FileStream = File.OpenRead (file)
sha Dim come SHA256Managed = Nuovo SHA256Managed ()
checksum Dim come byte [] = sha.ComputeHash (stream)
Return BitConverter.ToString (checksum) .Rimontare ( "-", String.Empty)
Fine Utilizzando
End Function "

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

"Dim checksumValue as String = YourClassName.GetChecksum (" C: \ percorso \ a \ file.ext ")"

5 Premere il tasto "Enter" per esportare il testo checksum.