网站大量收购独家精品文档,联系QQ:2885784924

多点粮库温度监控管理系统实习报告.pdfVIP

多点粮库温度监控管理系统实习报告.pdf

  1. 1、本文档共14页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多

粮库温度监控管理系

统实习报告

系别:电气工程系

班级:

学号:25号

实习时间:2014.11.24~2014.12.6

指导教师:

一、实习名称:

粮库温度监控管理系统

二、实习目的:

1、能够正确使用相关软件编写上位机、下位机程序实现数据的

采集;

2、要求系统界面美观、大方,颜色、字体等选择合适,控件选

择合理;

3、本系统能够控制下位机的启动与停止,同时应具有实时显示、

曲线绘制、数据保存、数据浏览、分析(上下限提示、平均值、直方

图或饼图等)等基本功能,并配置菜单、工具栏等;

4、下位机提供粮库中八个粮仓的温度数据,用数码管或液晶循

环显示;

三、实训过程:

1.设计的内容

本次设计所做的是基于VB的温度数据采集与控制系统,它采用

DS18B20作为温度传感器,以微机作为主控计算机。通过仿真电路,

由串行通讯线把数据直接传送给上位机,让上位机对所得到的数据进

行分析处理,并且应用VB语言编程实现温度的显示。

硬件方面是由上位机和仿真电路来实现的,DS18B20采集到的温

度数据通过串行通讯线传送给上位机,运行在上位机上的编程软件

VB利用串行通讯线提供给硬件的接口,对整个单总线进行操作控制,

并且对测量数据进行处理。

软件方面主要是通过对系统参数的设置,通信控件的应用,最终

实现对DS18B20的控制和温度数据的读取。

2.仿真电路

此次下位机主要是由8个温度传感器DS18B20构成,在此系统中

应用DS18B20温度传感器检测温度,经信号处理后,通过仿真运行,

最终在上位机上应用编程软件VB语言实现温度的显示。

3.登录界面

通过输入用户名和密码来进行登录进入主界面,并有用户名注册和

找回密码功能。

登录界面

主界面

4.串口编写

在主界面中打开串口参数对串口参数进行设置。(程序如下)

PrivateSubForm2_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load

Me.Text=串口参数

EndSub

PrivateSubComboBox1_SelectedIndexChanged(ByValsenderAsSystem.Object,ByValeAs

System.EventArgs)HandlesComboBox1.SelectedIndexChanged

Form3.SerialPort1.PortName=ComboBox1.Tex

EndSub

PrivateSubComboBox2_SelectedIndexChanged(ByValsenderAsSystem.Object,ByValeAs

System.EventArgs)HandlesComboBox2.SelectedIndexChanged

Form3.SerialPort1.BaudRate=ComboBox2.Text

EndSub

PrivateSubComboBox3_SelectedIndexChanged(ByValsenderAsSystem.Object,ByValeAs

System.EventArgs)HandlesComboBox3.SelectedIndexChanged

ComboBox3.Text=Form3.SerialPort1.Parity

EndSub

PrivateSubComboBox4_SelectedIndexChanged(ByValsenderAsSystem.Object,ByValeAs

System.EventArgs)HandlesComboBox4.SelectedIndexCh

文档评论(0)

138****5496 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档