Chinese characters σε VB6

Συζητήσεις για τις γλώσσες του dot Net και για του Visual Studio της Microsoft

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
Άβαταρ μέλους
lampadarios
Δημοσιεύσεις: 121
Εγγραφή: 02 Απρ 2003 01:32

Chinese characters σε VB6

Δημοσίευση από lampadarios » 27 Απρ 2006 17:14

Προσπαθώ να διαβάσω ένα αρχείο .xls με την VB6 το οποίο περιέχει μέσα κινέζικα. Δυστυχώς η VB δεν μπορεί να τα διαβάσει και βγάζει ερωτηματικά.
Τι μπορώ να κάνω?

Παρακάτω έχω τον κώδικα:

Set appexcel = Excel.Application
Set appexcel = CreateObject("excel.application")
appexcel.Workbooks.Open "file.xls"
strtemp = appexcel.Cells(1, 1)
appexcel.Workbooks.Close
appexcel.Quit
Set appexcel = Nothing

Άβαταρ μέλους
alkisg
Δημοσιεύσεις: 265
Εγγραφή: 03 Ιουν 2005 11:53
Τοποθεσία: Ιωάννινα
Επικοινωνία:

Chinese characters σε VB6

Δημοσίευση από alkisg » 28 Απρ 2006 13:51

Έχοντας κινέζικα στο A1 και με τον παρακάτω κώδικα
strtemp = Cells(1, 1)
Cells(2, 2) = strtemp
σε VBA επειδή δεν έχω VB6, αντιγράφονται κανονικά στο κελί B2.

Δοκίμασε να μην τα εμφανίζεις στην οθόνη αλλά σε κάποιο άλλο κελί του Excel. Θα πρέπει να εμφανίζονται, οπότε το πρόβλημα δεν είναι στα strings ή στο Excel αλλά ΣΤΑ CONTROLS της VB6 που δεν είναι unicode.

Διάβασε και αυτό και δοκίμασε το UniToolBox που προτείνει:
http://jollans.com/faq/nonunicode.htm

Άβαταρ μέλους
dimsis
Reporter
Δημοσιεύσεις: 7994
Εγγραφή: 25 Ιούλ 2001 03:00

Chinese characters σε VB6

Δημοσίευση από dimsis » 28 Απρ 2006 20:34

Unicode υποστηρίζει το richtextbox από όσο θυμάμε, οπότε πρόσθεσε ένα και ρίξτα εκεί μέσα...

Απάντηση

Επιστροφή στο “dot Net και Visual Studio”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 1 επισκέπτης