Ciao.
Prova a sostiruire questa riga di codice
codice:
If flusso.CanRead Then
con questa
codice:
If cliente.Available > 0 Then
ed a fare le modifiche del caso.

Poi l'Array di Byte lo dimensionerei con il valore di cliente.Available.

Facci sapere...
Ciao