【正文】
ate Sub Button1_Click(ByVal sender As , ByVal e As )Handles Dim i As Integer i = MsgBox(”確定要退票嗎?“, , ”警告“)If i = Then Close()Else Dim conn As String = ”data source=.。 Trim()amp。()Dim strsql As String = ”delete from flyernb where 客戶號=39。initial catalog=Ticket。Password=39。connect timeout=300。initial catalog=Ticket。Password=39。connect timeout=5。 End 39。If(count = 3 And singe = 0)Then 39。End If 39。 ()39。 (”沒有這個用戶或密碼錯誤,請重新輸入!“, ”提示“)39。 singe = 0 39。 (”用戶名和密碼為空!“, ”提示“)39。 singe = 1 39。 ()39。” 39。con = “insert into log(id)select id from permission where id=39?!?+ pw + “39?!?+ user + “39。登錄 39。 = = New (“華文彩云”, !, , , CType(134, Byte)) = = New (55, 9) = “Label1” = New (393, 120) = 7 = “蘭州航空公司 管理信息系統(tǒng)” 39。39。Label2 39。Label3 = New (“宋體”, !, , , CType(134, Byte)) = New (48, 234) = “Label3” = New (136, 22) = 9 = “ 密 碼” 39。TextBox139。Button1 = New (“宋體”, !, , , CType(134, Byte)) = New (72, 299) = “Button1” = New (112, 32) = 12 = “確 定” 39。Friend WithEvents Button2 As Friend WithEvents Button1 As Friend WithEvents TextBox2 As Friend WithEvents TextBox1 As Friend WithEvents Label3 As Friend WithEvents Label2 As Friend WithEvents Label1 As Private Sub InitializeComponent()Dim resources As = New (GetType(登錄)) = New = New = New = New = New = New = New ()39。39。注意: 以下過程是Windows 窗體設(shè)計器所必需的39。Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)If disposing Then If Not(ponents Is Nothing)Then ()End If End If (disposing)End Sub 39。在InitializeComponent()調(diào)用之后添加任何初始化End Sub 39。該調(diào)用是Windows 窗體設(shè)計器所必需的。C:若是管理員,請選擇登陸管理員界面。軟件的使用如下:A:輸入正確的用戶名與密碼登陸。本軟件提供您一個專用維護(hù)軟件,以便在軟件出現(xiàn)意想不到的問題時可以使您迅速發(fā)現(xiàn)您在軟件運行時的失誤,保證您的分析結(jié)果不會受到損失,盡管您的軟件可能永遠(yuǎn)不會出現(xiàn)使用維護(hù)本軟件的時候,希望您在使用分析錯誤!未找到索引項。更新管理:當(dāng)有需要時,管理員可以進(jìn)行工資和信息的刪除操作 密碼管理:管理員和個人可以根據(jù)需求修改密碼。用戶管理:設(shè)置了權(quán)限管理功能查詢管理:包括查詢航線和航班等基本信息。如果出現(xiàn)不可能處理的問題,可以直接與公司的技術(shù)支持人員聯(lián)系。(2)出錯處理對策檢查重新輸入的信息是否符合要求。若輸入要輸出的條件正確的話會彈出相應(yīng)的提示框提示是否成功或者正確等。按照軟件的說明,將測試數(shù)據(jù)加入到軟件中軟件運行過程中的密碼鍵入:通過文本框進(jìn)行輸入。首先選擇要登錄的角色,然后進(jìn)入相應(yīng)的界面進(jìn)行操作。我們將創(chuàng)建模塊,顯示模塊,存盤功能模塊,讀入功能模塊,統(tǒng)計功能模塊等的輸入項本系統(tǒng)采用文本文框進(jìn)行信息的輸出以及成績的輸出。C:工資模塊:我們將職稱工資管理和其他工資管理等幾種情況D:密碼管理:我們起初編寫了一份密碼表,只有按照密碼表上的輸入才能對工資管理系統(tǒng)進(jìn)行相關(guān)操作,性能較好。.4軟件結(jié)構(gòu)航空售票管理系統(tǒng)的結(jié)構(gòu)圖如下:航空訂票管理系統(tǒng)訂票信息管理客戶信息管理航線信息管理系統(tǒng)管理訂票信息查詢訂票信息修改添加訂票信息客戶基本信息管理客戶類別信息管理航線基本信息管理客機(jī)信息管理艙位信息管理密碼管理用戶管理客戶信息查詢客戶信息修改客戶信息添加客戶類別信息修改客戶類別信息添加航線信息查詢航線信息修改航線信息添加客機(jī)信息查詢客機(jī)信息修改客機(jī)信息添加艙位信息修改艙位信息添加 A:用戶管理模塊能在普通用戶與管理員之間加以區(qū)分,分別實現(xiàn)其對應(yīng)的功能,方法簡單,性能較好。學(xué)生成績管理系統(tǒng)主要有:登陸界面、員工信息管理,工資標(biāo)準(zhǔn)管理 主要運行如下所示:a : 登陸界面輸入姓名、密碼,點擊登陸界面顯示圖 b : 航線信息界面 c :機(jī)票信息界面 本軟件要求在PC 及其兼容機(jī)上運行,要求奔騰II以上CPU,64兆以上內(nèi)存,10G 以上硬盤。有些環(huán)境中是由作為大型ERP軟件中的一個模塊引進(jìn)的,有些是作為企業(yè)的財務(wù)系統(tǒng)的一部分。PDL具有“非純粹”的編寫語言的特點。④PDL語言:PDL語言是procedure design language的英文縮寫。③PAD圖:PAD圖是problem analysis diagram的英文縮寫,是日本日立公司提出。[1]張翼英等 《Visual Basic課程設(shè)計》 清華大學(xué)出版社 出版日期:20081 [2]《信息系統(tǒng)開發(fā)方法》清華大學(xué)出版社 姜旭平在本文檔中,所有專門術(shù)語的定義以及縮寫詞的原意如下: ①程序流程圖:程序流程圖又稱程序框圖,獨立于任何一種設(shè)計語言,比較直觀和清晰的描述了過程的控制流程。本開發(fā)小組正是通過廣泛調(diào)研,對同類的相關(guān)系統(tǒng)掌握了一定的資料的基礎(chǔ)上,制定開發(fā)出來的。 12第一章 引言開發(fā)目標(biāo):開發(fā)出一個操作簡便,界面友好,靈活實用,安全可靠,功能齊全的的航空售票管理信息系統(tǒng)。 12 源程序清單 12 11 第四章 軟件維護(hù)過程 10 10 10 10 9第三章軟件使用過程 8 8 、處理、輸出 7 7 5 5 4 第一篇:航空售票系統(tǒng)系統(tǒng)實施報告航 空 售 票 管 理 系 統(tǒng)實 施 報 告組員:目錄第一章 引言 4 4 ...................................................................................................4 第二章軟件概述 5 8 10 10 10 10 10 12 12 航空售票管理信息系統(tǒng)對航空相關(guān)單位進(jìn)行包括機(jī)票訂購在內(nèi)的許多信息管理有著極其重要的作用,就一般的實用軟件來說,它的設(shè)計內(nèi)容繁多、功能重疊、操作復(fù)雜,比如訂票和修改票務(wù)信息某些功能模塊重疊等。為了更好的完善本系統(tǒng),在實施管理階段特制定本實施報告,以求徹底完善本系統(tǒng)。②NS圖:NS圖是為了改變流程圖描述程序邏輯時過大的隨意性與靈活性,其規(guī)定了五種圖形構(gòu)建,包括:順序型,選擇型,while重復(fù),until重復(fù)型,多分枝選擇型。它使用結(jié)構(gòu)化程序設(shè)計思想表現(xiàn)程序的邏輯結(jié)構(gòu)的圖形工具。PDL是所有非正文形式的過程設(shè)計工具的統(tǒng)稱。第二章軟件概述現(xiàn)在應(yīng)用在大中型企業(yè)的管理信息系統(tǒng)中,幾乎都包括了工資管理模塊。這些根據(jù)規(guī)范的西方的管理制度設(shè)計的工資管理軟件,在很多時候還不能完全解決中國特色的中小企業(yè)的問題,本文介紹的就是要為高校解決他們在工資管理方面的問題,主要實現(xiàn)系統(tǒng)用戶管理、員工基本信息管理、工資標(biāo)準(zhǔn)設(shè)定以及工資結(jié)算和查詢等一般工資管理系統(tǒng)應(yīng)具有的主要功能,以便完成課程實踐的目的。軟件需要有WINDOWS 7操作系統(tǒng)環(huán)境。B:查詢模塊中我們對教職工按照姓名和工號兩種方法進(jìn)行查詢,有效的考慮了重名的各種情況,達(dá)到一定的性能指標(biāo)。.6輸入、輸出 本系統(tǒng)采用文本文框進(jìn)行信息的輸入以及成績的輸入。我們將創(chuàng)建模塊,顯示模塊,存盤功能模塊,讀入功能模塊,統(tǒng)計功能模塊等的輸出項第三章 軟件使用過程,安裝方便簡潔,只需要在安裝的計算機(jī)中添加數(shù)據(jù)庫即可。對于本系統(tǒng)我們設(shè)計時進(jìn)行了權(quán)限的分配,比如普通用戶登陸后只能進(jìn)行自己工資的查詢而不能進(jìn)行工資的修改,管理員登陸后既可以進(jìn)行查詢又可以進(jìn)行修改。軟件運行過程中通過文本框進(jìn)行文件的輸入輸出。軟件運行過程中可能雛形的出物及處理如下:(1)輸入信息出錯在數(shù)據(jù)庫內(nèi)找不到輸入的信息,輸入信息有誤,導(dǎo)致操作失敗。(3)數(shù)據(jù)庫連接錯誤這類錯誤主要是數(shù)據(jù)庫設(shè)置不正確,或sql server異常引起的,我們只要取消本次操作,提醒用戶檢查數(shù)據(jù)庫問題就可。第四章 軟件維護(hù)過程本軟件程序是一個單一的運行軟件,各個軟件子模塊的預(yù)定如下:航空售票管理系統(tǒng)主要以管理航空售票信息為目的,設(shè)置了嚴(yán)密的權(quán)限管理。可以顯示單獨一條記錄,也可以顯示所有信息??赡苡捎谳斎氲臄?shù)據(jù)不符合軟件的要求,軟件將可能提出錯誤,并提醒您按照軟件的要求運行程序;可能出現(xiàn)的問題如下:若輸入密碼格式不對,應(yīng)提示:您輸入的密碼錯誤。軟件的時候,可以瀏覽以下本軟件的使用。B:若是普通用戶,請選擇登陸普通用戶界面。 源程序清單登錄界面代碼:Imports Imports Public Class 登錄Inherits Dim count As Integer = 0 Dim my_class As New class1 Region “ Windows 窗體設(shè)計器生成的代碼” Public Sub New()()39。InitializeComponent()39。窗體重寫dispose 以清理組件列表。Windows 窗體設(shè)計器所必需的Private ponents As 39??梢允褂肳indows 窗體設(shè)計器修改此過程。不要使用代碼編輯器修改它。Button2 = New (“宋體”, !, , , CType(134, Byte)) = New (306, 299) = “Button2” = New (112, 32) = 13 = “取 消” 39。TextBox2 = New (208, 235) = “TextBox2” = (42) = New (240, 21) = 11 39。 = New (208, 163) = “TextBox1” = New (240, 21) = 10 39。39。 = New (“宋體”, !, , , CType(134, Byte)) = New (48, 163) = “Label2” = New (136, 21) = 8 = “ 用戶名” 39。Label1 39。39。 = New (6, 14) = CType((“$”), ) = New (504, 390)()()()()()()() = CType((“$”), ) = “登錄” = “Form7” (False)()End Sub End Region Private Sub Button1_Click(ByVal sender As , ByVal e As )Handles Dim user As String Dim pw As String Dim temp1 As String Dim temp2 As String Dim con As String Dim singe As Integer = 1 user = username = pw = con = “select * from users where id=39。 and password=39?!?Dim ds As New DataSet ds = (con)Try If (0). 0 Then = (0).Rows(0)temp1 = (0)temp2 = (1)()End If Catch ex As Except