【正文】 編譯方法是：依次選擇“文件”菜單的“生成工程 ”命令（這里的“工程1”是工。 沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 34 工程文件（ *.vbp） ； 窗體文件（ *.frm） ； 二進制窗體文件（ *.frx） ； 標(biāo)準(zhǔn)模塊文件（ *.bas） ； 類模塊文件（ *.cls） 。 Visual Basic 把用來構(gòu)造一個應(yīng)用程序的所有相關(guān)文件稱為一個工程（ Project）。確定窗體文件的名字后，單擊“保存”按鈕，將顯示“工程另存為”對話框，提示編程人員確定用于保存工程的文件名。 要保存應(yīng)用程序，可單擊標(biāo)準(zhǔn)工具欄的“保存工程”按鈕。 Command Command1 Caption=確認 保存應(yīng)用程序 當(dāng)應(yīng)用程序編寫完后，就應(yīng)該將其保存起來。 沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 33 圖 “關(guān)于 ”窗體 控件的主要屬性和作用如表 所示。 創(chuàng)建好的數(shù)據(jù)報表界面如圖 所示。 6. 從每一個 TextBox 控件創(chuàng)建時所在的部分上將 TextBox 控件拖動到數(shù)據(jù)報表設(shè)計器的不同部分上。Command 對象包含的所有數(shù)據(jù)字段，都作為 Command 對象被放下的部分中的 TextBox 控件，被自動創(chuàng)建在數(shù)據(jù)報表上。 在檢索結(jié)構(gòu)之后，將創(chuàng)建適當(dāng)數(shù)目的分組標(biāo)頭和注腳，而且每一標(biāo)頭 /注腳對被指定一個對應(yīng)于一個 Command 沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 32 對象的名字。 3. 設(shè)置 DataMember 屬性為最頂層的 Command 對象。 創(chuàng)建一個數(shù)據(jù)報表的步驟為： 1. 創(chuàng)建一個包含 Command 對象層次結(jié)構(gòu)的數(shù)據(jù)環(huán)境設(shè)計器。數(shù)據(jù)報表不僅僅是數(shù)據(jù)簡單、直接的輸出，它還包括對數(shù)據(jù)的一些額外操作，如數(shù)據(jù)匯總。 Line 方法可以在窗體或圖片框指定位置上，按指定的顏色畫直線或者曲線。沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 31 (xLeft,yTop)表示對象的左上角的坐標(biāo)值， (xRight,yBottom)表示對象右下角的坐標(biāo)值。 Scale方法是自定義坐標(biāo)系統(tǒng)最常用的方法，用來定義 Form、 PictureBox 或 Printer 的坐標(biāo)系統(tǒng)。不同規(guī)格的坐標(biāo)系統(tǒng)只是度量單位和精度改變，坐標(biāo)軸的長度或者圖區(qū)域的大小并不因此而改變。在 VB 中，包括系統(tǒng)標(biāo)準(zhǔn)坐標(biāo)系統(tǒng)和用戶自定義坐標(biāo)系統(tǒng)。下面介紹趨勢圖模塊的建立。如圖 所示。在數(shù)據(jù)庫顯示界面里可以進行用戶信息的以及溫度信息的添加、修改、刪除和瀏覽等功能。使用 DataGrid 控件無須編寫任何代碼，只要綁定到 ADO 控件上，就可以實現(xiàn)數(shù)據(jù)的新增、修改、刪除和瀏覽，還可以對數(shù)據(jù)進行格式化、鎖定等。 圖 StatusBar控件屬性頁 顯示模塊以及數(shù)據(jù)庫顯示模塊的設(shè)計 完整的溫度信息顯示采用類似于電子數(shù)據(jù)表的 DataGrid 控件實現(xiàn)。單擊“插入窗格”按鈕，插入一個表格，在第三個窗格的“文本”中輸入設(shè)計者：姚維丹。選擇“窗格”選項卡，默認會自動創(chuàng)建一個窗格，設(shè)置第一個窗格的“樣式”為 6sbrDate，顯示當(dāng)沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 28 前系統(tǒng)的日期。 圖 工具箱中的 StatusBar控件 將 StatusBar 控件添加到窗體上，用鼠標(biāo)右鍵單擊該控件，在彈出的快捷菜單中選擇“屬性”命令，即可彈出“屬性頁”對話框。 StatusBar 控件是 Active 控件，在使用該控件之前需要先將其添加到工具箱中。該窗體通常位于父窗體的底部，通過這一窗體，應(yīng)用程序能顯示各種數(shù)據(jù)。將子菜單單項縮進以指出它們的分級位置或等級。 菜單編輯區(qū) 是指中間的 7 個按鈕，主要用于對已經(jīng)輸入的菜單進行簡單的編輯操作。其主要屬性有標(biāo)題、名稱、索引以及快捷鍵。其中包括三個區(qū)域：菜單屬性設(shè)置區(qū)、菜單編輯區(qū)、菜單列表區(qū)。 （ 1） 選擇“工具” /“菜單編輯器”命令； （ 2） 在“標(biāo)準(zhǔn)”工具欄上選擇“菜單編輯器”圖表； （ 3） 用鼠標(biāo)右鍵單擊要添加的菜單窗體，在彈出的快捷菜單中選擇“菜單編輯器”命令； （ 4） 利用快捷鍵 {Ctrl+E}來調(diào)用“菜單編輯器”。菜單欄是通過 VB 中的菜單編輯器設(shè)計的；狀態(tài)欄用于顯示系統(tǒng)日期、時間和設(shè)計信息，通過 StatusBar 控件實現(xiàn)。系統(tǒng)的主界面如圖 所示。 圖 添加新用戶界面 主界面的設(shè)計 為了方便地管理系統(tǒng)程序，且占有教少的系統(tǒng)資源，我們采用多文檔界面 MDI進行主界面的設(shè)計。 所示。 所示。 系統(tǒng)功能模塊設(shè)計 系統(tǒng)功能模塊主要完成兩個功能：用戶管理和退出系統(tǒng)。 沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 24 圖 用戶登陸界 面 在空白窗體上，添加 2 個 Label 控件、 2 個 TextBox 控件、 1 個 ADODC 控件。如果失敗達三次，則自動退出系統(tǒng)。 選擇新建“標(biāo)準(zhǔn) EXE”，執(zhí)行“打開”命令，進入 Visual Basic 工程集成開發(fā)環(huán)境，窗體設(shè)計器會自動出現(xiàn)一個 Form1 的空白窗體，如圖 所示。下文將分別介紹在 Microsoft Visual 集成環(huán)境下各個模塊的設(shè)計過程。用戶信息表中的信息是事先填寫好的。我們設(shè)計了一個程序?qū)崿F(xiàn)了將文本文件中的內(nèi)容轉(zhuǎn)換到 Access 數(shù)據(jù)庫中。 amp。 RecordSource 屬沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 22 性包含一條語句或一個表格名稱，用于決定從數(shù)據(jù)庫檢索什么信息。 ADO Data 控件屬性很多，其中 ConnectionString 屬性和 RecordSource 屬性是兩個非常重要的屬性 。數(shù)據(jù)綁定控件是任何具有數(shù)據(jù)源屬性的控件。 所以，本文選擇 ADO Data 控件來訪問數(shù)據(jù)庫，進行數(shù)據(jù)庫的操作。 RDO（ Remote Data Objects）遠程數(shù)據(jù)對象是一個到 ODBC 的面向?qū)ο蟮臄?shù)據(jù)訪問接口，有了 Visual 以后， RDO 已逐步被 ADO 替代。它比 Data 控件功能強大，不僅可以打開、訪問并操縱已有的數(shù)據(jù)庫，而且可以創(chuàng)建數(shù)據(jù)庫 、表和索引。 Microsoft Visual 提供了三種不同的訪問數(shù)據(jù)庫接口： DAO數(shù)據(jù)存取對象、 RDO 遠程數(shù)據(jù)對象、 ADOActiveX 數(shù)據(jù)對象。由于測量日期和時間不會重復(fù)，所以根據(jù)日期和時間，就可 以區(qū)分數(shù)據(jù)庫中的數(shù)據(jù)屬于哪一次檢測。兩個表的結(jié)構(gòu)分別如表 所示。 根據(jù)該系統(tǒng)的功能，我設(shè)計了兩個表：用戶信息表和溫度信息表。 Access2021 是開發(fā)中小型數(shù)據(jù)庫的首選數(shù)據(jù)庫管理系統(tǒng)，使用它可以很方便的設(shè)計 出一個出色的關(guān)系數(shù)據(jù)庫，而且 VB 可以通過 ADO data 對象建立對 Access 類型數(shù)據(jù)庫的快速連接。它能以最佳方式、最少的重復(fù)、最大的獨立性為多種應(yīng)用提供共享服務(wù)。 多點溫度信息管理系統(tǒng)軟件運行在 PC機上，開發(fā)平臺采用 Microsoft Visual ，下面將詳細介紹各個模塊的實現(xiàn)過程。 用 戶 登 錄開 始失 敗 達 三 次 退 出 程 序主 界 面串行通信生成數(shù)據(jù)庫查詢顯示趨勢圖報表重 試否是成 功失 敗 圖 多點溫度信息管理系統(tǒng)軟件總體框圖 沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 20 為防止不相關(guān)人員隨意打開本軟件修改，刪除檢測結(jié)果，所以軟件運行后，首先設(shè)計了登陸對話框，要求輸入用戶名和密碼，輸入正確后才能進入該軟件的主界面。多點溫度信息管理系統(tǒng)主要包括以下功能： ； ； 、顯示、趨勢圖、報表生成等處理功能。 OnComm 事件程序如下： Private Sub MSComm1_OnComm() Dim buffer As Variant Dim arr() As Byte Dim i As Integer, a As Integer Dim restr1 As String, restr2 As String, srestr3 As String, ABC As String a = Select Case Case EvReceive buffer = arr = buffer For i = 0 To 18 Step 3 restr1 = arr(i) restr2 = arr(i + 1) restr3 = arr(i + 2) If restr2 = 127 And restr3 = 240 Then = = Str(Now) + + restr1 + + 測量有誤 + + Chr(13) + Chr(10) Else If Val(restr3) = 0 Then ABC = . + Mid$(Str(Val(restr3) / 256), 2, 3) Else ABC = Mid$(Str(Val(restr3) / 256), 2, 3) End If = + Str(Now) + + restr1 + + restr2 + ABC + + Chr(13) + Chr(10) End If Next i End Select End Sub 沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 19 第 4章 多點溫度信息管理系統(tǒng) 多點溫度監(jiān)控系統(tǒng)下位機采集檢測的溫度為本上位機提供了數(shù)據(jù)，多點溫度信息管理系統(tǒng)將實現(xiàn)對這些數(shù)據(jù)的查詢、顯示、趨勢圖、報表生成等處理功能，建立一個易于使用、易于管理的人機交互界面。如果系統(tǒng)初始化不正?；?DS18B20 的 DDV 端脫開未接好時，轉(zhuǎn)換出的溫度為默認初始值 +85℃，溫度高低字節(jié)為 05H 和 50H。我們在 OnComm 事件里進行溫度數(shù)據(jù)的接收和轉(zhuǎn)換。 發(fā)送程序為： Dim rece As String rece = If Mid(rece, 1, 1) = S Then = amp。打開串口 = True End If End Sub 初始化完成后， PC 機就可以與單片機進行通信了。設(shè)置接收緩沖區(qū) 1024Byte = 0 39。設(shè)置通訊窗口 = 9600,N,8,1 39。本系統(tǒng)中，有關(guān)通信的工作過程主要有：通信參數(shù)初始化、發(fā)送握手信號、接收數(shù)沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 17 據(jù)。單片機收 到 PC 機發(fā)送的握手信號“ S”后，就依次命令 DS18B20 進行溫度轉(zhuǎn)換； PC 機依次接收單片機上傳過來的數(shù)據(jù)，并顯示在特定區(qū)域。 DS18B20 轉(zhuǎn)換出的溫度信息包含兩個字節(jié)，經(jīng)過處理后，一個字節(jié)為溫度的整數(shù)部分，另一個字節(jié)為溫度的小數(shù)部分。 圖 PC與硬件單片機的連接電路圖 通信協(xié)議 為使數(shù)據(jù)在 PC 和單片機之間無差錯的傳送，本文采用通信協(xié)議來規(guī)約數(shù)據(jù)的傳輸。由于 RS232 電平與 TTL電平不兼容，本系統(tǒng)通過 MAX232 芯片實現(xiàn) TTL 電平到 RS232 電平的轉(zhuǎn)換， MAX232 芯片是包含兩路接收器和驅(qū)動器的 RS232 電平轉(zhuǎn)換芯片，適用于各種 232 通信接口。溫度數(shù)據(jù)的轉(zhuǎn)換主要實現(xiàn)對接受到的溫度數(shù)據(jù)由十六進制到十進制的轉(zhuǎn)換 ，同時這一步也為后面的數(shù)據(jù)庫的生成及溫度信息管理工作做好了準(zhǔn)備。上位機軟件用 VB 編寫，主要完成通信參數(shù)設(shè)置和溫度數(shù)據(jù)的轉(zhuǎn)換。下位機程序用匯編語言編寫，固化在 AT89SC51 單片機中。編寫 程序時，只需要按照下面流程圖，即可實現(xiàn)通信功能。 表 CommEvent通信事件代碼、常數(shù)及含義表 事件代碼 常值 含義 1 ComEvRecive 接收到 Rthreshold 個字符。用戶程序就可在 OnComm 事件處理程序中針對 不同的代碼，進行相應(yīng)的處理。其值為 0 和 1 時，分別表示通過 Input 屬性以文本方式和二進制方式取回數(shù)據(jù) OutBufferSize 設(shè)置并返回發(fā)送緩沖區(qū)的大小，缺省值為 512 字節(jié) OutBufferCount 設(shè)置并返回發(fā)送緩沖區(qū)中等待計算機發(fā)送的字符數(shù) Output 向發(fā)送緩沖區(qū)發(fā)送數(shù)據(jù)，該屬性設(shè)計時無效，運行時只讀 Rthreshold 在 MSComm 控件設(shè)置 ConunEvent 屬性為 EvReceive 并產(chǎn)生 OnComm 之前，設(shè)置并返回要接收的字符數(shù) 其中 CommEvent 屬性是一個非常重要的屬性。 沈陽航空工業(yè)學(xué)院畢業(yè)設(shè)計（論文） 13 表 MSComm控件的主要屬性 屬性 描述 Commport 設(shè)置并返回通信串口號 Settings 以字符串的形式設(shè)置并返回串口波特率、奇偶校驗、數(shù)據(jù)位、停止位。 MSComm 控件的常用屬性 對控件編程首先需要了解它的屬性和事件。查詢方 式的編程可用計時器或Do? Loop 程序?qū)崿F(xiàn)。 查詢方式 在程序的每個關(guān)鍵功能完成之后，可以通過檢查 CommEvent 屬性的值來查詢事件和錯誤。在程序設(shè)計中，可以在 OnComm 事件處理函數(shù)中加入自己的處理代碼，一旦事件發(fā)生即可自動執(zhí)行該段程序。 事件驅(qū)動方式 事件驅(qū)動通信是處理串行端口交