各位大大好 小弟是剛學習VB6 但就要使用RS232作通訊的新手 想問一下各位大大 為何接收時 會出現多的0的資料 Dim SendCommand(6) As Byte Dim ReceiveCommand() As Byte Dim i As Integer Dim Buf$ Buf = "" SendCommand(0) = 2 SendCommand(1) = 1 SendCommand(2) = 82 SendCommand(3) = 14 SendCommand(4) = 8 SendCommand(5) = SendCommand(1) + SendCommand(2) + SendCommand(3) + SendCommand(4) SendCommand(6) = 3 MSComm1.Output = SendCommand '送資料 ReceiveCommand = MSComm1.Input For i = LBound(ReceiveCommand) To UBound(ReceiveCommand) Buf = Buf + Hex(ReceiveCommand(i)) + Chr(32) Next i List1.AddItem Buf 這是我的部分程式碼 上面的SEND 是在寫傳輸格式 在接收時 每筆資料的中間都會多出現一個0 想問一下大大 這樣的問題是出現在哪? 還有就是在作RS232通訊時 有沒有什麼要特別注意的地方 或是有什麼小撇步可以參考使用的 以上~~ 麻煩大大幫我檢查一下了~~ 感恩 -- 有一個香錦囊，是從一個神話般的守軍的血屍頂上剝下的，那一次我們部隊 遭受了從未有過的頑強抵抗，我們犧牲了三個艦隊，一個裝甲師和無以數計小組 推進的敢死排，才摧毀了那處隘口的碉堡。但是竟然發現，使我們遭受如此慘烈 傷亡的守軍，總數只有一人。士兵們起鬨地在他胸前發現這枚香袋，大家都相信 這是一枚具有神奇力量的護身符。我們把他的頭顱砍斷，取下香袋，剝開，裡面 一張被血浸紅的宣紙竟用漢字娟娟秀秀四個整齊的楷書寫著，[盼君早歸。] --

※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.117.165.235 ※ 編輯: ujm8ik 來自: 140.117.165.235 (03/08 10:46) 不是這樣子嗎? 還有就是字串阿 怎麼分解成數值阿 像我16進位的 D24 要轉換成 0D 跟24 兩個BYTE放進去作傳送 可是都會出現錯誤@@ 對於變數的型態跟傳送的狀態實在是很弱>"< 可以指導一下嗎? 感恩~~ value1 = Val(Text9.Text) * 100 value2 = Hex(value1) If Len(value2) > 0 Then value4 = Right(value2, 2) value3 = Left(value2, Len(value2) - 2) End If value3跟4都宣告成整數 不能存@@ 他說資料型態不符 可是不是都是存數字嗎? 對不起>"< 不是我不看 是因為我版本的問題 MSDN不存在...冏 ※ 編輯: ujm8ik 來自: 140.117.165.235 (03/12 09:57)