【正文】 + Text2(1).Text SQLadd = SQLadd + and Age= + Text2(0).Text Else SQLadd = SQLadd + and Age= + Text2(0).Text End If Else If Check2(1).Value = 1 Then SQLadd = SQLadd + and Age= + Text2(1).Text End If End If End If 39。 + Text1(7).Text + 39。判斷 Email 查詢 If Check1(10).Value = 1 And Not IsNull(Text1(10).Text) Then SQLadd = SQLadd + and Email=39。經(jīng)過大量的測試和試用，作者深信本軟件達(dá)到了方便和實用的設(shè)計目的，并在軟件界面和易用實用等方面有著獨到之處。實用軟件工程教程 高等教育 出版社 2021 11 （英） Ian Sommerville 機(jī)械工業(yè)出版社 2021 12 美 Cantu,U. 王輝等譯 visual basic 從入門到精通 電子工業(yè)出版社 2021 13 李維 面向?qū)ο箝_發(fā)實踐之路（ visual basic 版） (BORLAND 資深顧問著名 visual basic 專家李維最新力作 ) 電子工業(yè)出版社 14 秦斌 等 visual basic 數(shù)據(jù)庫系統(tǒng)開發(fā)與應(yīng)用 中國水利水電出版社 2021 .1 15 劉藝 visual basic 面向?qū)ο缶幊趟枷? 機(jī)械工業(yè)出版社 2021 basic 程序設(shè)計第二版 譚浩強 清華大學(xué)出版社 2021 17. visual 程序設(shè)計教程 . 胡同森 趙劍鋒等 . 浙江科學(xué)技術(shù)出版社 , (第二版 ) 周蘇 王文 著 科學(xué)出版社 2021 Basic 程序設(shè)計與開發(fā)技術(shù) 求是科技 人民郵電出版社 give pleasureto our souls. But this is intolerable and blasphemous。他們和我共同生活了四年，在生活和學(xué)習(xí)上給了我很大的幫助。判斷年齡輸入是否有效 = Check1(4).Value For i = 0 To 1 Check2(i).Enabled = False Next i End Sub Private Sub Check2_Click(Index As Integer) Text2(Index).Enabled = Check2(Index).Value End Sub 結(jié)束語 本軟件的設(shè)計目的是為人們?nèi)粘Ｉ钪泄芾碛涗洸樵兟?lián)系人提供方便和幫助。 + Text1(9).Text + 39。 End If 39。 + 女 + 39。 + Text1(1).Text + 39。 End If 39。判斷傳呼查詢 If Check1(8).Value = 1 And Not IsNull(Text1(8).Text) Then SQLadd = SQLadd + and Call like39。* + Text1(5).Text + *39。 End If 39。判斷昵稱查詢 If Check1(0).Value = 1 And Not IsNull(Text1(0).Text) Then SQLadd = SQLadd + and Love like39。把數(shù)據(jù)表當(dāng)前記錄位置復(fù)原 End If If DataNumbel 5 Then DataNumbel = 5 For i = 1 To DataNumbel mdbFileData(i).Visible = True Next i 39。進(jìn)行記錄更新 39。設(shè)置字符串變量來調(diào)用 SQL 語句 SQLoriginal = select * from amp。刷新數(shù)據(jù)窗口 39。 Chr(0) amp。新建數(shù)據(jù)庫 nummdbData_Click Dim i As Integer For i = 2 To 5 mdbFileData(i).Visible = False Next i = True = True = True End Sub Private Sub nummdbData_Click() 39。 CStr(Index) numMPgl_Click End Sub Private Sub numAcess_Click() 39。lPassword((MoveCall)) (9).Text = (Home) 39。(Oicq) ListViewItem = Count (0).Text = (Sex) 39。 mdbDataName amp。使 ListView 控件有表格風(fēng)格 ListViewStyleOne_Click 39。刪除記 錄 Dim Result If Not And Not Then If 0 Then If 0 Then Result = MsgBox(當(dāng)前記錄將被刪除！ , vbYesNo, 警告 ) SetWindowPos , HWND_topmost, 0, 0, 0, 0, flag 39。初始化任務(wù)欄圖標(biāo) ( ) / 3, ( ) / 3 = Len(TrayIcon) = = vbNull = NIF_ICON Or NIF_TIP Or NIF_MESSAGE = WM_MOUSEMOVE = 39。 第一章 系統(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。 如果要保存數(shù)據(jù)，請為每一種類型的信息創(chuàng)建一個表。 如果你的 機(jī)器沒安裝有 Access，可通過 VB 建庫。 3) Largechange 屬性：用戶點擊滾動條與鍵頭之間的區(qū)域時 ,value 的改變量。 2） DragDrop 事件：在一個完整的拖放動作完成或使用 Drag 方法，并將其 Action 參數(shù)設(shè)置為 2 時發(fā)生。 9) DisabledPicture 屬性：設(shè)置或返回一個對圖片的引用，該圖片在控件無效時顯示在控件中。 11） MouseMove 事件：在控件上移動鼠標(biāo)時發(fā)生。 3） DragDrop 事件：在一個完整的拖放動作或使用 Drag 方法，并將其Action 參數(shù)設(shè)置位 2 時，該事件發(fā)生。 18) FontStrikethru 屬性：設(shè)置 /返回字體刪除線樣式。 10) DataField 屬性：設(shè)置 /返回數(shù)據(jù)使用者將被綁定到的字段名。 2) Alignment 屬性：決定單選按鈕的標(biāo)題在控件上的位置。 2) Maxlength 屬性：該屬性設(shè)定在文本框控件中能夠輸入的最大字符數(shù)。 6） KeyPress 事件：當(dāng)用戶按下或松開一個 ANSI 鍵時發(fā)生。 13) DisabledPicture 屬性：設(shè)置 /返回一個對圖片的引用，該圖片在控件無效時顯示在控件中。隨著微軟對它不斷地改進(jìn)以 及計算機(jī)本身性能的提高，使得 Visual Basic 越來越適合一般的應(yīng)用程序開發(fā)。對于前者要求建立起數(shù)據(jù)一致性和完整 性強、數(shù)據(jù)安全性好的庫。 關(guān)鍵字 : 通訊錄信息管理 ,管理信息系統(tǒng) ,visual basic ,access Abstract The directory information management systems using electronic directory of a puter management puter application technology innovation in the puter munications management are not popular before the introduction of business contacts, The accounting approach to the operation manual transcription. general directory management are now using the puter as a tool for puter directory management procedures to help people more effectively directory information management. Directory management system is a typical management information system (MIS), including its main development background to the establishment and maintenance of the database and frontend application development 2. The request for the establishment of strong data consistency and integrity, good for the security of the data. For the latter request applications functions, such as easy to use features. After analysis, we use Microsoft visual basic development tool panies, the use of its various objectoriented development tools, especially data that can be easily accessible and concise window manipulation database intelligent objects, the first prototype application system in a short time and then, putation of the initial prototype system needs to constantly revise and improve until the formation of a viable system of user satisfaction. keyword : directory information management, management information systems, visual basic, access 第一章 引言 1． 1 課題背景 本通訊錄信息管理系統(tǒng)用計算機(jī)管理電子通訊錄的一種計算機(jī)應(yīng)用技術(shù)的創(chuàng)新 ,在計算機(jī)還未普及之前通訊管理都是由聯(lián)系人采用名片 ,筆錄手工記帳的方式來操作的 .現(xiàn)在一般的通訊錄管理都是采用計算機(jī)作為工具的實用的計算機(jī)通訊錄管理程序來幫助人們進(jìn)行更有效的通訊錄信息管理。 2) Enable 屬性：控制控件的激活狀態(tài)灰色或可用。命令按鈕的 Click 事件僅對當(dāng)單擊鼠標(biāo)時發(fā)生。 9） MouseUp 事件：當(dāng)在命令按鈕上釋放鼠標(biāo)按鈕時發(fā)生。 5) P