Chinese karakters

Status
Niet open voor verdere reacties.

mcs51mc

Gebruiker
Lid geworden
19 feb 2008
Berichten
386
Hallo,
Heeft iemand van jullie ervaring met Chinese karakters in user forms van Excel?
Ik heb een tekstfiles met alle teksten van oa. de controls op de userform in verschillende talen.
Met code
Code:
Private Declare Function GetPrivateProfileString Lib "Kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long

Public Function ReadINI(sFName As String, sSection As String, sKey As String) As String
Dim RetVal      As String * 255
Dim lngValue    As Long

    lngValue = GetPrivateProfileString(sSection, sKey, "", RetVal, 255, sFName)
    ReadINI = Left(RetVal, lngValue)
End Function
haal ik dan voor iedere control op de form de juiste tekst volgens de geselecteerde taal.

Nu heb ik in die tekst file ook de Chinese vertaling gezet van al die controls maar wanneer ik die opvraag met bovenvermelde code, dan krijg ik niets anders dan vraagtekens uit de "GetPrivateProfileString" functie :(

Iemand hier een oplossing voor?
Alvast bedankt!
 
alphamax : Bedankt voor de links !
Ik ga ermee aan de slag...
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan