改行コード?

タグの編集
投稿者 ルイス  (社会人) 投稿日時 2017/6/26 11:05:09

文字列

文字列


上記のテキストの、1行目と3行目にある改行コードのようなものの消し方について質問です。
文字列に対する改行コードの置換をいくつか試してみてるのですが、どうしても置換できません。

ためしたものは
                .Replace(Chr(13), "").Replace(Chr(10), "")
                .Replace(vbCrLf, "")
                .Replace(vbCr, "")
                .Replace(vbLf, "")
                .Replace(vbNewLine, "")
になります。

どなたかご助言お願いいたします。

投稿者 魔界の仮面弁士  (社会人) 投稿日時 2017/6/26 11:15:04
まずは、その「改行コードのようなもの」の正体を突き詰めるのが先ですね。
下記のようにしてみた場合、その文字は  000d や 000a 相当の値になっていますか?

Dim source As String = 何某
ListBox1.Items.Clear()
For Each c As Char In source
    ListBox1.Items.Add( AscW(c).ToString("x4") & "=>" & c )
Next
投稿者 ルイス  (社会人) 投稿日時 2017/6/26 11:31:12
魔界の仮面弁士 様

ご返信ありがとうございます。
いただいたコードを実行してみたところ

000a=>

という値が出力されました。
この値について少し調べてみたのですが、わかりませんでした。

引き続き教えていただいてもよろしいでしょうか?
よろしくお願いいたします。
投稿者 ルイス  (社会人) 投稿日時 2017/6/26 12:38:50
 魔界の仮面弁士様

000aがvbcrだということを調べ、再度通常通り下記のように置換したらうまくいきました。

.Replace(vbCr, "")
.Replace(vbLf, "")

なぜ最初できなかったのかと、

.Replace(vbCr, "")
こちらだけだと改行削除できないというところが謎のままなのですが一応解決しました。

お助けいただきありがとうございました。