Πώς να δημιουργήσετε ένα άθροισμα του κειμένου σε μια μονάδα VBA

" . 0s " Η εντολή του αθροίσματος ελέγχου χρησιμοποιείται για τον υπολογισμό χρήση ενός προγράμματος της " 1s " Αυτή είναι και η πιο βασική χρήση του δυαδικού κώδικα . Όταν ένα πρόγραμμα αποτελείται από δυαδικό κώδικα , το άθροισμα ελέγχου μπορεί να έρθει σε βολικό για την αντιμετώπιση των κωδικών . Αν γράφετε σε δυαδικό κώδικα μέσω του προγράμματος Visual Basic , μπορείτε να εκτελέσετε μια checksum με λίγη ταλαιπωρία , χρησιμοποιώντας μερικές εντολές . Οδηγίες
Η

1 Φορτώστε το πρόγραμμα που θέλετε να εκτελέσετε το άθροισμα ελέγχου στο Visual Basic 2

Πληκτρολογήστε τα ακόλουθα στην κορυφή του κώδικα : .

"Οι εισαγωγές System.IOImports System.Security.Cryptography "
εικόνων 3

Μετακινηθείτε προς τα κάτω στο " Class Body " τμήμα του προγράμματός σας . Πληκτρολογήστε αυτόν τον κώδικα στο σώμα τάξη :

" Private Shared GetChecksum Λειτουργία ( αρχείο ως String ) ως StringUsing ρεύμα καθώς FileStream = File.OpenRead ( αρχείο ) Dim sha ως SHA256Managed = Νέα SHA256Managed ( ) Dim άθροισμα ελέγχου ως byte [ ,"Pli̱ktrologí̱ste af̱tón ton kó̱dika sto só̱ma táxi̱ :̱

" Private Shared GetChecksum Leitourgía ( archeío o̱s String ) o̱s StringUsing rév̱ma kathó̱s FileStream = File.OpenRead ( archeío ) Dim sha o̱s SHA256Managed = Néa SHA256Managed ( ) Dim áthroisma elénchou o̱s byte [ . ] = sha.ComputeHash ( ρεύμα ) Επιστροφή BitConverter.ToString ( checksum ) Αντικατάσταση ( " - " , String.Empty ) End Function UsingEnd "
Η

4 Μετακινηθείτε προς τα κάτω στο κάτω μέρος του προγράμματος και πληκτρολογήστε το εξής στο κωδικοποίηση :

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

Πατήστε το πλήκτρο " Enter" για να εξάγετε το κείμενο checksum σας .
Η
εικόνων