【導(dǎo)讀】獨(dú)立進(jìn)行研究工作所取得的成果，成果不存在知識產(chǎn)權(quán)爭議。已經(jīng)發(fā)表或撰寫過的作品成果。對本文的研究做出重要貢獻(xiàn)的個(gè)人和集體。均已在文中以明確方式標(biāo)明。此聲明的法律后果由本人承擔(dān)。利用卡爾曼濾波預(yù)測物體移動的速度、角度，確定物體下一時(shí)刻的位置，同時(shí)，卡爾曼濾波也是控制理論以及控制系統(tǒng)工程中的一個(gè)重要話。此論文主要是通過介紹卡爾曼濾波的原理，結(jié)合實(shí)際建立。結(jié)合路面目標(biāo)跟蹤的實(shí)際，卡爾曼濾波是以最小均方誤差為估計(jì)的。關(guān)于最優(yōu)估計(jì)問題，在20世紀(jì)40年代初，維納提出最優(yōu)線性濾波，稱為維納濾波。特別對于非平穩(wěn)過程，維納濾波問題變得更為復(fù)雜。維納濾波屬于整段濾波，即把整個(gè)一段時(shí)間內(nèi)所獲得的測量數(shù)據(jù)存儲?？柭鼮V波是遞推濾波，由遞推方程。因此對計(jì)算機(jī)來說，卡爾曼濾波的計(jì)算量和存儲量大為減少，從而比較容易滿足實(shí)時(shí)計(jì)算的要求。因而卡爾曼濾波在工程實(shí)踐中迅速得到

　　

【正文】 mp。 數(shù)據(jù)保存 .txt，不過一開始的時(shí)候程序改了還是不能運(yùn)行，最后我又上網(wǎng)下了一點(diǎn)相對路徑方面的知識，終于發(fā)現(xiàn)了自己的錯(cuò)誤，改相對路徑的時(shí)候“數(shù)據(jù)保存 .txt”必須和程序在同一個(gè)文件夾里。 系統(tǒng)方案設(shè)計(jì)的窗體界面 此界面是在老師的幫助下一步步改進(jìn)和完善的，基本完成了設(shè)計(jì)要求的任務(wù)。 程序運(yùn)行過程中通過觀察軟件界面上溫度數(shù)據(jù)的變化規(guī)律 ,操作人員可以對當(dāng)前正在進(jìn)行的魯東大學(xué)畢業(yè)設(shè)計(jì) 14 實(shí)驗(yàn)情況有一個(gè)清楚的了解，這也有助于逼真、形象的顯示采集的溫度數(shù)據(jù)。 圖 5 程序窗體界面 圖 6 代碼程序 魯東大學(xué)畢業(yè)設(shè)計(jì) 15 圖 7 運(yùn)行所采集的畫面 6 小節(jié) 本界面顯示系統(tǒng)采用總體到局部，逐步完善的方法，用硬件描述語言 VB 完成。該系統(tǒng)界面清晰，模塊分明，易于實(shí)現(xiàn)溫度數(shù)據(jù)采集、顯示和保存等功能。但是本系統(tǒng)也有不足的地方，就是串口選擇不太完善，數(shù)據(jù)的保存不能達(dá)到我所期望的目標(biāo)，我 期望的是當(dāng)數(shù)據(jù)發(fā)生變化時(shí)自動保存一次，并且有時(shí)間顯示，我們可以了解到溫度在何時(shí)發(fā)生變化的，這有待改進(jìn)?？傮w上說，本設(shè)計(jì)系統(tǒng)能夠?qū)崿F(xiàn)溫度數(shù)據(jù)采集、顯示和保存的基本功能，能夠較好的進(jìn)行功能擴(kuò)展。 參考文獻(xiàn) ： [1] 崔武子，齊華山，于寧．界面設(shè)計(jì)與 Visual Basic[M]．北京：清華大學(xué)出版社， 2020 [2] 唐大仕． Visual Basic程序設(shè)計(jì) [M]．北京：清華大學(xué)出版社， 2020 [3] 邊海龍，賈少華． [M]．北京：人民郵電出版社， 2020 [4] 仵浩，齊燕杰 ． Visual Basic串口通信工程開發(fā)實(shí)例導(dǎo)航 [M]．北京：人民郵電出版魯東大學(xué)畢業(yè)設(shè)計(jì) 16 社， 2020． [5] 范逸之，陳立元，孫德營．利用 Visual Basic實(shí)現(xiàn)串并行通信技術(shù) [M]．北京：清華大學(xué)出版社， 2020 [6] 李光忠．基于單片機(jī)的溫濕度檢測系統(tǒng)的設(shè)計(jì) [D]．濟(jì)南：山東大學(xué)， 2020. [7] 曹真貫．基于 USB接口的數(shù)據(jù)采集系統(tǒng)的設(shè)計(jì) [D]．淮南：安徽理工大學(xué)， 2020 [8] 于克龍，畢小龍，邱立峻．?dāng)?shù)組溫度傳感器 DS18B20的應(yīng)用 [J].Machine Building amp。 Automation， 2020， 33(2) ： 4749. [9] 程安宇，孫士民，徐洋．基于 DS18B20的單片機(jī)溫度測量控制系統(tǒng) [J]. 自動測量與控制， 2020， 26（ 2） [10] 潘笑，高玉玲，康亞娜．基于模糊 PID 的 AT89C2051單片機(jī)智能溫度控制系統(tǒng) [J]. 兵工自動化， 2020， 3（ 5）： 6567. [11] 基于 DS18B20 數(shù)字溫度傳感器的設(shè)計(jì)與實(shí)現(xiàn) [12] DS18B20 數(shù)字溫度傳感器應(yīng)用詳解 [13] 金偉正．單線數(shù)字溫度傳感器的原理及應(yīng)用 [J ]．電子技術(shù)應(yīng)用， 2020 ， 3 （ 6）：9296 致謝 論文在軟件編程設(shè)計(jì)和寫作的過程中，周 XX 老師 給我提供了相關(guān)資料， 多次詢問設(shè)計(jì) 進(jìn)程，幫助我開拓 設(shè)計(jì) 思路 。而且每周三傍晚都會組織我們開會，幫助我們解決實(shí)際過程中遇到的一些問題，還對我們已完成的一些設(shè)計(jì)要求提出更完善的建議，在此非常感謝周老師。在做程序調(diào)試的時(shí)候，周老師又不厭其煩的一次次幫我看程序、給我指導(dǎo)， 同時(shí)還在思想、生 活上給我以無微不至的關(guān)懷 ， 令我很感動。 周老師淵博 的學(xué)識 、嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神 、 靈活的思維方式 、 耐心細(xì)致的言傳身教 、無私的奉獻(xiàn)精神 及 精益求精的工作作風(fēng) 使我深受的啟迪。從尊敬的導(dǎo)師身上，我不僅學(xué)到了扎實(shí)、寬廣的專業(yè)知識，也學(xué)到了做人的道理，在此我要向我的導(dǎo)師致以最衷心的感謝和深深的敬意。另外 還要感謝在論文的軟件編程設(shè)計(jì)過程中給予我指導(dǎo)、幫助的李 XX 和王 XX 同學(xué)，他們那種刻苦認(rèn)真、勤奮進(jìn)取的精神讓我學(xué)到了很多。 同時(shí)特別感謝我的班主任印 XX 老師這四年來對我的關(guān)心和幫助，感謝父母對我二十多年來辛勤的養(yǎng)育 ! 魯東大學(xué)畢業(yè)設(shè)計(jì) 17 最后，我要向在 百忙之中抽時(shí)間對本文進(jìn)行審閱、評議和參加本人論文答辯的各位老師表示感謝！ 魯東大學(xué)畢業(yè)設(shè)計(jì) 18 附錄：部分關(guān)鍵源程序代碼 39?？刂茰y溫按扭 Private Sub Command1_Click() If = 停止測溫 Then = False 39。關(guān)閉串口 = 開始測溫 Else = True 39。打開串口 = 停止測溫 End If End Sub 39。退 出系統(tǒng) Private Sub Command2_Click() Unload Me End Sub 39。數(shù)據(jù)保存與停止 Private Sub Command3_Click() If = 保存數(shù)據(jù) Then Open amp。 \ amp。 數(shù)據(jù)保存 .txt For Append As 1 39。相對路徑 = 停止保存 Else Close 1 39。關(guān)閉 = 保存數(shù)據(jù) End If End Sub 39。初始化代碼 Private Sub Form_Load() = 4 39。設(shè)置串口 4 = 19200,n,8,1 39。波特率 19200bit/s, 無校驗(yàn) , 8 位數(shù)據(jù)， 1位停止位 = 0 39。讀取接收緩沖區(qū)的所有字符 = 1024 39。設(shè)置接收緩沖區(qū)為 1024 字節(jié) 魯東大學(xué)畢業(yè)設(shè)計(jì) 19 = 512 39。設(shè)置發(fā) 送緩沖區(qū)為 512 字節(jié) = True 39。打開串口 = 0 39。不觸發(fā)發(fā)送事件 = 1 39。每個(gè)字符到接收緩沖區(qū)都觸發(fā)接收事件 = 0 39。清除發(fā)送緩沖區(qū)數(shù)據(jù) = 0 39。清除接收緩沖區(qū)數(shù)據(jù) = 39。清空接收文本框 End Sub 39。接收數(shù)據(jù) Private Sub msm_onm() Dim str, numb As String Select Case 39。 檢驗(yàn)串口事件 39。錯(cuò)誤處理 Case EventOverrun 39。數(shù)據(jù)丟失 = 39。清空接收緩沖區(qū) Exit Sub Case EventRxOver 39。接收緩沖區(qū)溢出 = 39。清空接收緩沖區(qū) Exit Sub Case EventTxFull 39。發(fā)送緩沖區(qū)滿 = 39。清空接收緩沖區(qū) Exit Sub 39。事件處理 Case EvReceive 39。接收緩沖區(qū)內(nèi)有數(shù)據(jù) str = 39。從接受隊(duì)列中讀入字符串 End Select If str = NO Devic Then str = = 沒有檢測到感溫元件 End If If str = e Then str = = 沒有檢測到感溫元件 End If 魯東大學(xué)畢業(yè)設(shè)計(jì) 20 If str = p Then str = = + 39。讀出字符串送顯 End If If str = n Then str = = 39。讀出字符串送顯 End If = + str 39。讀出字符串送顯 End Sub 39。時(shí)間設(shè)置 Private Sub Timer1_Timer() = Now() If = 停止保存 Then Print 1, , End If End Sub