找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2116|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

VB如何向串口發(fā)送二維數(shù)組

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:273098 發(fā)表于 2018-6-1 15:32 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
將一個二值化圖片以二進(jìn)制形式打開存入二維數(shù)組,先要將二維數(shù)組通過串口發(fā)送到51單片機(jī),如何用MSComm控件向串口發(fā)送二維數(shù)組?
Private Sub Command1_Click()
Open "C:\Users\lenovo\Desktop\Pic1.BMP" For Binary Access Read As #1
Picture1.ScaleMode = 3
m = Picture1.ScaleWidth
n = Picture1.ScaleHeight
L = LOF(1)
ReDim a(1 To n, 1 To m) As Byte
Get #1, 1, a()
Close #1
'測試
For j = 1 To n
For i = 1 To m
Debug.Print Hex$(a(j, i)) & Space(3);
Next i
Debug.Print
Next j
End Sub

這是用 Debug.Print顯示,如何用MSComm發(fā)送?
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表