タイトル : Re^3: Fontを変更した時の文字化け 投稿日 : 2009/01/03(Sat) 14:45 投稿者 : 魔界の仮面弁士
お年玉代わりの追記。 > Label1.Font.Charset = 128 を追加。これで完成! Private Const ANSI_CHARSET As Long = 0 Private Const DEFAULT_CHARSET As Long = 1 Private Const SYMBOL_CHARSET As Long = 2 Private Const SHIFTJIS_CHARSET As Long = 128 Private Const HANGEUL_CHARSET As Long = 129 Private Const HANGUL_CHARSET As Long = 129 Private Const GB2312_CHARSET As Long = 134 Private Const CHINESEBIG5_CHARSET As Long = 136 Private Const OEM_CHARSET As Long = 255 Private Const JOHAB_CHARSET As Long = 130 Private Const HEBREW_CHARSET As Long = 177 Private Const ARABIC_CHARSET As Long = 178 Private Const GREEK_CHARSET As Long = 161 Private Const TURKISH_CHARSET As Long = 162 Private Const VIETNAMESE_CHARSET As Long = 163 Private Const THAI_CHARSET As Long = 222 Private Const EASTEUROPE_CHARSET As Long = 238 Private Const RUSSIAN_CHARSET As Long = 204 Private Const MAC_CHARSET As Long = 77 Private Const BALTIC_CHARSET As Long = 186 |