【正文】 = False 39。End SubPrivate Sub Command2_Click() = select * from bysj where 時(shí)間= + Str() + and 時(shí)間= + Str() + order by 時(shí)間Set = Adodc1 = FalseEnd SubPrivate Sub Command3_Click() = TrueEnd SubPrivate Sub Timer1_Timer()Set = Adodc1End Sub新建用戶模塊程序：Private Sub Command1_Click()End SubPrivate Sub Command2_Click() 39。第一個(gè)參數(shù) shiduzhi(wenduzhi_k) = shiduzhi(wenduzhi_k + 1) guangzhaozhi(wenduzhi_k) = guangzhaozhi(wenduzhi_k + 1) Next wenduzhi_k wenduzhi(18) = Val() * / 150 shiduzhi(18) = Val() * / 120 + 100 guangzhaozhi(18) = Val() * / 120 + 100 For line_k = 0 To 18 ((time_count) * / 18, / 5 * 4 wenduzhi(line_k))((time_count + 1) * / 18, / 5 * 4 wenduzhi(line_k + 1)), vbWhite ((time_count) * / 18, shiduzhi(line_k))((time_count + 1) * / 18, shiduzhi(line_k + 1)), vbWhite ((time_count) * / 18, guangzhaozhi(line_k))((time_count + 1) * / 18, guangzhaozhi(line_k + 1)), vbRed time_count = time_count + 1 If (time_count * / 18 ) Then time_count = 0 End If Next line_k = Date amp。綠色 End If 39。 39。H8000amp。 in_data(6)) End If If z_start = True Then in_data(ovt) = hk(0) ovt = ovt + 1 End If If 0 Then GoTo xv End If End Select 39。 收到 RThreshold ofchars.xv: Dim hk As Variant hk = 39。本論文是在曾老師的悉心指導(dǎo)下完成的，在論文的撰寫和定稿的整個(gè)過(guò)程中，曾老師付出了極大的心血。整個(gè)課題的開發(fā)過(guò)程主要包括了兩個(gè)方面的內(nèi)容： 一、實(shí)現(xiàn)上位測(cè)控系統(tǒng)與現(xiàn)場(chǎng)測(cè)控系統(tǒng)的通信，完成溫度濕度光照信息的相互交換； 二、采用VB語(yǔ)言編程對(duì)智能溫室上位測(cè)控系統(tǒng)管理系統(tǒng)的設(shè)計(jì)，從而完成溫度濕度光照的查詢、顯示、參數(shù)修改、趨勢(shì)圖等功能。確定窗體文件的名字后，單擊“保存”按鈕，將顯示“工程另存為”對(duì)話框，提示編程人員確定用于保存工程的文件名。并運(yùn)用line函數(shù)進(jìn)行編寫程序，橫坐標(biāo)是時(shí)間，縱坐標(biāo)是每個(gè)時(shí)刻所測(cè)得的值。：開始調(diào)用數(shù)據(jù)庫(kù)在DataGrid控件里顯示數(shù)據(jù)結(jié)束 數(shù)據(jù)顯示程序流程圖 ，DataGrid控件是最靈活、功能最強(qiáng)大的控件之一。選擇“窗格”選項(xiàng)卡，默認(rèn)會(huì)自動(dòng)創(chuàng)建一個(gè)窗格， 設(shè)置第一個(gè)窗格的“樣式”為6sbrDate，顯示當(dāng)前系統(tǒng)的日期。 菜單列表區(qū)就是指菜單項(xiàng)的分級(jí)列表。在使用菜單編輯器之前首先需要啟動(dòng)它，它的啟動(dòng)方式有下面4種形式。 當(dāng)操作人員沒(méi)有用戶名的情況下可以建立新的用戶，但是需要一個(gè)已經(jīng)用擁有賬號(hào)的用戶來(lái)新建，：開始否失敗失敗3次登陸是退出成功新建用戶登陸 新建用戶程序流程圖。datasource= connectionstring連接數(shù)據(jù)也可以在屬性欄里面設(shè)置connectionstring屬性進(jìn)行連接， ADODC連接數(shù)據(jù)庫(kù) 應(yīng)用程序的設(shè)計(jì) 數(shù)據(jù)庫(kù)建立好以后，就可以對(duì)其進(jìn)行各種操作了。ADO Data控件使用Microsoft ActiveX數(shù)據(jù)對(duì)象（ADO）來(lái)快速建立數(shù)據(jù)綁定控件和數(shù)據(jù)提供者之間的連接。由于測(cè)量日期和時(shí)間不會(huì)重復(fù)，所以根據(jù)日期和時(shí)間，可以區(qū)分?jǐn)?shù)據(jù)庫(kù)中的數(shù)據(jù)屬于哪一次檢測(cè)。多點(diǎn)溫度信息管理系統(tǒng)數(shù)據(jù)庫(kù)采用關(guān)系型數(shù)據(jù)庫(kù)，用Access2003開發(fā)。以及將上位測(cè)控系統(tǒng)的數(shù)據(jù)傳輸?shù)浆F(xiàn)場(chǎng)測(cè)控系統(tǒng)中。溫度值 =Val(in_data(3) amp。 MSComm控件通信的流程圖 VB程序編制Private Sub MSComm1_OnComm() Select Case Case EvReceive 39。格式為：=”BBBB,P,D,S”Portopen設(shè)置并返回串口狀態(tài)，也可以打開和關(guān)閉串口Input從接收緩沖區(qū)中讀取數(shù)據(jù)并清空緩沖區(qū)Inputlen設(shè)置并返回一次從接收緩沖區(qū)中讀取字節(jié)數(shù)InBufferSize設(shè)置并返回接收緩沖區(qū)的大小，缺省值為1024字節(jié)InBufferCount設(shè)置并返回接收緩沖區(qū)中等待接收的字符數(shù)InputMode設(shè)置并返回接收數(shù)據(jù)的類型。這種方法的優(yōu)點(diǎn)是程序響應(yīng)及時(shí)，可靠性高。Visual Basic ，為用戶編寫程序簡(jiǎn)化了很多復(fù)雜的程序，其中有一個(gè)用于串口通信的控件MSComm，MSComm控件全稱為Microsoft Communications Control，是Microsoft公司提供的ActiveX控件，目的是為了簡(jiǎn)化Windows下串行通信編程，它既可以用來(lái)提供簡(jiǎn)單的串口端口通信功能，也可以用來(lái)創(chuàng)建功能完備的、事件驅(qū)動(dòng)的高級(jí)通信工具。 RS232標(biāo)準(zhǔn)規(guī)定的波特率為：50、7100、150、300、600、1200、4800、9600和19200bps。本系統(tǒng)采用DB9型連接器，通過(guò)三根線實(shí)現(xiàn)系統(tǒng)連接，即接收數(shù)據(jù)引腳與發(fā)送數(shù)據(jù)引腳彼此交叉相連，信號(hào)地對(duì)應(yīng)相接。它是衡量串行數(shù)據(jù)傳輸快慢的重要指標(biāo)。并行通信速度快、實(shí)時(shí)性好，但占用的口線多、成本高、通信距離短，不適用于小型化產(chǎn)品。同時(shí)也有很好的兼容性，能很好的兼容VB等編程語(yǔ)言。下面簡(jiǎn)單介紹一下PC機(jī)的優(yōu)缺點(diǎn)： PC機(jī)是管理、控制和監(jiān)督計(jì)算系統(tǒng)軟、硬件資源協(xié)調(diào)運(yùn)行的程序系統(tǒng)，由一系列具有不同控制和管理功能的程序組成，它是直接運(yùn)行在計(jì)算系統(tǒng)硬件上的、最基本的系統(tǒng)軟件，是系統(tǒng)軟件的核心。 （4）抗干擾能力和可靠性能力都強(qiáng)，遠(yuǎn)高于其他各種系統(tǒng)型。 下位測(cè)控系統(tǒng)的操作硬件可以使用PLC、PC機(jī)等，軟件可以使用PLC編程軟件、VB等?，F(xiàn)場(chǎng)測(cè)控系統(tǒng)的方案選擇如下： （1）選擇AT89C52單片機(jī)，了解其基本特性和功能，使用AT89C52實(shí)現(xiàn)對(duì)溫濕度、光照量的智能控制。這就要求計(jì)算系統(tǒng)具有能從現(xiàn)場(chǎng)發(fā)出控制命令或獲取實(shí)際數(shù)據(jù)的能力,這些功能的實(shí)現(xiàn)可以通過(guò)對(duì)計(jì)算系統(tǒng)串口的操作完成的,簡(jiǎn)單來(lái)說(shuō)就是智能溫室測(cè)控系統(tǒng)必須實(shí)現(xiàn)計(jì)算系統(tǒng)對(duì)串口的控制與訪問(wèn)。 5) 設(shè)施水平低，抵御自然災(zāi)害的能力差。從設(shè)施裝備到栽培技術(shù)的生產(chǎn)管理不配套，生產(chǎn)不規(guī)范，難以形成大規(guī)模商品生產(chǎn)。環(huán)境控制計(jì)算系統(tǒng)主要用來(lái)對(duì)溫室環(huán)境(氣象環(huán)境和栽培環(huán)境)進(jìn)行監(jiān)測(cè)和控制。幼苗期最耐陰，但栽后第四年則可除去遮陰物，在強(qiáng)光下生長(zhǎng)，利于根部生長(zhǎng)。濕度另一方面決定于空氣溫度。16 MSComm控件處理通信的方式 16 MSComm控件的常用屬性 16 MSComm控件的使用 18 VB程序編制 18第4章 上位測(cè)控系統(tǒng)軟件系統(tǒng) 20 上位測(cè)控系統(tǒng)信息管理系統(tǒng)功能 20 數(shù)據(jù)庫(kù)的設(shè)計(jì) 21 Access數(shù)據(jù)庫(kù)的設(shè)計(jì) 21 VB操作Access數(shù)據(jù)庫(kù)的方法 23 應(yīng)用程序的設(shè)計(jì) 24 用戶管理模塊設(shè)計(jì) 25 28 實(shí)時(shí)數(shù)據(jù)顯示模塊的設(shè)計(jì) 31 查詢模塊的設(shè)計(jì) 32 歷史數(shù)據(jù)趨勢(shì)圖模塊的設(shè)計(jì) 33 34 保存程序以及建立可執(zhí)行文件 36總結(jié)與展望 38參考文獻(xiàn) 39致 謝 41附錄 程序清單 42 摘 要 基于現(xiàn)場(chǎng)測(cè)控系統(tǒng)實(shí)現(xiàn)溫度濕度光照信號(hào)的上位測(cè)控系統(tǒng)，首先分析了在Visual Basic 編程環(huán)境中實(shí)現(xiàn)上位測(cè)控系統(tǒng)與現(xiàn)場(chǎng)測(cè)控系統(tǒng)之間的串口通信技術(shù)，介紹了如何通過(guò)MSComm控件實(shí)現(xiàn)兩者之間的通信，現(xiàn)場(chǎng)測(cè)控系統(tǒng)將數(shù)據(jù)送至串口，上位測(cè)控系統(tǒng)通過(guò)程序?qū)?shù)據(jù)取走并將其保存在數(shù)據(jù)庫(kù)中。關(guān)鍵詞: VB 現(xiàn)場(chǎng)測(cè)控系統(tǒng) 串口通信 數(shù)據(jù)庫(kù)Abstract MCUbased PC monitor temperature and dampness and beam signal first analyzed the Visual Basic programming environment in the host puter and serial munication between MCU，and describes how the API functions for munication between PC and MCU, Serial data sent to the microcontroller, PC taken away by the program and save the data in the database and gives the collection of the system code. Then introduces the VB and ACCESS connections, and describes the relevant controls and implementation methods, the test results are given to ver ify the effectiveness and feasibilit y of the methods finally. The shakedown test application shows that this design performance is stable and the contact surface is Intelligent greenhouse puter system has good humanputer interface, good mon, simple and convenient operation. It is easy to implement centralized monitoring and management of the temperature. The system has a very extensive application prospect in the theory. Keywords: VB MCU Serial Communication Database第1章 緒論 課題背景 由于植物只有在合適的環(huán)境下生長(zhǎng)，所以不同植物只有在溫度濕度光照適宜的季節(jié)生長(zhǎng)，為了在一年四季都可以得到只在適宜季節(jié)才生長(zhǎng)的植物，則發(fā)明了溫室系統(tǒng)，溫室系統(tǒng)里面的環(huán)境與外界隔絕，由人工控制溫室內(nèi)部的溫度濕度光照來(lái)滿足植物生長(zhǎng)多需要的外界環(huán)境，其中影響植物生長(zhǎng)的因素很多，目前科學(xué)家已經(jīng)確定了52種因素，如土壤有系統(tǒng)質(zhì)、土壤水分、根層深度、溫度、濕度、光照度、風(fēng)速等等，所以掌握植物生長(zhǎng)環(huán)境中的這些因素是很重要的，溫度、濕度、光照