【正文】 .CellAlignment = 4 .Row = 1 End With Next End Sub Public Sub showdata(num As Integer) 39。 這樣做的好處是可以大大提高效率，如果每次啟動(dòng)都要重新檢索數(shù)據(jù)庫，則要花費(fèi)大量的時(shí)間 If IsBeginS = False Then 39。 以下代碼是用來把在數(shù)據(jù)庫的所有不同的車站顯示在起始站中 39。在打開一個(gè)窗體時(shí)， Microsoft Access 將從一個(gè)或多個(gè)表中檢 索數(shù)據(jù)，并使用用戶在 “ 窗體向?qū)?” 選擇的版面布局或所創(chuàng)建的版面布局，將窗體顯示在屏幕上。如果要從查詢、窗體或報(bào)表中的多個(gè)表中將數(shù)據(jù)合并在一起，就要定義各個(gè)表之間的關(guān)系。 結(jié)構(gòu)化查詢語言 SQL（ Structured Query Language）是一種介于關(guān)系代數(shù)與關(guān)系演算之間的語言，其功能包括查詢、操縱、定義和控制四個(gè)方面，是一個(gè)通用的、功能極強(qiáng)的關(guān)系數(shù)據(jù)庫語言。 二、 利用 adodc（ ADO Data Control)進(jìn)行數(shù)據(jù)庫鏈 接： 使用 adodata 控件訪問數(shù)據(jù)庫可以完全不用編寫代碼 ,只需要通過簡單的設(shè)置和操作其屬性就可以實(shí)現(xiàn)與數(shù)據(jù)庫的連接 ,通過綁定數(shù)據(jù)感知控件 ,就能提供一個(gè)訪問數(shù)據(jù)庫的界面 ,用來實(shí)現(xiàn)對數(shù)據(jù)庫的瀏覽 ,貼加 ,刪除 ,修改等操作 . 三、 利用 DAO 對數(shù)據(jù)庫進(jìn)行操縱 : 在 visual basic 中提供了兩種與 jet數(shù)據(jù)引擎接口的方法 :data控件與數(shù)據(jù)訪問對象 (DAO)DAO 是 database object 的英文縮寫 ,要訪問數(shù)據(jù)庫一方面數(shù)據(jù)庫要提供訪問接口 ,另一方面要在編程環(huán)境中有對數(shù)據(jù)庫的支持 . DAO 模型是設(shè)計(jì)關(guān)系數(shù)據(jù)庫 系統(tǒng)結(jié)構(gòu)的對象類的集合 .他們提供了管理關(guān)系型數(shù)據(jù)庫系統(tǒng)所需要的全部操作屬性和方法 ,這其中包括建立數(shù)據(jù)庫 ,定義表 ,字段和建立表間關(guān)系 ,定位和查詢數(shù)據(jù)庫等 . 關(guān)系數(shù)據(jù)庫 介紹 : 關(guān)系數(shù)據(jù)庫是目前各類數(shù)據(jù)庫中最重要、最流行的數(shù)據(jù)庫，他應(yīng)用數(shù)學(xué)方法來處理數(shù)據(jù)庫數(shù)據(jù)，是目前使用最廣泛的數(shù)據(jù)庫系統(tǒng)。三是 : 利用 DataEnvironment 進(jìn)行數(shù)據(jù)庫鏈接 .四是 利用 ADO(ActiveX Data Objects)進(jìn)行編程 :現(xiàn)在我們來大致對這幾種技術(shù)應(yīng)用介紹： 一、 用 data 控件進(jìn)行數(shù)據(jù)庫鏈接 . 第一步：給窗體添加一個(gè) Data 控件。 4) OnClick 事件：用來添加按鈕的單擊事件所執(zhí)行的程序代碼。 ? 框架類的控件： 1) List 屬性：列表框 控件的表項(xiàng)是使用數(shù)組的方式保存 ,數(shù)組的每一個(gè)元素存儲(chǔ)列表控件的一個(gè)表項(xiàng) 1) Listcount 屬性 :控件列表部分項(xiàng)目的個(gè)數(shù)。 3） DragOver 事件：在拖放操作正在進(jìn)行時(shí)發(fā)生。 14) Name 屬性：設(shè)置或返回控件的標(biāo)識名。 10) DownPicture 屬性：設(shè)置或返回一個(gè)對圖片的引用，該圖片在控件被單擊處于壓下狀態(tài)時(shí)顯示。 6) DataField 屬性：設(shè)置或返回?cái)?shù)據(jù)使用者將被綁定到的字段名。 12） MouseUp 事件：在控件上釋放鼠標(biāo)時(shí)發(fā)生。 8） KeyUp 事件： 當(dāng)控件具有焦點(diǎn)時(shí)釋放一個(gè)鍵時(shí)發(fā)生。 4） DragOver 事件： 在拖放操作正在進(jìn)行時(shí)發(fā)生。 24) MousePointer 屬性：設(shè)置 /返回一個(gè)值，該值指示在運(yùn)行時(shí)當(dāng)鼠標(biāo)移動(dòng)到對象上時(shí)顯示的指針類型。 19) FontUnderLine 屬性：設(shè)置 /返回字體下劃線樣式。 15) Font 屬性：設(shè)置 /返回字體屬性。 11) DataFormat 屬性：設(shè)置 /返回 DataFormat 對象，一個(gè)綁定對象將附加到它。 7) Appearance 屬性：設(shè)置 /返回一個(gè)對象在運(yùn)行時(shí)是否以 3D 效果顯示。 3) Enable 屬性：該控件為灰色時(shí)為 false,表示運(yùn)行時(shí)不可用。 7) Keypress：事件由用戶在文本框控件中按任意鍵觸發(fā)。 3) Multline 屬性：該屬性設(shè)定 text 字符串中是否接受換行符。 2) Autosize 屬性：決定控件是否自動(dòng)改變大小以顯示其全部內(nèi)容。 7） MouseDown 事件：當(dāng)在命令按鈕上按下鼠標(biāo)按鈕時(shí)發(fā)生。如果是命令按鈕的控件是數(shù)組，則需要使用 Index 參數(shù)標(biāo)識該控件。 14) MaskColor 屬性：設(shè)置 /返回一個(gè)在按鈕的圖片中作為“掩碼“的的顏色 15) Picture 屬性：設(shè)置返回 mandButton 控件中要顯示的圖片。 4) Backcolor 屬性：用來改變在按鈕上顯示圖像的背景色。正如 Bill Gate 所說，世界上絕大多數(shù)的 Windows應(yīng)用程序是用 Visual Basic 編寫的。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。 經(jīng)過分析 ,我們使用 MICROSOFT 公司的 VISUAL BASIC 開發(fā)工具 ,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具 ,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的智能化對象 ,首先在短時(shí)間內(nèi)建立系統(tǒng)應(yīng)用原型 ,然后 ,對初始原型系統(tǒng)進(jìn)行需求迭代 ,不斷修正和改進(jìn) ,直到形成用戶滿意的可行系統(tǒng)。 公交車查詢 管理系統(tǒng)用計(jì)算機(jī)管理 公交車路線信息 的一種計(jì)算機(jī)應(yīng)用技術(shù)的創(chuàng)新 ,在計(jì)算機(jī)還未普及之前 公交車查詢 管理都是由工作人們?nèi)斯げ樵?的方式來操作的 .現(xiàn)在一般的 公交車查詢 都采用計(jì)算機(jī)智能化管理 ,采用計(jì)算機(jī)作為工具的實(shí)用的計(jì)算機(jī) 路線自動(dòng) 管理程序來幫助 人們 進(jìn)行更有效的 公交車路線查詢 。然而，雖然現(xiàn)在世界上已經(jīng)充滿了多如牛毛的各種軟件，但它們依然不能滿足用戶的各種特殊需要，人們還不得不開發(fā)適合自己特殊需求的軟件。 畢業(yè)設(shè)計(jì) 公交車查詢 管理系統(tǒng) 摘 要 ???????????????????????????? 1 Abstract???????????????????????????2 第一章 引言 ????????????????????????? 4 1． 1 課題背景 ?????????????????????????? 4 1． 2 系統(tǒng)簡介?????????????????????? ???? 5 1. 3 開發(fā)軟件介紹 ……………………………………………………………… 6 第 二章 系統(tǒng)的分析???????????????????? ??? 8 2． 1 系統(tǒng)開發(fā)的目標(biāo)和思想?????????????????? ?? 9 2． 2 系統(tǒng)的可行性分析???????????????????? ?? 13 第三章 系統(tǒng)的設(shè)計(jì) ???????????????????????1 8 3． 1 系統(tǒng)的功能結(jié)構(gòu)設(shè)計(jì)????????????????????? 18 3． 2 系統(tǒng)的數(shù)據(jù)庫設(shè)計(jì) 3． 3 界面設(shè)計(jì)與代碼設(shè)計(jì)?????????????????????????? 23 ????????????????? ????? 24 結(jié)束語 ??????????????????????????????4 6 致謝 ???????????????????????????????4 7 參考文獻(xiàn) ??????????????????? 49 摘 要 隨著經(jīng)濟(jì)的發(fā)展，社會(huì)的進(jìn)步，計(jì)算機(jī)越來越深入到我們?nèi)粘５墓ぷ鲗W(xué)習(xí)及生活中，成為我們?nèi)粘Ｉ钪胁豢扇鄙俚妮o助工具。各行各業(yè)的人們無須經(jīng)過特別的訓(xùn)練就能夠使用電腦完成許許多多復(fù)雜的工作。 Visual Basic 繼承了 Basic 語言易學(xué)易用的特點(diǎn)，特別適合于初學(xué)者學(xué)習(xí) Windows 系統(tǒng)編程。而對于后者則要求應(yīng)用程序功能完備 ,易使用等特點(diǎn)。 公交車查詢 管理系統(tǒng) 是典型的信息管理系統(tǒng) (MIS),其開發(fā)主要包括后臺(tái)數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個(gè)方面。隨著微軟對它不斷地改進(jìn)以及計(jì)算機(jī)本身性能的提高，使得 Visual Basic 越來越適合一般的應(yīng)用程序開發(fā)。 3) Appearance 屬性：值為 1 時(shí) ,則以 3D 效果顯示該控件 ,0 則不然。 13) DisabledPicture 屬性：設(shè)置 /返回一個(gè)對圖片的引用，該圖片在控件無效時(shí)顯示在控件中。 （ 2） 事件處理過程 按鈕單擊事件的處理過程為： Private Sub objectClick（ Index As Integer） 其中 Object 為引發(fā)該事件的對象名稱。 6） KeyPress 事件：當(dāng)用戶按下或松開一個(gè) ANSI 鍵時(shí)發(fā)生。 ? 標(biāo)簽框類的控件類的控件： 1) Caption 屬性：在應(yīng)用程序界面上加入說明。 2) Maxlength 屬性：該屬性設(shè)定在文本框控件中能夠輸入的最大字符數(shù)。 6) Change 事件屬性：文本框的內(nèi)容發(fā)生改變時(shí) ,相應(yīng)的控件之間發(fā)生相應(yīng)的改變 ,具有即時(shí)性。 2) Alignment 屬性：決定單選按鈕的標(biāo)題在控件上的位置。 6) Value 屬性：反映控件狀態(tài)的屬性 ,返回 true 表示已選擇了該按鈕。 10) DataField 屬性：設(shè)置 /返回?cái)?shù)據(jù)使用者將被綁定到的字段名。 14) DragMode 屬性：設(shè)置 /返回一個(gè)值，確定在拖放操作中所用的方式。 18) FontStrikethru 屬性：設(shè)置 /返回字體刪除線樣式。 23) MaskColor 屬性：設(shè)置 /返回一個(gè)在控件的圖片中作為掩碼的顏色。 3） DragDrop 事件：在 一個(gè)完整的拖放動(dòng)作或使用 Drag 方法，并將其Action 參數(shù)設(shè)置位 2 時(shí)，該事件發(fā)生。 7） KeyDown 事件：當(dāng)控件具有焦點(diǎn)時(shí)按下一個(gè)鍵時(shí)發(fā)生。 11） MouseMove 事件：在控件上移動(dòng)鼠標(biāo)時(shí)發(fā)生。 5) DataChangeed 屬性：設(shè)置 /返回一個(gè)值，指出被綁定的控件中的數(shù)據(jù)已經(jīng)被某進(jìn)程修改。 9) DisabledPicture 屬性：設(shè)置或返回一個(gè)對圖片的引用，該圖片在控件無效時(shí)顯示在控件中。 13) Font 屬性：設(shè)置或返回字體的屬性。 2） DragDrop 事件：在一個(gè)完整的拖放動(dòng)作完成或使用 Drag 方法，并將其 Action 參數(shù)設(shè)置為 2 時(shí)發(fā)生。 6） OLEDragDrag 事件：當(dāng)源部件決定放操作能發(fā)生，卻源部件被放到目標(biāo)部件時(shí)，此事件發(fā)生。 3) Largechange 屬性：用戶點(diǎn)擊滾動(dòng)條與鍵頭之間的區(qū)域時(shí) ,value 的改變量。為 false 時(shí)處于休眠狀態(tài) . 數(shù)據(jù)庫連接方式選擇 Visual 連接數(shù)據(jù)庫的主要方式以下幾種方式：一是： 用 data 控件進(jìn)行數(shù)據(jù)庫鏈接 ，二是 利用 adodc（ ADO Data Control)進(jìn)行數(shù)據(jù)庫鏈接 。 如果你的機(jī)器沒安裝有 Access，可通過 VB 建庫。 關(guān)系數(shù)據(jù)庫系統(tǒng)與非關(guān)系數(shù)據(jù)庫系統(tǒng)的區(qū)別是：關(guān)系系統(tǒng)只有 “ 表 “ 這一種數(shù)據(jù)結(jié)構(gòu)；而非關(guān)系數(shù)據(jù)庫系統(tǒng)還有其他數(shù)據(jù) 結(jié)構(gòu)，對這些數(shù)據(jù)結(jié)構(gòu)有其他的操作。 如果要保存數(shù)據(jù)，請為每一種類型的信息創(chuàng)建一個(gè)表。 如果要簡單地直接在某個(gè)表中查看、輸入及更改數(shù)據(jù)，請創(chuàng)建一個(gè)窗體。 第一章 系統(tǒng)的分析 第一章 系統(tǒng)的分析 2． 1 系統(tǒng)開發(fā)的目標(biāo)和思想 本系統(tǒng)開發(fā)目標(biāo)是服務(wù)于 人們查詢公交車路線信息 ,方便工作人員 日常出行 . 同時(shí)力求做到界面人性化 ,功能齊全 ,數(shù)據(jù)存儲(chǔ)安全 . 2． 2 系統(tǒng)的可行性分析 技術(shù)上 :本系統(tǒng)采用 visual basic 與微軟的 access 作為數(shù)據(jù)庫 ,技術(shù)上開發(fā)難度一般 . 經(jīng)濟(jì)上 :本系統(tǒng)服務(wù)于 人們出行公交車查詢 ,提高了工作人員辦事效率 ,節(jié)省了開支 .所以具有經(jīng)濟(jì)上的可行性 . 社會(huì)上 :本系統(tǒng)同時(shí)也方便了廣大社會(huì) .所以具有社會(huì)可行性 . 第二章 系統(tǒng)的設(shè)計(jì) 3． 1 系統(tǒng)的功能結(jié)構(gòu)設(shè)計(jì) 3． 2 系統(tǒng)的數(shù)據(jù)庫設(shè)計(jì) 主界面 按車次查詢 按起點(diǎn)終點(diǎn)查詢 信息表 : 3． 2 界面設(shè)計(jì)與代碼設(shè)計(jì) 1 關(guān)于界面設(shè)計(jì) : 代碼設(shè)計(jì) : Option Explicit Dim bt As Boolean Private Sub Check1_Click() If = 0 Then = True Else = False End If End Sub Private Sub Form_Load() bt = True End Sub Private Sub Label1_Click() End Sub Private Sub Timer1_Timer() bt = False If = 0 Then = True Else