【正文】 em in Chiny, and so she might, for the girls39。39。 My mother39。s lovely, too, isn39。Why, Harriet!39。但是，它畢竟代表了我二個(gè)月辛勤的結(jié)晶。252。 使應(yīng)用程序轉(zhuǎn)入和運(yùn)行更快。 backFile, vbOKOnly + vbInformation, 備份數(shù)據(jù)庫success = WritePrivateProfileString(BackUp, NewFile, backFile, amp。 amp。 / amp。例如，ODBC驅(qū)動(dòng)程序允許該字符串包含驅(qū)動(dòng)程序、提供者、默認(rèn)的數(shù)據(jù)庫、服務(wù)器、用戶名稱以及密碼等。ADO對(duì)象模型中包含了3個(gè)一般用途的對(duì)象：Connection、Command和Recordset。用戶的需求具體體現(xiàn)在各種信息的提供、保存、更新和查詢，這就要求數(shù)據(jù)庫結(jié)構(gòu)能充分滿足各種信息的輸出和輸入。對(duì)于像SQL Server 2000這樣的關(guān)系數(shù)據(jù)庫管理程序，一個(gè)數(shù)據(jù)庫通常包含幾個(gè)存放相關(guān)數(shù)據(jù)的不同表。操作系統(tǒng)：Windows 98數(shù)據(jù)庫為：SQL Server 2000開發(fā)工具與語言: Visual Basic 所謂數(shù)據(jù)庫（Database）就是指按一定組織方式存儲(chǔ)再一起的，相互有關(guān)的若干個(gè)數(shù)據(jù)的結(jié)合，數(shù)據(jù)庫管理系統(tǒng)（Database Management System）就是一種操縱和管理數(shù)據(jù)庫的大型軟件，簡稱DBMS,他們建立在操作系統(tǒng)的基礎(chǔ)上，對(duì)數(shù)據(jù)庫進(jìn)行統(tǒng)一的管理和控制，其功能包括數(shù)據(jù)庫定義，數(shù)據(jù)庫管理，數(shù)據(jù)庫建立和維護(hù)，于操作系統(tǒng)通信等。 3． , 既可使用ACCESS,FOXPRO等中小型數(shù)據(jù)庫，又使其支持SQL SERVER，SYBASE，ORACLE,DB2等各種大型數(shù)據(jù)庫。 系統(tǒng)實(shí)施與轉(zhuǎn)換 系統(tǒng)實(shí)施階段的主要工作包括：系統(tǒng)硬件的購置與安裝、程序的編寫(購買)與調(diào)試、系統(tǒng)操作人員的培訓(xùn)、系統(tǒng)有關(guān)數(shù)據(jù)的準(zhǔn)備和錄入、系統(tǒng)調(diào)試和轉(zhuǎn)換。調(diào)查中要注意定性與定量相結(jié)合，注意人、財(cái)、物、信息的流向、規(guī)格、頻率、要求以及需要解決的問題等。委托開發(fā)方式的優(yōu)點(diǎn)是省時(shí)、省事，開發(fā)的系統(tǒng)技術(shù)水平較高。 （4）.界面友好。試想要計(jì)算一臺(tái)機(jī)床的成本，需要按時(shí)輸入每個(gè)部件、每個(gè)零件以及每個(gè)螺釘螺帽的費(fèi)用，涉及企業(yè)的生產(chǎn)車間、采購、庫房、工藝設(shè)計(jì)和財(cái)務(wù)等多個(gè)部門，必須有一整套管理制度作保證。通過這樣的系統(tǒng)，我們可以做到信息的規(guī)范管理和快速查詢，實(shí)現(xiàn)了車站售票管理的系統(tǒng)化、規(guī)范化和自動(dòng)化，這樣不僅減少了管理工作量，還提高了管理效率，降低了管理成本。關(guān)鍵詞： 車站售票管理；設(shè)計(jì)；開發(fā)目 錄摘 要 I目 錄 II第一章 導(dǎo)言 1 1 1第二章 管理信息系統(tǒng)研究概述 3 3 3 5 6第三章 車站售票管理系統(tǒng)分析與設(shè)計(jì) 9 9 9 11 11 11 11 13 15 16 18第四章 車站售票管理系統(tǒng)的功能實(shí)現(xiàn) 20 20 22 26 27 30 30 31 32第五章 結(jié)論及體會(huì) 33參考文獻(xiàn) 35第一章 導(dǎo)言一個(gè)大型的計(jì)算機(jī)管理系統(tǒng)必須有一個(gè)正確的設(shè)計(jì)指導(dǎo)思想，通過合理的選擇數(shù)據(jù)結(jié)構(gòu)，操作系統(tǒng)以及開發(fā)環(huán)境，構(gòu)成一個(gè)完善的網(wǎng)絡(luò)系統(tǒng)，才能充分發(fā)揮計(jì)算機(jī)信息管理優(yōu)勢。 第三個(gè)因素也不能忽視。特別是在需要較長時(shí)間的等待時(shí)，必須讓用戶了解工作進(jìn)展情況，如可以設(shè)計(jì)已經(jīng)完成了百分之幾的任務(wù)進(jìn)度條等。因此，一方面需要大力加強(qiáng)領(lǐng)導(dǎo)，實(shí)行“一把手”原則，另一方面可向?qū)I(yè)開發(fā)人士或公司進(jìn)行咨詢，或聘請他們作為開發(fā)顧問。調(diào)查該項(xiàng)內(nèi)容的目的主要是為了劃分系統(tǒng)界限、系統(tǒng)與外界的輸入輸出接口等。 結(jié)構(gòu)化系統(tǒng)設(shè)計(jì)是指利用一組標(biāo)準(zhǔn)的圖表工具和準(zhǔn)則，確定系統(tǒng)有哪些模塊，用什么方法連接，如何構(gòu)成良好的系統(tǒng)結(jié)構(gòu)，并進(jìn)行系統(tǒng)輸入、輸出、數(shù)據(jù)處理、數(shù)據(jù)存儲(chǔ)等環(huán)節(jié)的詳細(xì)設(shè)計(jì)。設(shè)計(jì)從始至終貫穿著這樣的原則：1． 以用戶需求為目標(biāo)，以方便用戶為原則，系統(tǒng)將在統(tǒng)一的WINDOWS 操作系統(tǒng)圖形界面下提供各種實(shí)用功能，盡可能降低使用前的學(xué)習(xí)、實(shí)施和使用中的維護(hù)時(shí)間。安全保密性。表是存放數(shù)據(jù)的容器，被設(shè)計(jì)成行和列的格式，就像電子表中的那樣。 數(shù)據(jù)庫在一個(gè)信息管理系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)的好壞將直接對(duì)應(yīng)用系統(tǒng)的效率以及實(shí)現(xiàn)的效果產(chǎn)生影響。在Visual ，ADO的數(shù)據(jù)環(huán)境設(shè)計(jì)器(Data Environment Designer)取代了Visual Basic (User Connection Designer)。 ADO數(shù)據(jù)控件的屬性 ADO數(shù)據(jù)控件與Visual Basic的內(nèi)部數(shù)據(jù)控件(Data)和遠(yuǎn)程數(shù)據(jù)控件(RDC)很相似，它允許使用ADO快速地創(chuàng)建與數(shù)據(jù)庫的連接。 amp。 amp。 (sql)MsgBox 數(shù)據(jù)庫備份成功! amp。編譯車站售票管理程序就是將創(chuàng)建的應(yīng)用程序以及它的工程文件合并成一個(gè)可執(zhí)行文件。創(chuàng)建Visual Basic應(yīng)用程序后，可以將創(chuàng)建的車站售票管理應(yīng)用程序通過磁盤，關(guān)盤，網(wǎng)絡(luò)等途徑自由發(fā)布，一般來說，發(fā)布應(yīng)用程序必須經(jīng)過下面的兩個(gè)步驟：打包（.cab文件是一種壓縮文件），對(duì)于某些類型的軟件包，還必須為其創(chuàng)建安裝程序。在軟件的編寫過程中，我充分體會(huì)了軟件編程工作者的辛苦，因?yàn)槊恳粋€(gè)細(xì)微的細(xì)節(jié)都必須十分的注意，如果稍有不慎，就會(huì)全盤皆輸，而且往往很多的時(shí)候，程序我自己覺得非常的正確，但是就是編譯通不過，在查找錯(cuò)誤的過程中，面臨著否認(rèn)自己的過程，非常的痛苦，而且由于自己的經(jīng)驗(yàn)及各方面的能力的不足，所以進(jìn)展的速度非常的緩慢，往往幾天的時(shí)間還沒有一點(diǎn)進(jìn)展。 bedroom where my mother still lay in bed. It was a matter of chance, and strategy, too. It was the latest place that I had found to stay hidden awhile after the midday meal until the coast was clear and I could slip away without being given an afternoon job。s a lovely baby.39。ve got the certificate for her?39。 snapped my mother. 39。s such a little thing. But I didn39。s bed was never alike two seasons, for she was always trying experiments. This year it was to be a plantation of sun flowers, the seeds of which cheerful land aspiring plant were to feed Aunt Cockletop and her family of chicks. Beth had oldfashioned fragrant flowers in her garden, sweet peas and mignonette, larkspur, pinks, pansies, and southernwood, with chickweed for the birds and catnip for the pussies. Amy had a bower in hers, rather small and earwiggy, but very pretty to look at, with honeysuckle and morningglories hanging their colored horns and bells in graceful wreaths all over it, tall white lilies, delicate ferns, and as many brilliant, picturesque plants as would consent to blossom there. Gardening, walks, rows on the river, and flower hunts employed the fine days, and for rainy ones, they had house diversions, some old, some new, all more or less original. One of these was the `39。s voice sounded as though she had been slapped. 39。 she demanded sharply. 39。There was a certain amount of mutual congratulation which did not interest me a lot. I didn39。 So soon! You don39。參考文獻(xiàn)《Visual Basic 》 王福成、周鐵柱、黃淼云等編著 清華大學(xué)出版社 2000年6月第一版《：》 崔洪斌等譯 清華大學(xué)出版社 2002年05月第一版《(含盤)》 王華杰編著 中國鐵道出版社 2002年04月第一版《》 康博譯 清華大學(xué)出版社 2002年03月第一版《Instant 》 張龍卿編寫 北京希望電子出版社 2002年01月第一版《XML 編程使用 VB 和 ASP》 [美]Mark Wilson,[美]Tracey Wilson著, 健蓮科技譯 中國電力出版社 2001年06月第一版《數(shù)據(jù)庫設(shè)計(jì)與編程實(shí)例詳解》 電子工業(yè)出版社 2001年02月第一版《編程技巧及故障排除即時(shí)通 (VB 篇)》 清華天則工作室編著 兵器工業(yè)出版社 2001年02月第一版《引人入勝 Install Shield （含盤）》 張君編著 上海書店 2000年11月第一版《》 新智工作室編著 電子工業(yè)出版社 2000年03月第一版1《企業(yè)管理的計(jì)算機(jī)化》 威廉，使發(fā)布應(yīng)用程序所包含的許多步驟得以自動(dòng)運(yùn)行，這是用戶一般所采用的方法。252。 \)Case 2success = WritePrivateProfileString(BackUp, File2, backFile, amp。 cc = Val() sumEnd SubPrivate Sub Form_Load()While Not Wend = Month(Date) = Day(Date)End Sub “報(bào)表”功能界面Private Sub Command1_Click()Dim cc As StringIf Then cc = select 工號(hào),count(工號(hào)) as 買票數(shù) from 車票表 group by 工號(hào)End IfIf Then cc = select 車次,count( 車次) as 買票數(shù) from 車票表 group by 車次End If = ccEnd Sub進(jìn)入數(shù)據(jù)庫備份恢復(fù)菜單。 Val() = = = = = = End SubPrivate Sub Combo2_LostFocus()If Val() Mod 2 = 0 Then If Val(( 1)) = 31 Then ( 1) End IfElse If Val(( 1)) 31 Then 31 End IfEnd If End SubPrivate Sub DataGrid1_Click()Dim cc As String, sum As Integersum = 0If Month(Date) = And Day(Date) = Then If (Hour() Hour(Now)) * 60 + Minute() Minute(Now) 5 Then MsgBox 已接近開車,停止售票, 64, 錯(cuò)誤 = False Else = True End IfElse = TrueEnd Ifcc = 車型=39。首先是進(jìn)入登陸界面， 登陸界面Private Sub Cmdexit_Click()EndEnd SubPrivate Sub Cmdok_Click()Dim username1 As String, username2 As Stringusername1 = If Then Set = Adodc1 = 口令 If username1 Then username2 = 用戶名=39。ADO數(shù)據(jù)控件的功能ADO data控件使用ActiveX數(shù)據(jù)對(duì)象（ADO）來快速建立數(shù)據(jù)約束控件和數(shù)據(jù)提供者之間的連接，并快速創(chuàng)建記錄集，然后將數(shù)據(jù)通過數(shù)據(jù)約束控件提供給用戶，其中數(shù)據(jù)約束控件可以是任何具有“數(shù)據(jù)源”屬性的控件，而數(shù)據(jù)提供者可以是符合OLE