Ciao a tutti
ho il seguente codice per gestire un modem attraverso i comandi AT:

.......................
MSComm1.Output = AT & Chr$(13)
MSComm1.Output = AT2 & Chr$(13)
MSComm1.Output = AT3 & Chr$(13)
.................................

Private Sub MSComm1_OnComm()

Dim strRicevuta As String

If MSComm1.PortOpen Then

If MSComm1.CommEvent = comEvReceive Then

strRicevuta = Trim$(MSComm1.Input)
txtEsito.Text = Right$(txtEsito.Text, 32000) & strRicevuta

End If

End If

Il mio problema è che quando invio i comandi il codice è più veloce della risposta del modem, per cui i comandi si sovrappongono e il modem risponde in modo sbagliato. Come posso gestire il tutto in modo che al primo invio il codice aspetti che il modem risponda in modo definitivo per lanciare il secondo comando? Ho provato la funzione Sleep, ma non risolve del tutto il problema.