|
2016/09/02(Fri) 18:01:22 編集(投稿者)
■No81213 (タリアン さん) に返信
> VB.NET2010を使っているのですが
> コードの中の全角文字をWord2010にコピペすると
もしかしたら、Word 2010 側の問題かもしれません。
ワードパッドに貼り付けて見たらどうなりますか?
■No81214 (タリアン さん) に返信
> Unicodeで貼り付けを使うことで文字化けは防げることがわかりました
手元の VB2010 で確認してみましたが、コピー元の .vb ファイルの
エンコードが Shift_JIS でも UTF-8 でも、
コピー結果に変化は見られませんでした。
クリップボードの内容も監視してみましたが、
以下のフォーマットと順序で格納されてきており、
いずれのデータも、コピーの段階で化けている様子は
みられませんでした。
[#1] "DataObject"
4 バイト長バイナリ(0xB2980)
[#2] CF_UNICODE_TEXT (13)
エンコード： UTF-16(リトルエンディアン)
改行コード：CR+LF
終端NUL：あり
[#3] "Rich Text Format"
エンコード： ASCII
改行コード：CR+LF
終端NUL：あり
[#4] "Ole Private Data"
152 バイト長バイナリ
[#5] CF_LOCALE (16)
4 バイト長バイナリ(0x1041)
[#6] CF_TEXT (1)
エンコード： CP932(既定の Windows の ANSI コード ページ)
改行コード：CR+LF
終端NUL：あり
[#7] CF_OEMTEXT (7)
エンコード： 既定の OEM コード ページ
改行コード：CR+LF
終端NUL：あり
> しかし、それだと文字の色やフォントが失われてしまいます
上記のウチ、書式付なのは "Rich Text Format" だけですが、
それは以下の内容になっていました。
RTF コードそのままで記載します。（掲示板に貼れるかな…）
下記を拡張子 .rtf として保存すると、ワード等で見れるはず。
{\rtf\ansi{\fonttbl{\f0 MS Gothic;}}{\colortbl;\red0\green0\blue255;\red43\green145\blue175;\red0\green128\blue0;}\f0 \fs19 \cf1 Module\cf0 \cf2 Module1\cf0 \par \par \cf1 Sub\cf0 Main()\par \cf3 '\uc1\u12452?\uc1\u12531?\uc1\u12473?\uc1\u12479?\uc1\u12531?\uc1\u12473?\uc1\u22793?\uc1\u25968?\cf0 \par \cf1 End\cf0 \cf1 Sub\cf0 \par \par \cf1 End\cf0 \cf1 Module\cf0 \par \par }
|