读书人

跪求通信程序解决办法

发布时间: 2012-02-21 16:26:23 作者: rapoo

跪求通信程序
请教各位高手,怎样用VB编写PC与单片机RS232通信,要求PC连续发送32个字节如(0x23)让单片机接收,我是初学者,求源代码,谢谢啦!

[解决办法]
LZ:参照如下代码修改:

VB code
Option Explicit    Dim sjByt() As BytePrivate Sub Command1_Click() '2进制发送    ReDim sjByt(1 To 10) '设置为10个元素    sjByt(1) = &H31    sjByt(2) = &H32    sjByt(3) = &H12    sjByt(4) = &H31    sjByt(5) = &H32    sjByt(6) = &H33    sjByt(7) = &H34    sjByt(8) = &H35    sjByt(9) = &H36    sjByt(10) = &H37    MSComm1.Output = sjByt '此命令执行一次发送10字节End SubPrivate Sub Form_Load()    MSComm1.PortOpen = TrueEnd Sub
[解决办法]
http://download.csdn.net/source/1262066

读书人网 >VB

热点推荐