Hallö !
Ich hab mir mal ein Terminal für meine C-Control Programmiert. Ich habs so gemacht, dass ich der C-Control ein bestimmte Zahl(in dem Fall 21) geschrieben habe und diese soblad sie die erhalten hat den gewünschten output macht. derweil warted der Pc.

Code:

Private Sub Kommunikation
If com.PortOpen = True Then
    com.Output = Chr(21) 'senden der Zahl 21
    Call break                   'warten auf C-control
    empf = Asc(com.Input) 'sobald was da ist den wert in Ascii Konvertieren und in der Var empf speichern
    

'HIER kommt die auswertung der Variablen rein ! Also zb wenn se 1 ist dann soll er ein kästchen rot färben oder so... :

If empf=1 then 
      lblugr(0).BackColor=vbred 
else 
      lblugr(0).BackColor=vbblack
Endif


Else
    MsgBox "Port ist nicht geöffnet"
End If
End Sub

Public Sub break() ' warted darauf das die C-Control was zurückschreibt
Do
    DoEvents
Loop Until com.InBufferCount > 0
End Sub
Ich hoffe damit ist deine Frage beantworted ?!

Gruß Javik