VS 2008 how to this code (VB.net 2008)

I have a code like this :

Dim hasil As String
For i = 1 To BinaryStr2.Length Step 3 // 7
hasil &= Mid(BinaryStr2, i, 3) & " " // 1101011
Next
hasil = Trim(hasil) // 110 101 1


how does it make
hasil = Trim (hasil) / / 110 101 1
be a1 = 110
a2 = 101
a3 = 1

thanks before