join - VB.net 2010 を使用してテスト ファイルの代替行を結合する

Question

以下のファイルがあります：

Arijit
Ghosh.1.100.0
Arindam
Roy.3.4.678

今、私は以下の方法で出力したい

Arijit.Ghosh.1.100.0
Arindam.Roy.3.4.678

私はVb.net 2010を使用しています。ストリームリーダーを使用してファイルを読み取り、ストリームライターを使用して書き込みます。データ テーブルを使用したくない 助けてください。緊急です。

Answer 1

入力ファイルfile.txtに次の値があるとします

Arijit
Ghosh.1.100.0
Arindam
Roy.3.4.678 

そして、あなたはoutput.txtに書く 必要があります

       Using writer As StreamWriter = New StreamWriter("D:\output.txt")
            Using reader As StreamReader = New StreamReader("D:\file.txt")
                Dim isSecondLine As Boolean = False
                Dim line As String = String.Empty
                While Not reader.EndOfStream
                    If Not isSecondLine Then
                        line = reader.ReadLine()
                        isSecondLine = True
                    Else
                        line = line + "." + reader.ReadLine()
                        isSecondLine = False
                        writer.WriteLine(line)
                    End If
                End While
            End Using
        End Using