你vb程序下发的数据是什么码？ASCII码还是BCD码，我以前出现过这个问题，就是数据码不匹配
看看VB写的串口的设置：波特率 ，奇偶校验、停止位。比如 com1.Settings = "1200,N,8,1" '设置通信口参数跟单片机的串口设置是否一致
串口设置有问题，波特率恐怕都不对
