VB 6.0 anfängerfrage

bach · 28.12.2002, 22:51

danke für die antworten ! mein porblem ist das ich mich in Vb kaum auskenne und jetzt versuche ein programm, aus allen möglichen quellen, zusammenzustoppeln !

eine weitere frage habe ich allerdings auch noch !

wie kann ich den empfangenen text binär darstellen ?

Code:

Private Sub MSComm1_OnComm()
  Select Case MSComm1.CommEvent
    Case comOverrun:   MsgBox "Datenverlust!"
    Case comRxOver:    MsgBox "Datenverlust!"
    Case comEvReceive: Me.Text3 = Me.Text3 + MSComm1.Input
  End Select
End Sub

28.12.2002, 22:51	#4
bach Veteran Registriert seit: 06.08.2000 Beiträge: 385	danke für die antworten ! mein porblem ist das ich mich in Vb kaum auskenne und jetzt versuche ein programm, aus allen möglichen quellen, zusammenzustoppeln ! eine weitere frage habe ich allerdings auch noch ! wie kann ich den empfangenen text binär darstellen ? Code: Private Sub MSComm1_OnComm() Select Case MSComm1.CommEvent Case comOverrun: MsgBox "Datenverlust!" Case comRxOver: MsgBox "Datenverlust!" Case comEvReceive: Me.Text3 = Me.Text3 + MSComm1.Input End Select End Sub

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)