DOSの改行コードを認識するには？ (ID:75851)

名前

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

本文 こんな感じで作ってみたんですけど、vbCrLf(&HD, &HA) でエラーが出るしGet #1, , strBufの時にはすでにバイナリではないし どこがだめなんでしょうか？？ Dim strBuf As String Open "text.txt" For Binary As #1 strBuf = Space$(LOF(1)) Get #1, , strBuf Close #1 s = InStr(strBuf, vbCrLf(&HD, &HA)) '検索 If s <> 0 Then strBuf = Replace(strBuf, vbCrLf(&HD, &HA), vbCrLf(&HA)) '変換 End If Open "text2.txt" For Output As #1 Len = 32000 Print #1, strBuf