[AccessD] Chinese Language

Hi Rocky

Try with .FontName

/gustav


> It seems that I can change the caption of a control through code:

> ctl.Caption = rs(gstrLanguage)

> ' Where gstrLanguage is the field name in the language table of the language
> selected by the user

> but I can't change the font:

> If InStr(1, gstrLanguage, "Chinese") <> 0 Then ctl.font = "Arial Unicode MS"

> gives me 'object soesn't support this property or method'.