non ho ben capito cosa devi fare ma ci provo lo stesso a darti una soluzione:
fai una variabile e ci metti cio che ricevi es:
dim Txt as string = (testo ricevuto)
ora puoi fare
do while Txt = "done"
cicla finchè Txt = "done"
Txt = (testo ricevuto) 'refresh della ricezione
loop