Interface VB with Arduino : Problem in serial communication

Using Arduino Interfacing w/ Software on the Computer
3 
        Dim comBuffer As Byte() = New Byte(bytes - 1) {}
        Chaine = SerialPort1.ReadChar()
        Dim Tableau(6) As Integer
        For i As Integer = 1 To (bytes - 1)
            Chaine = Chaine + comBuffer(i)
        Next

It occurs to me that you might actually want to put some data IN comBuffer BEFORE you append what is there so Chaine.