AT89S52单片机温度控制监视软件的设计+VB源代码(9)
图4.3.5 主界面
在使用菜单编辑器之前首先需要启动它，它的启动方式有下面4种形式。
（1）选择“工具”/“菜单编辑器”命令；
（2）在“标准”工具栏上选择“菜单编辑器”图表；
（3）用鼠标右键单击要添加的菜单窗体，在弹出的快捷菜单中选择“菜单编辑器”命令；
（4）利用快捷键{Ctrl+E}来调用“菜单编辑器”。
打开的菜单编辑器如图4.3.6所示。其中包括三个区域：菜单属性设置区、菜单编辑区、菜单列表区。
菜单属性设置区是指在菜单编辑器中分隔条上面的部分，它主要用于设置菜单的相关属性。其主要属性有标题、名称、索引以及快捷键。其中标题和名称属性是必须要设置的，其他的属性可以采用默认值，或者不需设置。
菜单编辑区是指中间的7个按钮，主要用于对已经输入的菜单进行简单的编辑操作。
菜单列表区就是指菜单项的分级列表。将子菜单单项缩进以指出它们的分级位置或等级。
图4.3.6 菜单编辑器
StatusBar控件提供窗体。该窗体通常位于父窗体的底部，通过这一窗体，应用程序能显示各种数据。StatusBar最多能被分成16个Panel对象，这些对象包含在Panels集合中。StatusBar控件是Active控件，在使用该控件之前需要先将其添加到工具箱中。选择“工程”/“部件”命令，在弹出的对话框中选中Microsoft Windows Common Controls 6.0(SP6)项，即可将一组控件添加到工具箱中。
将StatusBar控件添加到窗体上，用鼠标右键单击该控件，在弹出的快捷菜单中选择“属性”命令，即可弹出“属性页”对话框。如图4.3.7所示。选择“窗格”选项卡，默认会自动创建一个窗格，设置第一个窗格的“样式”为6-sbrDate，显示当前系统的日期。单击“插入窗格”按钮，插入一个表格，设置第二个窗格的“样式”为5-sbrTime，用于显示时间。单击“插入窗格”按钮，插入一个表格，在第三个窗格的“文本”中输入设计者：王晓骏。单击“插入窗格”按钮，插入一个表格，在第四个窗格的“文本”中输入指导教师：赵玉昆。
图4.3.7 StatusBar控件设置
4.3.4 显示模块以及数据库显示模块的设计
本小节主要介绍温度信息的显示和保存。
本系统采用了温度传感器DS18B20。DS18B20的分辨率是0.0625，读到的温度数值要乘以0.0625才能得到真实的温度值。而且DS18B20的温度是用12位表示的，最高位表示正负。但一般8位的单片机只能读两次，共16位，也就是说其中有4位是多余的。所以从下位机上传到上位机的数据需要经过处理才能得到十进制的温度数值，语句如下：
datatemp(num) = Val("&H" & Mid(Buffer, 3, 3) & Mid(Buffer, 1, 2)) * 0.0625
数据转换之后，便是将温度信息保存到数据库中，先建立与数据库的连接，接着通过循环语句，将得到的温度信息不断保存到数据库中。语句如下：
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("测量日期") = Format(Now(), "yyyy-MM-dd")
Adodc1.Recordset.Fields("测量时间") = Format(Now(), "HH:MM:SS")
Adodc1.Recordset.Fields("实时温度") = Format$(datatemp(num), "0.0")
Adodc1.Recordset.Update
Adodc1.Refresh
完整的温度信息显示采用类似于电子数据表的DataGrid控件实现。设置好的界面如图4.3.8所示：