Programming formlables in Polish

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Our OfficeXP Version ( therefore Access) is in English - but we have users
speaking only Polish.
Therefore we programm in VBA the formlables.captions to show as well in
Polish, using FontName = Arial (Central European). In VBA the Polish
Caracters come out correctly, on the OpenForm Event the Captions of the Form
Lables show very strange caracters, but not anymore the Polish ones. Only
the Polish Caracters are shown correctly in the Formlables if we type them
directly in the Propertysheet of the Form. But we have to do the captions of
the lables by VBA as the lables have to be in Polish or English and French.
 
Friedi said:
Our OfficeXP Version ( therefore Access) is in English - but we have users
speaking only Polish.
Therefore we programm in VBA the formlables.captions to show as well in
Polish, using FontName = Arial (Central European). In VBA the Polish
Caracters come out correctly, on the OpenForm Event the Captions of the
Form
Lables show very strange caracters, but not anymore the Polish ones. Only
the Polish Caracters are shown correctly in the Formlables if we type them
directly in the Propertysheet of the Form. But we have to do the captions
of
the lables by VBA as the lables have to be in Polish or English and
French.
Click to expand...


As far as I can see, the basic problem you have is that the VBA editor will
not support unicode characters. For Polish, you could create a convention
such that you surround the accented characters with brackets so for the word
Friday you write "Pi<a>tek" then use the ChrW function to provide the
unicode value, e.g. "a" is replaced with ChrW(&H105).
It wouldn't take too long to write the function GetPolish(strPhrase As
String) As String, and for Polish it wouldn't bee too bad because (apart
from the letter z) any 'normal' letter can only have one 'accented version'
if you know what I mean. However this is not true for French. However,
this is obviously a pain to read and write, and not awfully flexible.
Much better might be to create a table of captions, with the English version
having a unique index, with fields Polish and French to give the
translations. The function could find out which is the default language to
use and then your VBA code might then look like:

Me.lblWhatever.Caption = TranslateToDefault("Some example caption")
 
Back
Top