【正文】 。本窗體中的詳細(xì)信息按鈕單擊事件所調(diào)用的窗體lyztedit2布局和前一個管理窗口中詳細(xì)信息按鈕所調(diào)用的窗體lyztedit布局大致相同，但是少了二個組合框，少了一個確定按鈕，因為在查詢模塊中不提供數(shù)據(jù)的修改。其操作過程代碼與上一個旅游線路管理窗體的制作大致相同，此處不予以列出。3．在窗體中放入一個表格控件DataGrid1，該控件的主要作用是顯示數(shù)據(jù)，不對數(shù)據(jù)進行編輯，其表格控件的基本屬性如下表所示。5． 在頁標(biāo)頭帶區(qū)放入五個標(biāo)簽控件，分別用于顯示四個字段名：編號、名稱、主要景點、天數(shù)、報價。將text2和text3的passwordchar的屬性設(shè)置為*，以防輸入密碼時被他人看到。其各個控件的過程代碼如下：確定按鈕的過程代碼：Private Sub Command1_Click() Dim sql As String If Trim() Trim() Then MsgBox 密碼不一致！, vbOKOnly + vbExclamation, = = Else sql = select * from 密碼表 where 用戶名=39。 \ ‘備份后數(shù)據(jù)庫If Len(Dir$(dst)) 0 Then ‘當(dāng)有前一次備份的數(shù)據(jù)庫存在時刪除它 Kill dstEnd IfFileCopy src, dstMsgBox 數(shù)據(jù)庫備份成功！, , 提示 connectionstringEnd Sub取消按鈕的過程代碼：Private Sub Command2_Click()Unload MeEnd Sub 退出系統(tǒng)模塊的制作1． 打開工程，新建一個窗體，命名為exit_f。并提供部分系統(tǒng)維護功能,使用戶方便進行數(shù)據(jù)備份。她無論在理論上還是在實踐中，都給與我很大的幫助，幫助解決了不少的難點，使得系統(tǒng)能及時開發(fā)完成，使我得到不少的提高這對于我以后的工作和學(xué)習(xí)都有一種巨大的幫助，感謝她耐心的輔導(dǎo)。 and 密碼= 39。當(dāng)權(quán)限為system時，增加用戶可用 = TrueElse = FalseEnd IfEnd SubPrivate Sub sjbf_menu_Click() 1End SubPrivate Sub xgmm_menu_Click() 1End SubPrivate Sub ykcx。 amp。致謝在本次畢業(yè)設(shè)計中，我從指導(dǎo)老師孫紅梅老師身上學(xué)到了很多東西。自我總體評價：旅行社綜合管理系統(tǒng)基本開發(fā)完畢。兩個按鈕的過程代碼如下：確認(rèn)按鈕的過程代碼：Private Sub Command1_Click()Dim src As StringDim dst As Stringsrc = amp。更新數(shù)據(jù)庫 Set rs = Nothing MsgBox 添加用戶成功, vbOKOnly + vbExclamation, = = = = End IfEnd Sub取消按鈕過程代碼：Private Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load() system userEnd Sub下面，我們繼續(xù)制作一個修改密碼窗體，其制作過程如下：1． 打開工程，添加一個窗體，命名為xgmima。下面我們先介紹添加用戶窗體的制作過程：1． 打開工程，添加一個窗體，命名為ADDUSER。3． 設(shè)置報表的啟動位置STARTPOSITION為：屏幕中心。該窗體同樣用到了和上一個查詢窗體相同的用復(fù)選框進行條件查詢的功能。表格控件DATAGIRD1的基本屬性屬性項名屬性設(shè)置內(nèi)容NameDatagrid1Caption游客管理表格AllowaddnewTrueAllowdeleteTrueAllowupdataTrueDatasourceAdodc14．在窗體中再放入八個按鈕控件，分別設(shè)置其CAPTION為，詳細(xì)信息、增加、刪除、修改、首記錄、前一個、下一個、尾記錄。3．在窗體中放入一個表格控件DataGrid1，該控件的主要作用是顯示數(shù)據(jù)，不對數(shù)據(jù)進行編輯，其表格控件的基本屬性如下表所示。其操作過程代碼與上一個旅游線路管理窗體的制作大致相同，此處不予以列出。 End IfEnd IfIf Not (dd(0) Or dd(1) Or dd(2) Or dd(3)) Then MsgBox 請設(shè)置查詢方式, vbOKOnly + vbExclamation, 警告 Exit SubEnd Ifsql = select * from 導(dǎo)游數(shù)據(jù)表 where amp。 Text1(2).Text amp。 End IfEnd IfIf Check1(2).Value Then If Text1(2).Text = Then MsgBox 請輸入級別!, vbCritical, 警告 Exit Sub End If dd(2) = True If dd(0) Or dd(1) Then str = str amp。 End IfIf Check1(1).Value Then If Text1(1).Text = Then MsgBox 請輸入性別!, vbCritical, 警告 Exit Sub End If dd(1) = True If dd(0) Then str = str amp。其代碼與前幾個窗體的數(shù)據(jù)源加載代碼大致相同，只是表格選擇的不同而以，這里不予以列出。其操作過程代碼與上一個旅游線路管理窗體的制作大致相同，此處不予以列出。 str ElseIf Option1(2).Value Then If = Then MsgBox 請輸入行程天數(shù)!, vbCritical, 警告 Exit Sub End If str = 行程天數(shù)= amp。 詳細(xì)信息 39。 = adUseClient sql, conn, adOpenKeyset, adLockOptimistic If = False Then 39。其作用是為了對數(shù)據(jù)庫進行操作。4．在系統(tǒng)使用中，若你登錄時的權(quán)限選擇為USER，你就不可以使用添加用戶菜單，只有當(dāng)你的選擇權(quán)限為SYSTEM時，你才可使用。 amp。登錄按鈕的過程代碼如下：進入按鈕的過程代碼如下：Private Sub Command1_Click() = Replace(, 39。保證系統(tǒng)的安全運行。Data Source= amp?？梢园l(fā)現(xiàn)成功連接數(shù)口的連接字符屬性中，出現(xiàn)它的字符串 Provider=。3. 在工程類型選擇面板中選擇“數(shù)據(jù)工程”。報表功能模塊的作用是利用Visual Basic中的報表編輯器編輯各數(shù)據(jù)表的報表，這對一個旅行社分析旅游線路的開發(fā)數(shù)量、旅游組團的各理性、導(dǎo)游信息的完善、游客信息的完善、游客所喜歡的旅行線路等是十分必要的。 開發(fā)所使用的工具：微軟公司的Visual Basic ，使目前最為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具?！?ADODC控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的Visual Basic程序之間架起了一座橋梁。Access 的優(yōu)點在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。導(dǎo)游數(shù)據(jù)表的結(jié)構(gòu)如下表所示：導(dǎo)游數(shù)據(jù)表結(jié)構(gòu)字段名稱字段類型字段大小索引編號自動編號默認(rèn)無姓名文本20有（無重復(fù)）性別文本2無級別文本20無出生年月日期/時間默認(rèn)無電話文本20有（有重復(fù)）在導(dǎo)游數(shù)據(jù)表中，級別是為了說明該導(dǎo)游所能帶的團隊（有國內(nèi)和國際之分）。 在創(chuàng)建該系統(tǒng)之前，我首先創(chuàng)建一個數(shù)據(jù)庫（）。5. 本管理系統(tǒng)的界面要盡可能的作到美觀、大方，突出旅游這個重點。它已經(jīng)被應(yīng)用于許多領(lǐng)域，計算機之所以如此流行的原因主要有以下幾個方面：；；；，等等；。作為計算機應(yīng)用的一部分,使用計算機對旅行社的各類信息進行管理,:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。 旅行社綜合管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應(yīng)用程序的開發(fā)兩個方面。針對大眾的這種需求，許許多多的旅行社就由此孕育而生，各種各樣豐富多彩的旅游景點則需要由一個合適的管理系統(tǒng)來規(guī)范，所以旅行社綜合管理系統(tǒng)的建立是十分必要的。隨著科學(xué)技術(shù)的不斷提高,計算機科學(xué)日漸成熟,其強大的功能已為人們深刻認(rèn)識,它已進入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。今天，計算機的價格已經(jīng)十分低廉，性能卻有了長足的進步。4. 本管理系統(tǒng)的查詢模塊要盡量做到方便、高效、準(zhǔn)確率高。（具體見圖４．１）其中，在幾個查詢模塊中，我要使用到SQL查詢語言對表格進行條件查詢操作，在打印報表中，我使用了vb自帶的數(shù)據(jù)報表功能制作了四份報表供使用者選擇打印，在系統(tǒng)設(shè)置模塊中，我采用了利用權(quán)限等級進行管理的方法，如你的登錄權(quán)限是user，你就不可以操作添加用戶模塊了。： 在旅行社中，導(dǎo)游往往是不可缺少的，導(dǎo)游的管理是旅行社管理的一個重要方面，因此需要創(chuàng)建一個導(dǎo)游數(shù)據(jù)表，而且可以在系統(tǒng)中制作導(dǎo)游管理窗體，對導(dǎo)游進行各種管理。 關(guān)系型數(shù)據(jù)庫的實現(xiàn)Access2000 就是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索。Visual Basic、Access以及其他微軟的軟件產(chǎn)品都是通過共用JET數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。：windows98中文版或更高，visual basic ，microsoft access 2000。游客管理功能模塊的作用是對游客信息進行增加、修改、刪除以及條件查詢等操作；其中，游客管理子模塊的作用是對游客信息進行編輯，而游客查詢子模塊的作用是對游客信息進行條件查詢。2. 在開發(fā)平臺中，創(chuàng)建一個新的工程，此處我選擇創(chuàng)建數(shù)據(jù)工程。3. 單擊“確定”按鈕之后即成功引入數(shù)據(jù)源。Persist Security Info=False。用于退出系統(tǒng)End Sub 創(chuàng)建系統(tǒng)登錄界面 系統(tǒng)登錄界面是一個管理系統(tǒng)進行權(quán)限認(rèn)證中不可缺少的一環(huán)，它主要用來驗證系統(tǒng)使用的合法身份。用于系統(tǒng)登錄和退出啟動界面之用。 amp。3. 在菜單編輯器中添加系統(tǒng)各個模塊的信息。表格控件DATAGIRD1的基本屬性屬性項名屬性設(shè)置內(nèi)容NameDatagrid1Caption旅游線路管理表格AllowaddnewTrueAllowdeleteTrueAllowupdataTrueDatasourceAdodc14．在窗體中再放入八個按鈕控件，分別設(shè)置其CAPTION為，詳細(xì)信息、增加、刪除、修改、首記錄、前一個、下一個、尾記錄。 + Text1(0).Text + 39。判斷為修改信息 = 修改 + Else = amp。 sql = select * from 旅游線路表 where amp。其作用是為了對數(shù)據(jù)庫進行操作。設(shè)置該窗體的基本屬性，如下表所示：窗體dycx的主要屬性屬性項名屬性設(shè)置內(nèi)容Borderstyle1fixedStartupposition2屏幕中心Windowsstate0normal，作為該窗體的數(shù)據(jù)源，注意該工程完全可以直接引入由數(shù)據(jù)環(huán)境引入的數(shù)據(jù)源，但使用數(shù)據(jù)環(huán)境往往需要通過編制命令后再進行各種使用，比較麻煩，因此我們?nèi)圆捎檬褂胊dodc1控件引入數(shù)據(jù)源的方法,在窗體調(diào)用時，數(shù)據(jù)源就已經(jīng)加載。 Trim(Text1(0).Text) + 39。 Trim(Text1(1).Text) + 39。 amp。 Text1(3).Text amp。其作用是為了對數(shù)據(jù)庫進行操作。設(shè)置該窗體的基本屬性，如下表所示：窗體lyztcx的主要屬性屬性項名屬性設(shè)置內(nèi)容Borderstyle1fixedStartupposition2屏幕中心Windowsstate0normal，作為該窗體的數(shù)據(jù)源，注意該工程完全可以直接引入由數(shù)據(jù)環(huán)境引入的數(shù)據(jù)源，但使用數(shù)據(jù)環(huán)境往往需要通過編制命令后再進行各種使用，比較麻煩，因此我們?nèi)圆捎檬褂胊dodc1控件引入數(shù)據(jù)源的方法,在窗體調(diào)用時，數(shù)據(jù)源就已經(jīng)加載，其代碼與上幾個數(shù)據(jù)源加載的代碼大致相同，只是表格選擇不同，此處不予以列出。3．在窗體中放入一個表格控件DataGrid1，該控件的主要作用是顯示數(shù)據(jù)，對數(shù)據(jù)進行編輯，其表格控件的基本屬性如下表所示。，并將該窗體的名稱修改為ykcx。2． 設(shè)置報表的數(shù)據(jù)源屬性datasource為：DATAEnvironment1，即以最初引入的數(shù)據(jù)環(huán)境為數(shù)據(jù)源。 系統(tǒng)設(shè)置模塊的制作系統(tǒng)設(shè)置模塊共