11.c

VB与8051通信,内有VB和8051的源码

#include <AT89X51.h>
void main(void)
{
unsigned int i;
char r;
SCON= 0x40;                //串口方式1
PCON=0;                     //SMOD=0
REN=1;                     //允许接收
TMOD= 0x20;                //定时器1定时方式2
TH1= 0xe6;                //12MHz 1200波特率
TL1= 0xe6;
TI= 1; 

TR1= 1;                  //启动定时器
start:


if (RI==1)	 {	goto Receive; }
goto start; 

Receive:
r=SBUF;
for(i=0;i<10000;i++);

if (r=='0') 
{
P1_0=0;

}
else if	  (r=='1') 
{
P1_0=1	;

}
else
{
goto start;
}
}