【正文】 Drag 方法，并將其 Action 參數(shù)設(shè)置為 2 時發(fā)生 5） DragOver 事件：在拖放操作正在進(jìn)行時發(fā)生 6） GotFocus 事件：當(dāng)一個命令按鈕獲得焦點時發(fā)生 7） LinkClose 事件：當(dāng)一個 DDE 對話結(jié)束時發(fā)生 8） LinkError 事件：當(dāng)一個 DDE 對話框過程中出現(xiàn)錯誤時，該事件發(fā)生 9） KeyDown 事件：當(dāng)命令按鈕具有焦點時按下一個鍵時發(fā)生 10） Validate 事件：在焦點轉(zhuǎn)換到另一個控件之前發(fā)生，此時該控件的Causes Validation 屬性值設(shè)置為 True ? 單選按鈕類的控件： 1) Caption 屬性：顯示在控件上的文本 ,是單選按鈕的標(biāo)題。 2) Alignment 屬性：決定單選按鈕的標(biāo)題在控件上的位置。 3) Enable 屬性：該控件為灰色時為 false,表示運行時不可用。 4) Index 屬性：屬性值表示為單選按鈕組成的控件中某個按鈕的索引值。 5) Tabindex 屬性：建立控件時 ,vb 自動為其分配一個 tabindex 值 ,利用tab 鍵可以在控件之間切換焦點。 6) Value 屬性：反映控件狀態(tài)的屬性 ,返回 true 表示已選擇了該按鈕。 7) Appearance 屬性：設(shè)置 /返回一個對象在運行時是否以 3D 效果顯示。 8) BackColor 屬性：設(shè)置 /返回背景色。 9) Container 屬性：設(shè)置 /返回 Form 上的控件屬性。 10) DataField 屬性：設(shè)置 /返回數(shù)據(jù)使用者將被綁定到的字段名。 11) DataFormat 屬性：設(shè)置 /返回 DataFormat 對象，一個綁定對象將附加到它。 12) DisabledPicture 屬性：設(shè)置 /返回一個對圖像的引用，該圖片在控件無效時顯示在控件中。 13) DownPicture 屬性：設(shè)置 /返回一個對圖片的引用，該圖片在控件單擊下處于壓下狀態(tài)時顯示。 14) DragMode 屬性：設(shè)置 /返回一個值，確定在拖放操作中所用的方式。 15) Font 屬性：設(shè)置 /返回字體屬性。 16) FontBold 屬性：設(shè)置 /返回字體粗體樣式。 17) FontItalic 屬性：設(shè)置 /返回字體斜體樣式。 18) FontStrikethru 屬性：設(shè)置 /返回字體刪除線樣式。 19) FontUnderLine 屬性：設(shè)置 /返回字體下劃線樣式。 20) FontName 屬性：設(shè)置 /返回控件中顯示文本所用的字體大小。 21) FontSize 屬性：設(shè)置 /返回控件中顯示文本所用的字體大小 22) Height 屬性：設(shè)置 /返回控件的高度。 23) MaskColor 屬性：設(shè)置 /返回一個在控件的圖片中作為掩碼的顏色。 24) MousePointer 屬性：設(shè)置 /返回一個值，該值指示在運行時當(dāng)鼠標(biāo)移動到對象上時顯示的指針類型。 ? 單選按鈕類的常用事件： 1） Click 事件：鼠標(biāo)單擊控件 時發(fā)生。 2） DbClick 事件： 當(dāng)在一個對象上按下和釋放鼠標(biāo)按鈕并再次按下和釋放按鈕時，該事件發(fā)生。 3） DragDrop 事件：在一個完整的拖放動作或使用 Drag 方法，并將其Action 參數(shù)設(shè)置位 2 時，該事件發(fā)生。 4） DragOver 事件： 在拖放操作正在進(jìn)行時發(fā)生。 5） GotFocus 事件： 當(dāng)獲的對象焦點時發(fā)生。 6） LostFocus 事件：當(dāng)對象失去焦點時發(fā)生。 7） KeyDown 事件：當(dāng)控件具有焦點時按下一個鍵時發(fā)生。 8） KeyUp 事件： 當(dāng)控件具有焦點時釋放一個鍵時發(fā)生。 9） KeyPress 事件：當(dāng)用戶按下或釋放 ANSI 一個鍵時發(fā)生。 10） MouseDown 事件：當(dāng)在控件上按下鼠標(biāo)鍵時發(fā)生。 11） MouseMove 事件：在控件上移動鼠標(biāo)時發(fā)生。 12） MouseUp 事件：在控件上釋放鼠標(biāo)時發(fā)生。 ? 復(fù)選按鈕類的控件： 1) Caption 屬性：缺省為 check1? 。 2) Index 屬性 :該屬性值為復(fù)選框控件數(shù)組的下標(biāo) . 3) Value 屬性 :value 為 0 表空白 ,為 1 表勾號 ,為 2 表示灰色勾號 . 4) Container 屬性： Form 控件上的容器。 5) DataChangeed 屬性：設(shè)置 /返回一個值，指出被綁定的控件中的數(shù)據(jù)已經(jīng)被某進(jìn)程修改。 6) DataField 屬性：設(shè)置或返回數(shù)據(jù)使用者將被綁定到的字段名。 7) DataFormat 屬性：設(shè)置或返回 DataFormat 對象，用于數(shù)據(jù)綁定。 8) Datasource 屬性：設(shè)置或返回控件綁定的一個數(shù)據(jù)源。 9) DisabledPicture 屬性：設(shè)置或返回一個對圖片的引用，該圖片在控件無效時顯示在控件中。 10) DownPicture 屬性：設(shè)置或返回一個對圖片的引用，該圖片在控件被單擊處于壓下狀態(tài)時顯示。 11) DragIcon 屬性：設(shè)置或返回圖標(biāo)，它將在拖放操作中做為指針顯示。 12) DragMode 屬性：設(shè)置返回一個值，確定在拖放操作中 所用方式。 13) Font 屬性：設(shè)置或返回字體的屬性。 14) Name 屬性：設(shè)置或返回控件的標(biāo)識名。 15) Value 屬性：設(shè)置或返回控件的狀態(tài)。 ? 復(fù)選按鈕類的控件的基本事件： 1） Click 事件：鼠標(biāo)單擊控件時發(fā)生。 2） DragDrop 事件：在一個完整的拖放動作完成或使用 Drag 方法，并將其 Action 參數(shù)設(shè)置為 2 時發(fā)生。 3） DragOver 事件：在拖放操作正在進(jìn)行時發(fā)生。 4） GotFocus 事件：在對象獲的焦點時發(fā)生。， 5） OLECompleteDrag 事件：當(dāng)源部件被放到目標(biāo)時發(fā)生，并通知源部件拖放操作被執(zhí)行或取消。 6） OLEDragDrag 事件：當(dāng)源部件決定放操作能發(fā)生，卻源部件被放到目標(biāo)部件時，此事件發(fā)生。 ? 框架類的控件： 1) List 屬性：列表框控件的表項是使用數(shù)組的方式保存 ,數(shù)組的每一個元素存儲列表控件的一個表項 1) Listcount 屬性 :控件列表部分項目的個數(shù)。 2) Mutselect 屬性 :可以設(shè)置列表框為單選或允許多選屬性 . 3) Selectd 屬性 :標(biāo)示一個數(shù)組 ,數(shù)組各元素為 : 4) Selected(0),selected(1)? ? 滾動條類的控件： 1) Value 屬性：滾動條上滑塊所在位置由 value 值所決定。 2) Max 和 min 屬性：對 value 值的最大 ,最小進(jìn)行限制。 3) Largechange 屬性：用戶點擊滾動條與鍵頭之間的區(qū)域時 ,value 的改變量。 4) OnClick 事件：用來添加按鈕的單擊事件所執(zhí)行的程序代碼。 ? 定時器類類的控件： 1) Interval 屬性：表示定時的時間間隔 ,以毫秒為單位。 2) Enable屬性 :為 true時 (缺省值 ),激活定時器開始計時 。為 false時處于休眠狀態(tài) . Visual 連接數(shù)據(jù)庫的主要方式以下幾種方式：一是： 用 data 控件進(jìn)行數(shù)據(jù)庫鏈接 ，二是 利用 adodc（ ADO Data Control)進(jìn)行數(shù)據(jù)庫鏈接 。三是 : 利用 DataEnvironment 進(jìn)行數(shù)據(jù)庫鏈接 .四是 利用 ADO(ActiveX Data Objects)進(jìn)行編程 :現(xiàn)在我們來大致對這幾種技術(shù)應(yīng)用介紹： 一、 用 data 控件進(jìn)行數(shù)據(jù)庫鏈接 . 第一步：給窗體添加一個 Data 控件。 第二步：用 Access 建立一個名為 Pad 的數(shù)據(jù)庫，在庫中建立一個表 Myset，給表添加四個字段： backcolor（數(shù)據(jù)）， forecolor(文本）， fontname(文本） ,fontsize（文本）。注意：請將庫文件存入程序所在目錄。 如果你的 機(jī)器沒安裝有 Access，可通過 VB 建庫。 二、 利用 adodc（ ADO Data Control)進(jìn)行數(shù)據(jù)庫鏈接： 使用 adodata 控件訪問數(shù)據(jù)庫可以完全不用編寫代碼 ,只需要通過簡單的設(shè)置和操作其屬性就可以實現(xiàn)與數(shù)據(jù)庫的連接 ,通過綁定數(shù)據(jù)感知控件 ,就能提供一個訪問數(shù)據(jù)庫的界面 ,用來實現(xiàn)對數(shù)據(jù)庫的瀏覽 ,貼加 ,刪除 ,修改等操作 . 三、 利用 DAO 對數(shù)據(jù)庫進(jìn)行操縱 : 在 visual basic 中提供了兩種與 jet 數(shù)據(jù)引擎接口的方法 :data 控件與數(shù)據(jù)訪問對象 (DAO)DAO 是 database object 的英文縮寫 ,要 訪問數(shù)據(jù)庫一方面數(shù)據(jù)庫要提供訪問接口 ,另一方面要在編程環(huán)境中有對數(shù)據(jù)庫的支持 . DAO 模型是設(shè)計關(guān)系數(shù)據(jù)庫系統(tǒng)結(jié)構(gòu)的對象類的集合 .他們提供了管理關(guān)系型數(shù)據(jù)庫系統(tǒng)所需要的全部操作屬性和方法 ,這其中包括建立數(shù)據(jù)庫 ,定義表 ,字段和建立表間關(guān)系 ,定位和查詢數(shù)據(jù)庫等 . 關(guān)系數(shù)據(jù)庫 介紹 : 關(guān)系數(shù)據(jù)庫是目前各類數(shù)據(jù)庫中最重要、最流行的數(shù)據(jù)庫，他應(yīng)用數(shù)學(xué)方法來處理數(shù)據(jù)庫數(shù)據(jù)，是目前使用最廣泛的數(shù)據(jù)庫系統(tǒng)。 20 世紀(jì) 70 年代以后開發(fā)的數(shù)據(jù)庫管理系統(tǒng)產(chǎn)品幾乎都是基于關(guān)系的。在數(shù)據(jù)庫發(fā)展的歷史上，最重要的成就就是關(guān)系模型。 關(guān)系數(shù)據(jù)庫系統(tǒng)與非關(guān)系數(shù)據(jù)庫系統(tǒng)的區(qū)別是：關(guān)系系統(tǒng)只有 “表 “這一種數(shù)據(jù)結(jié)構(gòu)；而非關(guān)系數(shù)據(jù)庫系統(tǒng)還有其他數(shù)據(jù)結(jié)構(gòu)，對這些數(shù)據(jù)結(jié)構(gòu)有其他的操作。 結(jié)構(gòu)化查詢語言 SQL（ Structured Query Language）是一種介于關(guān)系代數(shù)與關(guān)系演算之間的語言，其功能包括查詢、操縱、定義和控制四個方面，是一個通用的、功能極強(qiáng)的關(guān)系數(shù)據(jù)庫語言。目前已成為關(guān)系數(shù)據(jù)庫的標(biāo)準(zhǔn)語言 Microsoft Access 介紹 : 使用 Microsoft Access，可以在單一的數(shù)據(jù)庫文件中管理所有的信息。在這個文件中，用戶可 以將自己的數(shù)據(jù)分別保存在各自獨立的存儲空間中，這些空間稱作表；可以使用聯(lián)機(jī)窗體來查看、添加及更新表中的數(shù)據(jù)；使用查詢來查找并檢索所要的數(shù)據(jù)；也可以使用報表以特定的版面布置來分析及打印數(shù)據(jù)。 如果要保存數(shù)據(jù)，請為每一種類型的信息創(chuàng)建一個表。如果要從查詢、窗體或報表中的多個表中將數(shù)據(jù)合并在一起，就要定義各個表之間的關(guān)系。 如果要搜索并檢索符合指定條件的數(shù)據(jù)，包括來自多個表中的數(shù)據(jù)，就要創(chuàng)建查詢。查詢的同時也可以更新或刪除多條記錄，并對數(shù)據(jù)執(zhí)行內(nèi)嵌或自定義的計算。 如果要簡單地直接在某個表中查看 、輸入及更改數(shù)據(jù)，請創(chuàng)建一個窗體。在打開一個窗體時， Microsoft Access 將從一個或多個表中檢索數(shù)據(jù)，并使用用戶在 “窗體向?qū)?”選擇的版面布局或所創(chuàng)建的版面布局，將窗體顯示在屏幕上。 如果要分析數(shù)據(jù)或?qū)?shù)據(jù)以特定的方式打印出來，請創(chuàng)建一個報表。例如，可以打印一份將數(shù)據(jù)分組并計算數(shù)據(jù)總和的報表，也可以打印另一份帶有各種數(shù)據(jù)格式的打印郵件標(biāo)簽的報表。 第一章 系統(tǒng)的分析 2． 1 系統(tǒng)開發(fā)的目標(biāo)和思想 本系統(tǒng)主要日常通訊錄管理而開發(fā)的 .目的是方便人們管理聯(lián)系人通訊工作需要 ,提高政府部門辦事效率 ,提 高數(shù)據(jù)存儲的可靠性 .在此基礎(chǔ)上做到界面的友好人性化還有程序的健壯性 . 2． 2 系統(tǒng)的可行性分析 經(jīng)濟(jì)上 :本系統(tǒng)方便政府無紙化辦公需要 ,節(jié)約了政府支出 .在經(jīng)濟(jì)上具有可行性 . 技術(shù)上 :本系統(tǒng)采用 visual basic 于微軟的 Access結(jié)合的方式 .具有可行性 . 社會上 :本系統(tǒng)服務(wù)于 大眾 部門 ,同時也方便了廣大人民需要 ,具有社會可行性 . 第二章 系統(tǒng)的設(shè)計 3． 1 系統(tǒng)的功能結(jié)構(gòu)設(shè)計 3． 2 系統(tǒng)的數(shù)據(jù)庫設(shè)計 1. 聯(lián)系人信息表 : 主界面 詳細(xì)信息登記 文件 幫助 表 : 3． 3 界面設(shè)計與代碼設(shè)計 1. 主界面 : 2. 主界面代碼分析 : 39。本程序是我初學(xué) VB 時的作品，中文注釋。 39?，F(xiàn)在看來有很多語句沒有優(yōu)化，算法也一般。 39。由于時間關(guān)系，我沒有修改，現(xiàn)提供源代碼， 39。若有疑問，歡迎來信，我們可以共同探討。 Option Explicit Public mdbFile, mdbDataName As String Public DataNumbel As Integer Public Uo As Boolean Public ListView_Name, ListView_, ListView_Love As String Public ListViewItem As Integer Public Password As String Private Sub TuBiao() 39。初始化任務(wù)欄圖標(biāo) ( ) / 3, ( ) / 3 = Len(TrayIcon) = = vbNull = NIF