Πώς να μετατρέψει Unicode σε ANSI Vb

Visual Basic αποθηκεύει όλες τις πληροφορίες κειμένου από προεπιλογή , χρησιμοποιώντας το σύνολο χαρακτήρων Unicode . Αυτό του επιτρέπει να αποθηκεύσετε χαρακτήρες από τα πιο γνωστά γλώσσες ( συμπεριλαμβανομένων ακόμη και ορισμένες που αποτελείται γλώσσες όπως Klingon ) αξιόπιστα και με ακρίβεια . Unicode αναπτύχθηκε για να λύσει το συγχυσμένη μάζα των σελίδων κώδικα που χρησιμοποιείται για να αναπαραστήσει τις γλώσσες του κόσμου σε ANSI . Ωστόσο, ορισμένα προγράμματα και τα συστήματα κληρονομιά αναμένουν ότι τα δεδομένα τους να διαμορφωθεί σύμφωνα με ANSI , έτσι Visual Basic παρέχει τα εργαλεία για να το κάνουμε αυτό . Οδηγίες
Η 1

Ανοίξτε Visual Basic και να δημιουργήσετε ένα νέο έργο . Επιλέξτε " Εφαρμογή Console . " 2

Επικολλήστε τον ακόλουθο για να αποθηκεύσετε κάποια δεδομένα κειμένου σε Unicode :

String s = " . . Hello Αυτή είναι μια Unicode - κωδικοποιημένο string"

Η 3

Επικολλήστε τον παρακάτω για να πάρετε μια ANSI Κωδικός Σελίδα :

Δημ. defaultCodePage = Encoding.Default

Dim winLatinCodePage = Encoding.GetEncoding ( 1252 )

η πρώτη σας δίνει την προεπιλεγμένη σελίδα κώδικα για το λειτουργικό σύστημα που χρησιμοποιούνται σήμερα . Έτσι , σε μια ιαπωνική υπολογιστή , θα ανακτήσει την προεπιλεγμένη σελίδα ιαπωνικό κώδικα . Το δεύτερο ανακτά σελίδα κώδικα " 1252 ", το οποίο είναι η σελίδα κώδικα των Windows για τη λατινική ( Αγγλικά) αλφάβητο . Μπορείτε να δείτε μια πλήρη λίστα των υποστηριζόμενων κωδικούς αριθμούς σελίδας στην πρώτη αναφορά
Η 4

Επικολλήστε τον ακόλουθο για να μετατρέψει το string στη νέα κωδικοποίηση : .

Δημ. bytes Όπως Byte ( ) = Encoding.Convert ( Encoding.UTF8 , winLatinCodePage , s )

τώρα το string s που ορίζεται στο βήμα 2 έχει μετατραπεί σε μια σειρά από bytes που κρατά τα ισοδύναμα ANSI ( όπως σχεδόν του δυνατού ) , σύμφωνα με το ANSI των Windows λατινική κωδικοσελίδα .
Η
εικόνων