| 投稿日 | ： 2007/07/03(Tue) 21:04 |
| 投稿者 | ： 魔界の仮面弁士 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: マルチラインのテキストボックスに改行コードを表示させるには？ |
> となっていまして、改行を表す文字（改行コードの様なもの）は、
> 書き出されていませんよね。
いや、書き出されているからこそ、複数行で表示されるわけで……。(^^;
出力したファイルを、バイナリエディタでチェックしてみてください。
改行文字に相当する、0A や 0D といった値が見えるかと思います。
> dim Content as String
> Content = Text1.Text
> Open "c:\test.txt" For Output As #1
> Write #1, Content
> Close #1
そのデータを、
Dim Content As String
Open "C:\test.txt" For Input As #1
Input #1, Content
Text2.Text = Content
Close #1
で読めば、元のテキストが改行付きのまま読み込まれませんか?
> 上記の様に改行された部分は、文字で表して、１行にする方法は
> ないのでしょうか？
lineString = "[改行として置き換える文字列]"
newText = Replace(Content, vbCrLf, lineString)
とすれば、newText に「1 行にまとめた文字列」が入るかと。