[VB6 ] 請問VB怎麼完整接收來自89C52的資料?
第一次在VB版PO文 如果有不好的地方請通知小弟
我的問題是這樣的
我有在寫VB跟89C52晶片的程式，然後我現在要讀取89C52裡面的資料
只能讀到15頁，如果超過16頁就無法顯示在VB上(就會變的很奇怪)
我有在想是不是我VB那邊的變數設定太小才導致這樣。
我的接收程式碼是這樣子寫的
Dim iDataBytes As Integer
Dim iwait As Byte
Dim lMsg_Buffer As String
Dim iLoop As Integer
Select Case MSComm1.CommEvent
Case comEvReceive
iDataBytes = MSComm1.InBufferCount
Do '緩衝機制
iDataBytes = MSComm1.InBufferCount
Sleep (10)
If iDataBytes < MSComm1.InBufferCount Then
iwait = 0
Else
iwait = iwait + 1
End If
Loop Until iwait = 5
InByte = MSComm1.Input '收下完整封包內容
For iLoop = LBound(InByte) To UBound(InByte) '顯示封包內容
lMsg_Buffer = lMsg_Buffer + Hex(InByte(iLoop)) + " "
Next iLoop
msg.Text = lMsg_Buffer + " "
End Select
實在不知道怎麼完整讀取16頁的晶片內容 請各位大大幫個忙 謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.252.78.170
→
11/07 11:10, , 1F
11/07 11:10, 1F
→
11/07 11:58, , 2F
11/07 11:58, 2F
→
11/07 12:00, , 3F
11/07 12:00, 3F
→
11/07 12:02, , 4F
11/07 12:02, 4F
推
11/07 12:59, , 5F
11/07 12:59, 5F
→
11/07 12:59, , 6F
11/07 12:59, 6F
→
11/07 13:00, , 7F
11/07 13:00, 7F
→
11/07 14:10, , 8F
11/07 14:10, 8F
→
11/07 14:11, , 9F
11/07 14:11, 9F
推
11/07 16:59, , 10F
11/07 16:59, 10F
→
11/07 17:00, , 11F
11/07 17:00, 11F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
