vb 串口接收数据

显示全部楼层 · 2010-5-26 19:55:13

void ser() interrupt 4 using 2
{
unsigned char a;
RI=0;
a=SBUF;
if(a==0x31) SBUF=rdata;
else TI=1;
while(TI==0);
TI=0;
}这个是串口中断程序
Private Sub Mscomm1_Oncomm() '...通讯事件发生

Dim indata As Variant

Select Case MSComm1.CommEvent

Case comEvReceive '...有接受事件发生

indata = MSComm1.Input
'...注意！要通过MSComm控件发送或接收二进制数据必须用Variant类型的变量对二进
'...制Byte类型的变量进行转换！

bte = AscB(indata)

MSComm1.InBufferCount = 0 '...清空输入寄存器

End Select
End Sub这个是接收数据的mcscomm的子程序
我用的rs-232接口串口线是直通的为什么送不上来数据啊我的上位机接收不到数据，而且用串口助手时候，也看不到接收到的数据！哪个大侠，能和我说明一下啊？！
我的单片机程序用proteus 仿真的时候是好用的用虚拟串口也可以接收到数据我的rs-232接的我把rxd和txd短接过，用调试助手发送和接收的数据时一样的应该没有问题啊
我也改用交叉了，我把23脚给互换了一下，这这样的交叉因为我没有交叉的串口线啊！还是送不上来数据。我想问问我的程序是不是没有什么问题啊
我现在能送上来数据了，但是我用软件看的到用串口助手却看不到是为什么呢？！我用的直通的

千问 · 2010-5-26 19:55:13

既然LZ用串口助手时也接收不到的数据,那只能有这几种可能:1)单片机程序不对.2)通信线接法错误.补充答复:问题是你用串口助手也收不到数据!

千问 · 2010-5-26 19:55:13

..VB串口通信,有一套非常好的技术资料..,600M多,你在淘宝搜索"太阳雨VB串口通信技术资料"就可以找到,.对您的VB串口编程非常有帮助. .

千问 · 2010-5-26 19:55:13

rs-232接口串口线是直通的？那你交叉一端的 RxTx试试祝你顺利

千问 · 2010-5-26 19:55:13

交叉线吧，考虑下换下串口的两跟线试试