Select Case MSComm1.CommEvent
Case comEvReceive
bytreceived1() = MSComm1.Input
txtreceive.Text = txtreceive.Text + Chr(bytreceived1(i))
intfilerecord = intfilerecord + 1
b = Chr(bytreceived1(i))
If Asc(b) <> 10 Then
transferdata = transferdata + b
Else
dataread = True
End If
End Select
儀器每次發送的是2.63449e-03，接收的是2.63449e-032.63454e-032.59587e-032.58573e-032.55497e-03一串資料，我要怎么在每個資料后面換行，并且在text中顯示呢 ？
uj5u.com熱心網友回復：
代碼根本看不懂！一次 Input 只向 txtreceive 拼了一個字符？
那為什么還要用i？
各變數做什么用？
uj5u.com熱心網友回復：
不用回i就提示下表越界。uj5u.com熱心網友回復：
你不愿意把你的代碼在做什么說清楚，怎么改動？uj5u.com熱心網友回復：
就是儀器每次發送一個資料：2.63449e-03，現在的代碼是把資料都顯示在一個text中沒有分隔開：2.63449e-032.63454e-032.59587e-032.58573e-032.55497e-03，我想在每個資料后加一個換行。至于變數，i純粹就是為了讓他不提示下標越界，b你可以無視uj5u.com熱心網友回復：
你只說期望結果，不說你現在程式的邏輯、出現問題的具體情形，讓別人給你從頭寫一個？轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/99695.html
標籤：VB基礎類
下一篇：求大神解決，vb呼叫flash，flash中有FLVPlayback進行引入外部視頻，如何是FLVPlayback全屏播放，設定其位置