【正文】 掉線司機char8否掉線車長char8否事件車站char8是事件時間datetime8是事件過程varchar500否備注varchar100是表37 車輛類型表列名數(shù)據(jù)類型長度允許空類型char10否表38 乘務(wù)員事故表列名數(shù)據(jù)類型長度允許空事故等級char10否司機姓名char10否車長姓名char10否事故車號char8否發(fā)生事故地點char10否發(fā)生事故時間datetime8否發(fā)生事故經(jīng)過varchar600否處理決定varchar100否備注varchar50是表39 乘務(wù)員獎勵表列名數(shù)據(jù)類型長度允許空乘務(wù)員姓名char8否駕駛證編號varchar20否所屬輪乘組char10是獎勵級別char10是獎勵原因varchar600否獎勵金額money8否備注varchar30是表310 乘務(wù)員違章表列名數(shù)據(jù)類型長度允許空違章乘務(wù)員char8否駕駛車號char6是違章原因char30否違章地點char10否違章時間datetime8是檢查人員char20否處理決定varchar50否備注varchar30是表311 是否表列名數(shù)據(jù)類型長度允許空是否char10是風(fēng)行下載安裝 皮皮播放器下載 uusee網(wǎng)絡(luò)電視2010下載 MDI主窗體設(shè)計 界面介紹 本系統(tǒng)主界面圖如下：狀態(tài)欄工具欄菜單欄圖35 主界面1. 菜單編輯器1）單擊“工具”/“菜單編輯器”菜單項，打開“菜單編輯器”對話框。以“車輛檔案表”為例，介紹創(chuàng)建表的過程。Persist Security Info=False就可以和管理工具中的ODBC數(shù)據(jù)源連接。6. 系統(tǒng)維護模塊 該模塊是提供對系統(tǒng)初始化、管理員設(shè)置、數(shù)據(jù)恢復(fù)、數(shù)據(jù)備份及退出進行的操作。模塊中的程序代碼如下： Public adoCon As New Public adors As New Public Sub main() Set adoCon = New Provider=。臨修（臨修車號、司機姓名、車長姓名、地勤司機、臨修日期、臨修原因、是否修復(fù)、是否扣車、備注）關(guān)鍵字為臨修車號。 為了把用戶的數(shù)據(jù)清晰明確的表達出來，通常建立一個概念型的數(shù)學(xué)模型。清空：清空乘務(wù)員違章表中的所有信息。車輛管理中包括異動、臨修和車輛掉線的信息。 與Windows操作系統(tǒng)的高度集成特性216。 全面啟動WEB特性。 事件驅(qū)動的編程機制216。但Oracle數(shù)據(jù)庫不常見，通常是很大型的系統(tǒng)或者平臺才會采用。例如Access數(shù)據(jù)庫。其中：2. Visual Basic與Visual FoxPro的對比Visual FoxPro主要面向中小型的開發(fā)，它憑借著自帶數(shù)據(jù)庫的優(yōu)勢，應(yīng)用也比較廣泛，但從程序執(zhí)行效率和通用性角度考慮，更多的人傾向于使用VB，因為一個系統(tǒng)不僅僅就操縱數(shù)據(jù)庫這么簡單，它還包括界面設(shè)計及其他必要信息的獲取與輸出，在這方面，VB相對占有更多的優(yōu)勢。然而使用計算機對車輛檔案信息進行管理，有著手工管理所無法比擬的優(yōu)點，如：檢索迅速、查找方便、可靠性高、儲存量大、保密性好、壽命長、成本低等，這些優(yōu)點能夠極大地提高車輛檔案管理的效率，也是地鐵行業(yè)或鐵路行業(yè)向科學(xué)化、正規(guī)化管理發(fā)展的必要條件，更是中國地鐵與世界接軌的重要條件。為規(guī)范企業(yè)的內(nèi)部管理，提高企業(yè)管理質(zhì)量，更好的服務(wù)與廣大乘客，有效跟蹤管理每組列車的使用狀況，帶動企業(yè)進入車輛管理信息化、科學(xué)化，使企業(yè)的車輛管理更加科學(xué)、更加規(guī)范。 需求分析 車輛信息管理是地鐵公司每個車輛段都必須面對的工作，特別是近兩年，隨著地鐵線路的擴展，車輛不斷的增多，人員不斷的添加，從而給每個車輛段的車輛管理方面和人員管理方面都帶來不少的沖擊，特別是對于車輛段來說，地鐵車輛管理工作是至關(guān)重要的，但是一直以來我們都在使用傳統(tǒng)的人工方式管理車輛檔案和人員檔案，這種方式存在著許多缺點，如：效率低、保密性差。 因此，開發(fā)一個能夠為用戶提供充足的信息和快捷的查詢手段的車輛管理信息系統(tǒng)，將是非常必要的，也是十分及時地。3. Visual Basic與Delphi的對比Delphi在系統(tǒng)開發(fā)方面同樣具有快速、簡單的優(yōu)勢。Access是一種關(guān)系型數(shù)據(jù)庫，利用Access系統(tǒng)開發(fā)數(shù)據(jù)管理軟件，一般不需要寫程序，只要根據(jù)任務(wù)提出的要求，通過鍵盤和鼠標(biāo)器，選擇必需的命令，就能夠開發(fā)出簡單、實用、美觀大方的應(yīng)用軟件，有效地處理日常數(shù)據(jù)。因為其對硬件要求比較高，所以不是很常見，不是很實用。 易學(xué)易懂的集成開發(fā)環(huán)境216。216。 支持XML（擴展標(biāo)記語言）、支持用戶自定義函數(shù)、支持OLE DB、分布式的分區(qū)視圖等特性由于SQL Server 2000具有上述特點，因此在做本系統(tǒng)應(yīng)用時可以選擇其作為后臺的數(shù)據(jù)庫。其中：l 車輛臨修 添加：用于添加、修改、刪除車輛臨修信息。乘務(wù)員事故和乘務(wù)員獎懲的內(nèi)容均與乘務(wù)員違章內(nèi)容相符。最常用的表示概念的數(shù)學(xué)模型的方法是實體——聯(lián)系方法（Entity Relationship Approach）。掉線（車號、車次、表號、廠修時間、架修時間、月修時間、掉線司機、掉線車長、事件車站、事件時間、事件過程、備注）關(guān)鍵字為車號。Data Source= car。風(fēng)行下載安裝 皮皮播放器下載 uusee網(wǎng)絡(luò)電視2010下載 設(shè)計中遇到的問題及解決 Server 2000數(shù)據(jù)庫連接庫連接：在“Adodc屬性”對話框中單擊[生成]按鈕，彈出“數(shù)據(jù)鏈接屬性”窗體，在提供程序中選擇“Microsoft OLE DB Provider for ODBC Drivers”提供者，然后單擊[下一步]按鈕；在“連接”選項卡中指定數(shù)據(jù)源（本系統(tǒng)中的數(shù)據(jù)源為“car” ），設(shè)置完成后單擊[測試連接]按鈕，提示成功后單擊[確定]按鈕。由于car數(shù)據(jù)源中默認(rèn)數(shù)據(jù)庫為car，所以也就等于和SQL Server 2000中的car數(shù)據(jù)庫連接。2) 展開要創(chuàng)建表的系統(tǒng)數(shù)據(jù)庫“car”，單擊“表”選項。2）在菜單編輯器窗口中，“標(biāo)題”文本框用于設(shè)置菜單項的標(biāo)題，它對應(yīng)著菜單的caption屬性?！?〕 向ImageList空間中添加圖像l 在窗體上添加一個ImageList控件?！?〕 創(chuàng)建并設(shè)計工具欄。1. 窗體界面設(shè)計新建一窗體，設(shè)置該窗體的名稱為“frmchelu”，Caption屬性為“車輛檔案錄入窗體”，BorderStyle屬性為“1Fixed Single”，MDIChild的屬性為“True”。所以在本系統(tǒng)中添加了DTPicker控件，由于該控件屬于ActiveX控件，在“部件”對話框中勾選“Microsoft Windows Common Controls2 （SP4）”選項，然后單擊[確定]按鈕。在【添加】按鈕的Click事件下添加代碼如下： Private Sub Command1_Click()Unlockctl Text1 = : Text2 = : Text3 = : Text4 = : = DK16 = 是 = True: = True = False: = False = False: = True i = 1End Sub（6）在【修改】按鈕的Click事件下添加代碼如下：Private Sub Command2_Click() Unlockctl i = 2 = True: = True = False: = False = False: = FalseEnd Sub（7）使用Delete語句刪除車輛信息。 amp。 Combo1 amp。 amp。 Combo2 amp。 Combo1 amp。 amp。 Combo2 amp。 Text1 amp。在窗體上添加1個ADO控件，默認(rèn)名為“Adodc1”。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。選擇“系統(tǒng)DSN”選項卡，然后單擊“添加”按鈕。若要修改該數(shù)據(jù)源，單擊該數(shù)據(jù)源，然后單擊“配置”按鈕，若要刪除該數(shù)據(jù)源，單擊該數(shù)據(jù)源，然后單擊“刪除”按鈕。[確定]，關(guān)閉[工程屬性]對話框，再在[制作 ]對話框中選取[確定]，編譯和連接該執(zhí)行文件。“壓縮文件選項”對話框中，選擇創(chuàng)建一個的大的或多個壓縮文件的包，單擊“下一步”。 amp。 問題二當(dāng)點擊查詢窗體時，體統(tǒng)會出現(xiàn)“編譯錯誤。超級管理員39。 這樣一來，保證了開發(fā)者在用戶表中永遠有一條記錄，用戶可以通過這條原始記錄進入系統(tǒng)。蘇明老師認(rèn)真負責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我受益匪淺。 If 0 Then On Error Resume Next 39。 39。 39。 39。 39。 39。 39。 39。 39。 39。 39。 39。 39。 39。 39。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。另外，在系統(tǒng)開發(fā)過程中還有各位同學(xué)們同樣給與我不少幫助，幫助解決了不少的難點，使得系統(tǒng)能及時開發(fā)完成，這里一并表示感謝！參 考 文 獻[1] Basic ，2001年2月出版 [2] ，2004年1月出版 [3] 郭瑞軍、唐邦民、謝晗昕 Basic 數(shù)據(jù)庫開發(fā)實例精粹. ，2005年1月出版 [4] 塞奎春、高春艷、李俊民、 Basic 信息系統(tǒng)開發(fā)實例精選.，2005年7月出版[5] 劉瑞新、張二峰、齊暉、 Basic 管理信息系統(tǒng)開發(fā).，2005年3月出版[6] 明日科技、高春艷、李俊民、劉彬彬. Visual Basic ，2006年7月[7] 徐孝凱 . 中央廣播電視大學(xué)出版，2003年7月出版[8] , .Visual Basic 、2000年7月第三次出版[9] (英） Server ,2006.[10] Server 2005. ,2008.[11] Server 2005開發(fā)者指南. ,2008.附 錄： Private Sub Toolbar1_ButtonClick(ByVal Button As ) Select Case Case 1 Call mnuchelu_Click Case 2 Call mnuyitian_Click Case 4 Call mnurenlu_Click Case 5 Call mnuweitian_Click Case 11 Call mnuExit_Click End SelectEnd SubPrivate Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As ) Select Case Case 1 Call mnuchecha_Click Case 2 Call mnurencha_Click Case 4 Call mnuyicha_Click Case 5 Call mnulincha_Click Case 6 Call mnudiaocha_Click Case 8 Call mnuweicha_Click Case 9 Call mnushicha_Click Case 10 Call mnujiangcha_Click End SelectEnd Sub：Dim i As IntegerPrivate Sub Lockctl() = False: = False: = False = False: = False: = False = False: = False: = False = False: = False: = False = False: = FalseEnd SubPrivate Sub Unlockctl() = True: = True: = True = True: = True: = True = True: = True: = True = Tr