• ベストアンサー

(印)という文字を読み込みたい。

Shift_JISで保存されたテキストファイルをフォーム上に表示したいのですが、 (印)という文字をどうしても表示させることができません。 表示させる方法を教えてください。 *(印)は印を○で囲った文字です。

質問者が選んだベストアンサー

  • ベストアンサー
  • notnot
  • ベストアンサー率47% (4900/10358)
回答No.1

そういう文字はShift_JISにはありません。無理です。 ユニコード(UTF-8など)にしてください。

kee00
質問者

お礼

notnotさん、YON56さん回答ありがとうございます。 回答を踏まえて色々と試していた為返事が遅れすみません。 YON56さんがおっしゃるように(記述方法はエクセルですが) AscW、ChrWで置き換える方法も試してみましたが変換できませんでした。 そもそもテキストファイルにShift_JISで保存できているのかも不明です。 ただnotnotさんがおっしゃるようにユニコードで保存しないといけないことは理解できました。 システム上でShift_JISのテキストファイルを読み込んで、ユニコードで保存しなおしなかったのですが、もともとあるShift_JISで保存されているテキストを手動で文字コードを変更することにしました。 アドバイスありがとうございます。

その他の回答 (2)

  • tossy2011
  • ベストアンサー率17% (3/17)
回答No.3

Excel のバージョンはおいくつでしょうか? 単純にExcel上で「いん」を変換して(印)を表示することはできますか?

kee00
質問者

お礼

大変申し訳ありません。 開発環境を書いたつもりですっかり抜けていました。 お恥ずかしい限りです。 Win7 VB2008で開発しております。 読みこみたいテキストファイルは XP VB6で開発したものです。 Win7でもUnicodeだと印◯は書き込むことができます。 Unicodeで保存しとけば問題なく読み込めるので、 印が含まれたシストJISのテキストファイルのみ手動で保存し直そうとおもっているんです。 何かよいアドバイスがあればよろしくお願いします。

回答No.2

セルA1に対象文字列があり、 セルB1にそのコードを示し、セルC1に再び対象文字列を記す構文です。 Range("B1")=AscW(Range("A1").Value) Range("C1")=ChrW(Range("B1").Value)

関連するQ&A