【正文】 16 e As ) Handles () () End Sub End Class 汽車類型設置模塊設計 下圖為添加信息模塊布局，在 textbox 控件中輸入要添加的汽車名稱、汽車型號、汽車價格， 雙擊“添加”按鈕輸入代碼，運行時點擊“添加”按鈕，彈出添加成功對話框，即在相應數(shù)據(jù)庫中成功添加信息。 initial catalog=lwn。 車輛租賃管理系統(tǒng) 基本信息管理 會員客戶信息 汽車類型設置 退出 添加信息 修改信息 刪除信息 顯示信息 8 表 41 基本信息 類型表 字段名稱 數(shù)據(jù)類型 字段大小 Id int 4 Typename varchar 50 Decription varchar 100 會員客戶信息表 Table2 會員 客戶信息 表 Table2 用來保存會員的類型信息。 字段對象 Field。 SQL 語言的特點主要包括 3點，即非過程化、統(tǒng)一性、公共性。 SQL (Struct Query Language）即結(jié)構化查詢語言，它是使用關系模型的數(shù)據(jù)庫 應用語言，由IBM 在 70 年代開發(fā)出來。 Visual Basic 是在 Basic 語言的基礎上發(fā)展而來的，是在 Windows 環(huán)境中廣泛使用的應用程序開發(fā)工具。 3. 汽車類型信息 的添加、修改、刪除和查詢 。汽車租賃作為一種全新的消費方式，不僅可以有效地緩解汽車生產(chǎn)與銷售之間的“瓶頸”，而且對于消費市場的拓展也有不可低估的功效。為管理決策服務，必須能根據(jù)管理的需要，及時提供需要的信息，幫助決 策者作出決策。 隨著汽車工業(yè)的發(fā)展和汽車的普及，汽車租賃成為近年來興起的一個新興行業(yè)。這也是本系統(tǒng)的特色和優(yōu)勢。 3. 有預測能力和控制能力 其使用數(shù)學模型，如運籌學模型和數(shù)理統(tǒng)計模型，來分析數(shù)據(jù)和信息，以便預測未來，提供決策支持。而日趨突出的規(guī)?；?jīng)營帶來的效益規(guī)模化是全球發(fā)展的潮流。 3. 基本信息管理模塊可以顯示系統(tǒng)車輛的基本信息?！翱梢暬奔础翱梢暬绦蛟O計”，是指開發(fā)圖形用戶界面的一種方法，用這種方法，程序員不用編 寫大量代碼去描述界面元素的外觀和位置，只要把預先建立的界面元素用鼠標拖放到屏幕上的適當位置即可。同時，它可以使用各種子句對查詢結(jié)果進行分組統(tǒng)計、合計、排序等操作。連接時必須指定要連接到的數(shù)據(jù)源以及連接所使用的用戶名和口令等信息。每一字段（列）都分別包含有名稱、數(shù)據(jù)類型和值的屬性。 汽車 信息表包括： 汽車 名稱（ CarName） 、 汽車類型（ TypeId）、汽車價格（ Price） 。 Dim conn As New SqlConnection(strconn) Dim strsel As String = select * from TABLE1 Dim m As New SqlCommand(strsel, conn) () Dim da As SqlDataAdapter = New SqlDataAdapter = m Dim ds As DataSet = New DataSet (ds, stu) = (stu) 14 () End Sub Private Sub DataGridView1_CellContentClick(ByVal sender As , ByVal e As ) Handles End Sub Private Sub Button2_Click(ByVal sender As , ByVal e As ) Handles () () End Sub End Class 會員客戶信息模塊設計 下圖為會員客戶信息模塊布局，雙 擊“顯示”按鈕，輸入相應代碼建立與數(shù)據(jù)庫的連接，運行時在 DataGridView控件中顯示數(shù)據(jù)庫中表的信息，單擊“返回”按鈕返回到主界面 。 amp。) Dim m As New SqlCommand(strtianjia, conn) () () () MsgBox(添加成功！ ) End Sub End Class 下圖為修改信息模塊布局， ，在 textbox 控件中輸入要修改的汽車型號、汽車名稱、汽車價格，雙擊“修改”按鈕輸入代碼，運行時點擊“修改”按鈕，彈出對話框，即在相應數(shù)據(jù)庫中成功修改信息。 + + 39。 amp。 DELETE：刪除數(shù)據(jù)?？梢酝ㄟ^已建立的連接發(fā)出命令，對數(shù)據(jù)源進行指定的操作。如果將記錄集看作二維網(wǎng)格，字段將排列起來構成列。 Provider 數(shù)據(jù)提供者。 Variable 用來管理工程中的全局變量，包括全局數(shù)組和全局對象。 通過這次的課程設計， 我不僅更加深刻地理解了管理信息系統(tǒng)的理論，也能基本做到理論聯(lián)系實際。為的只是讓我們的設計更加完美，以后的實踐過程更加得心應手。,39。 Dim conn As New SqlConnection(strconn) Dim strsel As String = select * from TABLE1 Dim m As New SqlCommand(strsel, conn) () Dim da As SqlDataAdapter = New SqlDataAdapter = m Dim ds As DataSet = New DataSet (ds, stu) = (stu) () End Sub Private Sub DataGridView1_CellContentClick(ByVal sender As , ByVal e As ) Handles 28 End Sub Private Sub Button2_Click(ByVal sender As , ByVal e As ) Handles () () End Sub End Class Imports Imports Public Class Form5 Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles Dim strconn As String = data source=ZVDPFX4AFDLGOF2。 initial catalog=lwn。 + + 39。 integrated security=true。 + + 39。 initial catalog = lwn。 amp。) Dim m As New SqlCommand(strtianjia, conn) () 27 () () MsgBox(添加成功！ ) End Sub End Class Imports Imports Public Class Form4 Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles Dim strconn As String = data source=ZVDPFX4AFDLGOF2。 amp。在實踐的過程中才真真切切的體會到課本中理論的含義。對于資金是指汽車租賃過程中產(chǎn)生的資金流。 Data Source 指定數(shù)據(jù)源所在的計算機地址。Password=sa。 Recordset對象表示來自基本表或命令執(zhí)行結(jié)果的記錄全集。連接時必須指定要連接到的數(shù)據(jù)源以及連接所使用的用戶名和口令等信息。運行結(jié)果如下圖 圖 59 顯示信息 界面 運行結(jié)果 問題分析 在設計過程中較難實現(xiàn)的就是 Visual 與 SQL 數(shù)據(jù)庫的連接，下面就此問題進行詳細 分析 。運行結(jié)果如下圖 19 圖 58 刪除信息 界面 運行結(jié)果 程序運行代碼如下 Imports Imports Public Class Form5 Private Sub Button1