basic實現(xiàn)pc與89c51單片機之間的串行通信(存儲版)
【正文】 沈 飆 夏海燕 摘要 在Visual Basic開發(fā)環(huán)境下，運用VB提供的通信控件，實現(xiàn)PC機與89C51單片機之間的串行通信。我們將分硬件和軟件兩方面分別介紹該系統(tǒng)的情況?！C機部分 PC機采用Visual Basic(簡稱VB)編程。VB通信控件設(shè)計軟件如下：Global m_time As Integer //定義一些全局變量Global data(1000)As IntegerGlobal Receive(1000)As IntegerPrivate Sub Form_Load()’ //串口初始化 =1 //設(shè)置串口1 =“9600,N,8,1” //波特率：9600 奇校驗，8位數(shù)據(jù)，1位停止位 =0 //讀取接收緩沖區(qū)的所有字符 =256 //設(shè)置接收緩沖區(qū)為256字節(jié) =256 //設(shè)置發(fā)送緩沖區(qū)為256字節(jié) =True //打開串口1 =1 //發(fā)送緩沖區(qū)空觸發(fā)發(fā)送事件 =1 //每一個字符到接收緩沖區(qū)都觸發(fā)接收事件End SubPublic Sub senddata() //發(fā)送n個數(shù)據(jù) For i=0 To n =Chr(data(i)) Next iEnd SubPublic Sub Comml_OnComm() //接收數(shù)據(jù)觸發(fā)OnComm()事件 Select Case //在CommEvent中接收數(shù)據(jù) Case EvReceive Receive(m_time)=Asc() //將接收數(shù)據(jù)放在Receive(mtime)數(shù)組中 Comm_time=m_time+1 End SelectEnd Sub 單片機部分 單片機89C51采用MCS51系列的匯編語言編程。對于目前廣泛應(yīng)用的Windows環(huán)境下實現(xiàn)PC機與單片機之間的通信問題，希望本文能夠提供一點有用的參考價
規(guī)章制度相關(guān)推薦
鄂ICP備17016276號-1