1. VB和單片機串口通信
下面是我做的一個測試程序:
'TextReceive =
' 初始化程序:主要完成對串口的設置,包括選擇串口、設置波特率、設置數據格式、打開串口等。
' 注意:在程序開始之前,必須清空發送和接收緩沖區,以免出錯。
Private Sub Form_Load()
MSComm1.Settings = "9600,n,8,1" ' 設置波特率和發送字元格式
MSComm1.CommPort = 1 ' 設置通訊串口
MSComm1.InputLen = 0 ' 設置或返回一次從接收緩沖區中讀取位元組數,0表示一次讀取所有數據
MSComm1.InBufferSize = 2 ' 設置接收緩沖區2Byte
MSComm1.InBufferCount = 0
MSComm1.OutBufferSize = 2 ' 設置發送緩沖區2Byte
MSComm1.OutBufferCount = 0
MSComm1.RThreshold = 1 ' 每個字元到接收緩沖區都觸發接收事件
MSComm1.SThreshold = 1
MSComm1.InputMode = comInputModeBinary '採用二進制傳輸
MSComm1.PortOpen = True ' 打開串口
End Sub
Private Sub Command1_Click()
Dim number As Integer
Dim outbyte(0) As Byte
number = Val(170)
outbyte(0) = CByte(number)
MSComm1.Output = outbyte
Label4 = outbyte(0)
Print outbyte(0)
End Sub
2. 如何用VB通過串口和51單片機通訊使得單片機能夠在IO口產生脈沖,脈沖的數量和頻率由VB設定
這個需要分步來完成
1、實現單片機串口通訊
2、編寫VB程序,添加串口控制項,實現VB與單片機串口通訊
3、寫單片機IO驅動,實現脈沖輸出
4、VB發數據給單片機,實現脈沖數量和頻率控制
5、更詳細的可以私信我完成
3. 利用VB實現串口接收單片機數據
InputModeBinary
=
1
'通過
Input
屬性以二進制方式檢取回數據
寫法有錯,正確寫法:
MSComm1.InputMode
=
comInputModeBinary
'以二進制方式接收
或:
MSComm1.InputMode
=
1
'以二進制方式接收