【正文】 參考文獻 ??????????????????? 49 摘 要 隨著經(jīng)濟的發(fā)展，社會的進步，計算機越來越深入到我們日常的工作學習及生活中，成為我們日常生活中不可缺少的輔助工具。 公交車查詢 管理系統(tǒng)用計算機管理 公交車路線信息 的一種計算機應用技術的創(chuàng)新 ,在計算機還未普及之前 公交車查詢 管理都是由工作人們人工查詢 的方式來操作的 .現(xiàn)在一般的 公交車查詢 都采用計算機智能化管理 ,采用計算機作為工具的實用的計算機 路線自動 管理程序來幫助 人們 進行更有效的 公交車路線查詢 。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫。 4) Backcolor 屬性：用來改變在按鈕上顯示圖像的背景色。如果是命令按鈕的控件是數(shù)組，則需要使用 Index 參數(shù)標識該控件。 2) Autosize 屬性：決定控件是否自動改變大小以顯示其全部內容。 7) Keypress：事件由用戶在文本框控件中按任意鍵觸發(fā)。 7) Appearance 屬性：設置 /返回一個對象在運行時是否以 3D 效果顯示。 15) Font 屬性：設置 /返回字體屬性。 24) MousePointer 屬性：設置 /返回一個值，該值指示在運行時當鼠標移動到對象上時顯示的指針類型。 8） KeyUp 事件： 當控件具有焦點時釋放一個鍵時發(fā)生。 6) DataField 屬性：設置或返回數(shù)據(jù)使用者將被綁定到的字段名。 14) Name 屬性：設置或返回控件的標識名。 ? 框架類的控件： 1) List 屬性：列表框 控件的表項是使用數(shù)組的方式保存 ,數(shù)組的每一個元素存儲列表控件的一個表項 1) Listcount 屬性 :控件列表部分項目的個數(shù)。三是 : 利用 DataEnvironment 進行數(shù)據(jù)庫鏈接 .四是 利用 ADO(ActiveX Data Objects)進行編程 :現(xiàn)在我們來大致對這幾種技術應用介紹： 一、 用 data 控件進行數(shù)據(jù)庫鏈接 . 第一步：給窗體添加一個 Data 控件。 結構化查詢語言 SQL（ Structured Query Language）是一種介于關系代數(shù)與關系演算之間的語言，其功能包括查詢、操縱、定義和控制四個方面，是一個通用的、功能極強的關系數(shù)據(jù)庫語言。在打開一個窗體時， Microsoft Access 將從一個或多個表中檢 索數(shù)據(jù)，并使用用戶在 “ 窗體向導 ” 選擇的版面布局或所創(chuàng)建的版面布局，將窗體顯示在屏幕上。 這樣做的好處是可以大大提高效率，如果每次啟動都要重新檢索數(shù)據(jù)庫，則要花費大量的時間 If IsBeginS = False Then 39。該過程用到了遞歸主要是由于起始站和終點站可以互換 digein = digein + 1 39。 amp。還有要注意的一點是在顯示出了最近車站的線路后，為了返回開始查詢到的線路，我用了 MSF1(i)做為存儲 Dim intmin As Integer Dim intcount As Integer Dim alloks() As Integer Dim rs As Integer Dim oksn As Integer Dim strbij As String Dim bfin As Boolean intmin = 10000 If gcaf = 2 Then If = 查找經(jīng)過站點最小的線路 Then = 返回 oksn = 0 If MSF1(0).Visible = True Then ReDim alloks(MSF1(0).Rows) MSF1(1).Clear MSF1(1).Rows = MSF1(0).Rows For k = 0 To MSF1(0).Rows 1 intcount = 9999 bfin = False For t = 0 To NC + 2 If MSF1(0).TextMatrix(k, t) = Then Exit For End If MSF1(1).TextMatrix(k, t) = MSF1(0).TextMatrix(k, t) If bfin = False Then If = MSF1(0).TextMatrix(k, t) Or = MSF1(0).TextMatrix(k, t) Then If intcount = 9999 Then intcount = 0 Else intcount = intcount + 1 bfin = True End If Else If intcount 9999 Then intcount = intcount + 1 End If End If End If Next MSF1(1).TextMatrix(k, NC + 2) = MSF1(0).TextMatrix(k, NC + 2) alloks(oksn) = intcount oksn = oksn + 1 If intcount intmin Then intmin = intcount End If Next MSF1(0).Clear rs = 1 With MSF1(0) .TextMatrix(0, 1) = 車次 For k = 1 To NC + 1 .TextMatrix(0, k + 1) = 站 amp。以下代碼寫得不是很好 ,有點亂的感覺 39。該算法有一大好處是極大的提高了查詢的速度，因為，在掃描整個數(shù)據(jù)庫時，沒有內循環(huán)。用于顯示按起始站和終點站進行的查詢 39。 并把這些車站名存放在一文本框中，以用于下次讀取 39。查詢的同時也可以更新或刪除多條記錄，并對數(shù)據(jù)執(zhí)行內嵌或自定義的計算。在數(shù)據(jù)庫發(fā)展的歷史上，最重要的成就就是關系模型。 2) Enable 屬性 :為 true 時 (缺省值 ),激活定時器開始計時 。 5） OLECompleteDrag 事件：當源部件被放到目標時發(fā)生，并通知源部件拖放操作被執(zhí)行或取消。 12) DragMode 屬性：設置返回一個值，確定在拖放操作中所用方式。 2) Index 屬性 :該屬性值為復選框控件數(shù)組的下標 . 3) Value 屬性 :value 為 0 表空白 ,為 1 表勾號 ,為 2 表示灰色勾號 . 4) Container 屬性： Form 控件上的容器。 6） LostFocus 事件：當對象失去焦點時發(fā)生。 21) FontSize 屬性：設置 /返回控件中顯示文本所用的字體大小 22) Height 屬性：設置 /返回控件的高度。 13) DownPicture 屬性：設置 /返回一個對圖片的引用，該圖片在控件單擊下處于壓下狀態(tài)時顯示。 5) Tabindex 屬性：建立控件時 ,vb 自動為其分配一個 tabindex 值 ,利用tab 鍵可以在控件之間切換焦點。 5) Passwordchar 屬性：該 屬性設定輸入文本的特殊顯示字符 ,在設計密碼程序時非常有用。 9） MouseUp 事件：當在命令按鈕上釋放鼠標按鈕時發(fā)生。命令按鈕的 Click 事件僅對當單擊鼠標時發(fā) 生。 2) Enable 屬性：控制控件的激活狀態(tài)灰色或可用。 關鍵字 :公交車查詢 管理 ,MIS,visual basic ,數(shù)據(jù)庫 Abstract With economic development, social progress, the puter and went to work learning and our daily lives, we bee an indispensable tool in everyday life. As science and technology continue to improve, puter science increasingly mature, and its powerful functions for the people to deeply understand that it has entered human society in various fields and is playing an increasingly important role. It has to go down to the daily work and life, such as word processing, information management, aided design, graphics and video processing, as well as education and training game entertainment. All people without special training will be able to use puters to plete numerous plex. However, although now the world has been filled with an overabundance of software, but they still can not meet the special needs of the various users, it also had to develop software suited to their particular needs. Professional Windows application software development before the work is needed in many professional knowledge and petence through special training. Different now, even if you have not received strict procedures designed training, the use of Visual Basic also like to develop a powerful, and suited to their special needs applications. Visual Basic inherited Basic language learn userfriendly features, and are particularly suited to new learner learning Windows system programming. Transportation vehicles using puter management information management system of a puter model cars line information technology application innovation in the puter before the public has not yet universal car enquiries are managed by the working people to operate manual enquiries. Now the general public enquiries have adopted puter intelligent vehicle management using the puter as a tool for automatic puter line management procedures to help people more effectively model cars line enquiries. Public enquiry management system is a typical car information management system (MIS), including its main development background to the establishment and maintenance of the database and frontend application development 2. The request for the establishment of strong data consistency and integrity, good for the security of the data. For the latter request applications functions, such as easy to use features. After