vb上位机的运行界面：
单片机源程序：/***********************************
函数：uint Conut(void)
------------------------
说明：计算测到的距离
参数：无
返回值：测得的距离
***********************************/
uint Conut(void)
{
uint time; // 用于记录测得的时间
uint ss; // 用于记录测得的距离
time = (TH0*256+TL0)*1.09; // 总时间
TH0=0;
TL0=0;
if(flag==1) // 如果超出测量距离，则不传输数据
{
flag=0;
ss=0;
}
else
{
ss=time*1.7/100; // 空气中声音的速度是340m/s
}
return ss;
}
/***********************************
函数：void send(uint dat)
---------------------------
说明：将测得的距离通过串口发送出去
参数：dat是测得的距离
返回值：无
***********************************/
void Send(uint dat)
{
SBUF=(dat/100)+ 48; // 发送 百 位
while(!TI);
TI=0;
SBUF=(dat%100/10)+48; // 发送 十 位
while(!TI);
TI=0;
SBUF=(dat%10)+48; // 发送 个 位
while(!TI);
TI=0;
}
详细代码见附件 
51单片机测距上位机和下位机源码.zip
(44.63 KB, 售价: 1 E币)
【必读】版权免责声明
1、本主题所有言论和内容纯属会员个人意见，与本论坛立场无关。2、本站对所发内容真实性、客观性、可用性不做任何保证也不负任何责任，网友之间仅出于学习目的进行交流。3、对提供的数字内容不拥有任何权利，其版权归原著者拥有。请勿将该数字内容进行商业交易、转载等行为，该内容只为学习所提供，使用后发生的一切问题与本站无关。 4、本网站不保证本站提供的下载资源的准确性、安全性和完整性;同时本网站也不承担用户因使用这些下载资源对自己和他人造成任何形式的损失或伤害。 5、本网站所有软件和资料均为网友推荐收集整理而来，仅供学习用途使用，请务必下载后两小时内删除，禁止商用。6、如有侵犯你版权的，请及时联系我们（电子邮箱1370723259@qq.com）指出，本站将立即改正。
| 
