【文章內(nèi)容簡介】 一個小型的編輯系統(tǒng)，所耗費的資源非常的小，具體的系統(tǒng)需求如下：CPU:至少200MHz Intel Pentinm 處理器操作系統(tǒng)：Windows 98 拉按鈕和平滑按鈕等。選擇“工程”下拉菜單中的“部件”選項，顯示“部件”對話框。在“控件”選項卡列表中選擇“Microsoft Windows Common Controls ”后工具相中增加改控件。其屬性及對象如下：1． Align屬性定義工具條在窗體中的位置2． ToolTipText屬性是字符串類型，定義控件的提示字符 3． Style屬性定義按鈕外觀。4． ImageList屬性定義與數(shù)據(jù)條對應(yīng)的ImageList控件名，該控件定義工具條按鈕顯示的圖像。5． HotImangeList屬性設(shè)置一個ImageList控件名，該控件定義按鈕獲得熱點時顯示的圖像。6． DisabledImageList屬性定義工具條按鈕無效時顯示的圖像。創(chuàng)建工具條包括ImageList和Toolbar控件ImageList用于為其他控件提供圖像庫，將ImageList控件加入到工具箱的操作于前述Toolbar控件相同。專業(yè)水平的軟件通常都帶有聯(lián)機幫助功能。無論寫出來的程序是要給大量的用戶使用，還是僅僅局限于公司內(nèi)部有限的使用者，我們都應(yīng)該為用戶提供詳細的、易于理解的聯(lián)機幫助文檔。微軟的Help 是一套獨立于Visual Basic 的用來協(xié)助我們創(chuàng)建、運行于32位Windows 操作系統(tǒng)下的幫助文件的工具。使用它我們可以為我們編寫的應(yīng)用程序生成一組幫助文件。為了是程序顯得更具有專業(yè)風格，首先可以在其中加入通常的應(yīng)用程序信息。這些信息包括公司名稱、版本號、修訂號以及其他類似信息。Visual Basic允許你使用APP對象來保存這些信息，APP對象是一個預(yù)定義對象，不需要在程序中創(chuàng)建它。APP對象的大多數(shù)屬性被應(yīng)用程序用來提供常規(guī)的信息，通過使用這些APP提供的屬性，可以在應(yīng)用程序和用戶之間交流重要信息，在項目屬性框中可以設(shè)置它的屬性。使用Access2000 實現(xiàn)關(guān)系型數(shù)據(jù)庫數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作的工具。數(shù)據(jù)庫的作用在于組織和表達信息，簡而言之，數(shù)據(jù)庫就是信息的集合。計算機的數(shù)據(jù)庫可以分為兩類：非關(guān)系數(shù)據(jù)庫（flatfile）和關(guān)系數(shù)據(jù)庫（relational）。關(guān)系數(shù)據(jù)庫中包含了多個數(shù)據(jù)表的信息，數(shù)據(jù)庫含有各個不同部分的術(shù)語，象記錄、域等。新建一個數(shù)據(jù)庫創(chuàng)建任何一個數(shù)據(jù)庫的 6． 標識指定字段的信息； 7． 創(chuàng)建物理表。修改已建的數(shù)據(jù)庫數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。這三種操作均可由Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細描述實現(xiàn)的具體方法。實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。一個連接是指一種虛擬的表，這種表是在當用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信息時建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個更高級的連接形式稱為自連接。這種連接是指一個表被連接到它自己的一個字段，或在不同的紀錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。系統(tǒng)總體規(guī)劃1． 可以進行文本操作； 2． 添加一個數(shù)據(jù)庫項目； 3． 刪除一個數(shù)據(jù)庫項目； 4． 修改一個數(shù)據(jù)庫項目； 5． 查詢信息； 6． 察看課程表。學(xué)號CodeInteger6No性別SexDate2No年齡AgeDate6No民族NationDate6No政治面貌Visage...Date2...Yes...家庭住址AddressDate10No備注RecordDate15No 學(xué)籍模塊：該模塊主要完成學(xué)生基本信息的錄入、刪除、更新等功能。在此模塊中定義了八個域名來進行學(xué)生的信息存儲。如果用戶修改某一紀錄中的某一項，可單添加按鈕進行學(xué)生記錄的編輯，此窗口使用數(shù)據(jù)窗口的FREEDOM風格（典型的錄入界面）。該種風格特點是列標題緊挨著數(shù)據(jù)列在此窗口還可以增加新學(xué)生紀錄。．2成績數(shù)據(jù)庫成績數(shù)據(jù)庫里存儲了學(xué)生的成績包括：學(xué)號、成績、等列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點位數(shù)是否為空姓名Name Date8No學(xué)號CodeInteger6No成績ScoreDate10No備注RecordDate15No 成績模塊：該模塊主要完成學(xué)生成績的基本信息的錄入、刪除、更新等功能。在此模塊中定義了四個域名來進行學(xué)生的信息存儲。課程數(shù)據(jù)庫利存儲了課程的信息：課程名、作者、出版社等 列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點位數(shù)是否為空課程IDCourseDate8No課程名NameDate15No出版社PublisherDate20No作者ScoreDate18No備注RecordDate15No課程模塊：該模塊主要完成存儲課程的所有信息及錄入、刪除、更新等功能與VB的連接Visual Basic提供了與底層數(shù)據(jù)庫系統(tǒng)緊密的連接。Visual Basic 支持不同的關(guān)系數(shù)據(jù)庫管理系統(tǒng)并充分發(fā)揮每一個數(shù)據(jù)庫的特長。生成獨立應(yīng)用或脫離服務(wù)器運行的服務(wù)以上的應(yīng)用，Visual Basic連接數(shù)據(jù)庫的方式有兩種： 通過使用Visual Basic的 DATA控件。通過使用由Visual Basic提供的專用的直接與數(shù)據(jù)庫相連的接口 = (“Undo”).Picture End Sub Private Sub ImgUndoEnable()39。有效“Undo”按鈕 = True = (“Undo”).Picture End Sub Private Sub Check_ImgPaste()39。設(shè)置粘貼按鈕If Len() 0 Then = True = (“Paste”).Picture Else = False = (“Paste”).Picture End If End Sub Private Sub Check_ImgCutCopy()39。設(shè)置剪切、復(fù)制按鈕 If 0 Then = True = (“Cut”).Picture = True = (“Copy”).Picture Else = False = (“Cut”).Picture = False = (“Copy”).Picture End If End Sub Private Sub BackColor_Click() = End Sub Private Sub Box_Click()39。顯停工具欄 If Then 39。將停顯工具欄 = False = False Else = True = True End IfForm_Resize 39。重新調(diào)整控件位置 End Sub Private Sub Close_Click()Dim FileNum As IntegerIf Len(FileName) 0 Then 39。有輸入文件名FileNum = FreeFile()39。獲得可用文件號Open FileName For Output As FileNum 39。打開輸出文件 39。如果無指定文件，則創(chuàng)建新文件 Print FileNum, 39。輸出文本 Close FileNum 39。關(guān)閉文件 End If = “ FileName = ”“ End Sub Private Sub ComboSize_Click() = Val()End SubPrivate Sub ComboFont_Click() = End Sub Private Sub Copy_Click() 39。復(fù)制文本到剪裁板 End Sub Private Sub Cut_Click() 39。復(fù)制文本到剪裁板 = ”“ 39。清選擇的文本 End Sub Private Sub DataTime_Click() = Now End Sub Private Sub Delete_Click() = ”“ 39。清選擇的文本 End Sub Private Sub Edit_Click()39。當程序顯示“編輯”子菜單前，觸發(fā)該程序 If 0 Then 39。文本框中有選中的文本 = True = True = True Else = False = False = False End IfIf Len(()) 0 Then 39。剪裁板中有文本數(shù)據(jù) = True Else 39。沒有可粘貼的文本 = False End If End Sub Private Sub Exit_Click()Unload Me End Sub Private Sub FindText_KeyPress(KeyAscii As Integer)Dim BeginPos As LongIf KeyAscii = 13 Then BeginPos = InStr(1, , , vbTextCompare)If BeginPos 0 Then = BeginPos1 (i)Next i End Sub Private Sub Form_Resize()Dim TextTop As Long39。修改工具條大小 = = If Then = ” + FileName 39。修改標題顯示 End If End Sub Private Sub Paste_Click() = End Sub Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Label1 = “工具欄” End Sub Private Sub Picture1_Resize()If Then = + FileName 39。修改標題顯示 ImgUndoDisable End If End Sub Private Sub Text1_Change()If Not Then 39。使“Undo”按鈕可用 ImgUndoEnableEnd If UndoString = UndoNew UndoNew = Text1 End Sub Private Sub Text1_Click()Check_ImgCutCopy End Sub Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)Check_ImgCutCopy End sub也提供了數(shù)據(jù)存儲庫，可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫。Access 是一種關(guān)系數(shù)據(jù)庫工具，關(guān)系數(shù)據(jù)庫是已開發(fā)的最通用的數(shù)據(jù)庫之一。如上所述，Access 作為關(guān)系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點，可以在一個數(shù)據(jù)包中同時擁有桌面數(shù)據(jù)庫的便利和關(guān)系數(shù)據(jù)庫的強大功能。二者的結(jié)合（DBA）微軟的JET數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及Visual Basic 來訪問數(shù)據(jù)庫并對其進行各種操作。Visual Basic、Access以及其他微軟的軟件產(chǎn)品都