很有意思。
创新互联建站10多年企业网站制作服务;为您提供网站建设,网站制作,网页设计及高端网站定制服务,企业网站制作及推广,对成都酒楼设计等多个方面拥有多年的网站营销经验的网站建设公司。
原文数据全为：“00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ; ”
加密后变成了：“09 51 55 F4 FB 10 6F A4 D3 E8 87 46 F8 2F 49 CD ; ”
得出这样的结果是有很多方法都可以实现的：
比如每个原数上加上个常数就可以了。
00+09=09；得出第一组加密后的数值
00+51=51；得出第二组加密后的数值
...
00+CD=CD；得出第16组加密后的数值.
加密的方法还有很多，不过这种最简单。
还有就是你给的原文太单一了，不能够更好的分析数据的规律。
如果你能把原文改为如下这段代码再去加密一下，再把加密结果贴上来看一下就好多了。
00000140h: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ;
00000150h: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ;
00000160h: 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F 10 ; 00000170h: 00 10 20 30 40 50 60 70 80 90 A0 B0 C0 D0 E0 F0 ;
00000180h: 11 11 11 11 11 22 22 22 22 22 22 EE EE EE FF FF ;
以上是单片机高手团为您解答。
如果还没解决你的问题，可以加我百度HI账号。
单片机发送字串最好用一个特殊符号开始比如！，结束时用一个特殊符号结束比如$，数据在两个标记之中!n1n2n3n4..........$。
接收端不用中断，而是在你的主程序循环体中去查询mscomm1.input值，读出来的值累加到一个变量中，那个变量中带标记的字串就是单片机发来的所有值。在主程序循环体中加入一个DoEvent
试试吧，应该可以的。另外，mscomm1的buffer值可设大一些。
Option Explicit
Dim sj As String
Private Sub Form_Load()
MSComm1.Settings = "9600,n,8,1"
MSComm1.InputMode = comInputModeText
MSComm1.RThreshold = 1 '当接收缓冲区到达1-8字节产生1次OnComm事件
MSComm1.CommPort = 1
MSComm1.PortOpen = True
End Sub
Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent
Case 2
sj = sj MSComm1.Input
If Left(sj, 1) = "A" And Right(sj, 1) = "Z" Then
Text1 = Mid(sj, 2, Len(sj) - 2)
sj = ""
Else
MSComm1.PortOpen = False
sj = ""
MSComm1.PortOpen = True
End If
End Select
End Sub
回复LZ:"还有，真的别让我再用MSComm1_OnComm() 来触发啦，连续快速接收的时候真的会程序假死的！"
这种情况是存在的,就是有线连接串口通信也存在通信假四现象.但也不是不可解决的.
请参阅:
请参考
上面的代码看不出问题，如果初始化串口控件时已经注册了AxMSComm1_OnComm，有数据接收应该能触发，至于为什么没有触发，要看看你的接收方是否已经收到你的发出指令，是否已经有响应数据回发。
建议分开调试，用一个通用的串口助手，如格西烽火串口助手之类的，分别调试你的上位机和下位机。格西烽火串口助手能轻松的定制如你上面的发送数据。
1.0 通讯组件概述
通讯组件用于PC与可编程控制器(PLC)、智能仪表等进行数据通讯，适用于基于PC高级语言的工业自动化控制系统。组件采用动态链接库文件(*.DLL)的形式，在PC系统的项目工程里引用该组件，调用相应的属性与方法函数，即可快速实现PC与PLC的高效数据交换。
DLL通讯组件无须安装，直接复制到工程文件目录，方便打包安装部署；无须任何配置，直接调用函数，与应用开发无缝衔接；多年工程经验的软件团队开发测试，经过本公司及客户的海量实际工程应用检验，稳定可靠；采用稳定高效的内部协议，无须编写PLC内部程序配合，直接访问PLC的内存，通讯响应快速；内建动态管理的多独立线程连接，同时支持外部应用的多线程结构调用；兼容WINDOWS系统下的所有开发环境，包括各种版本的VB.NET、C#、VC++，以及DEIPHI 、VB、LabView等；支持几乎所有PLC的CPU自带通讯口、通讯扩展模块。
你可以在技成看视频教程，这个案例比较经典，看视频更容易理解。
