改行コードを表示するには?

解決


エディタ  2003-08-10 12:48:30  No: 78962  IP: [192.*.*.*]

最近エディタを作成しているのですが、改行コードや半角スペース等が
表示できずかなり頭を抱えています。良い方法等があればアドバイスを
いただけないでしょうか。お願いいたします。

編集    削除
デルビ  URL  2003-08-10 17:50:12  No: 78963  IP: [192.*.*.*]

文章の最後に[↓]等をつけてファイルに書き込むときにその文字列をすべてはずすのはどうでしょうか?

*Stringの内容*

AAAA[↓]
BB[↓]

↓ファイルに書き込む場合

s = Replace(s,"[↓]","")
とするか
dim value() as string
dim i as long
value()=split(s,vbnewline)

for i=0 to ubound(value)
    value(i)=left(value(i),len(value(i))-len("[↓]")))
next
s=join(value,vbnewline)
として、変数sをファイルに書き込む

これと同じようにして半角スペースも利用できますよ

編集    削除
エディタ  2003-08-11 09:36:10  No: 78964  IP: [192.*.*.*]

なんとかそれらしいものが出来ました。
デルビさん有難うございました。

編集    削除
エディタ  2003-08-11 09:37:32  No: 78965  IP: [192.*.*.*]

チェック忘れてました。

編集    削除