Quantcast
Channel: VBForums
Viewing all articles
Browse latest Browse all 15539

[RESOLVED] Case comEvEOF not working

$
0
0
Hi VB Forum:

I am programming in VB6.0.
The code is:
Private Sub MSComm1_OnComm()

Select Case MSComm1.CommEvent
Case comEvReceive
dat1 = MSComm1.InBufferCount
lbldat.Caption = dat1
Case comEvEOF
dat2 = MSComm1.Input
txtdat.Text = dat2

End Select

End Sub
The problem is: The label window shows the byte count ramping up.
When the number is holding steady, I presume the EOF marker has arrived.
However, the Text Box does not display the data. Apparently, the EOF event is
ignored.

I reviewed a few of the 360 entries for "Serial Port Communication". I did not encounter a problem similar to the above.

Please comment at your convenience.
Thank you.

Viewing all articles
Browse latest Browse all 15539

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>