ファイル内の特定の文字列を置換するには？ (ID:79781)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 え！ そんなところに改行が入るはずはないんですが.... もしかしたらRichTextBoxコントロールのバグに引き込んでしまったかも。 よろしければVBのバージョンとサービスパックのバージョンを教えて下さい。 最新のサービスパックを当ててだめなら、 RichTextBoxの代りに文字列で Dim s As String, a As String Dim FileNo FileNo = FreeFile Open FileName For Input As #FileNo While Not EOF(FileNo) Line Input #FileNo, a s = s & a & vbCrLf Wend Close s = Left(s, Len(s) - 2) '最後の改行を取る s = Replace(s, 置換元, 置換先) FileNo = FreeFile Open FileName For Output As #FileNo Print #FileNo, s Close この方がメモリーの消費は少ないです。