[VB6 ] RS232及時繪圖上的問題
※ [本文轉錄自 Visual_Basic 看板 #1DOwSuPT ]
作者: paulgoodke (^^) 看板: Visual_Basic
標題: [VB6 ] RS232及時繪圖上的問題
時間: Tue Feb 22 20:08:21 2011
這是我利用RS232傳輸進入VB6的繪圖程式
Private Sub Command5_Click()
Dim a!(30), b!(30), num%, instring%(30)
Dim i As Integer
num = MSComm1.InBufferCount '取輸入緩衝區字節個數
++instring(i) = MSComm1.Input '把輸入緩衝區資料送給陣列
For i = 0 To 250
a(i) = i
b(i) = instring(i)
Graph1.Cls
If i = 1 Then
Graph1.PSet (a(i), b(i))
Else
Graph1.Line -(a(i), b(i)) '將陣列資料給繪圖函數
End If
Next i
End Sub
可是當我去跑程式時他會出現錯誤"Run-time error '6' "
Overflow
然後按DEBUG他會顯示在++的那行中
想請問我這樣的程式哪裡有錯誤@@
這是我的介面http://ppt.cc/l2R2
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.39.138
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.39.138
討論串 (同標題文章)
完整討論串 (本文為第 1 之 2 篇)：
Programming 近期熱門文章
PTT數位生活區 即時熱門文章
