用vb.net与acess结合实现简单的电话号码本程序(一)

来源:互联网 发布:mac 安卓开发环境搭建 编辑:程序博客网 时间:2024/04/29 18:21
<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 160x600, 创建于 08-4-23MSDN */google_ad_slot = "4367022601";google_ad_width = 160;google_ad_height = 600;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>

所有源代码这里下载:

http://www.up2e.com/resource.php

vb.netacess结合实现简单电话号码本程序(一)--by zigz(LuHai)
luluhai@eastday.com

先看看界面:





一) 运用控件
OleDbConnection控件,OleDbCommand控件,ListView控件,ErrorProvider控件

二) 设计步骤
1) 新建项目并添加基本控件
2) 添加并设置Label、TextBox、Button控件
3) 添加OleDbConnection、OleDbCommand控件
4) 编写各相应程序代码

三) 程序功能
可以进行纪录添加,删除和列出所有纪录。

4电话号码本主界面

在上面的文本框中输入信息后,单击添加按钮就完成了一条纪录的添加。
单击删除按钮,就会出现图5的界面。

5 删除记录界面

在文本框中输入要删除的姓名点击删除按钮,就完成删除纪录的操作,删除成功会有提示出现。

 

 

单击主界面中“名单列表”按钮,就会列出所有纪录的一个列表(见图6),在这里我用了ListView控件来显示所有纪录。他的相关原理就是通过OleDbDataReader结合ListView控件来显示数据库的所有纪录。

例:        Dim reader As OleDb.OleDbDataReader

                 …………

                 ………..

                reader = mainform.OleDbCommand1.ExecuteReader '返回所有纪录

                Do While reader.Read 'listview列出所有纪录

                      Dim li As New ListViewItem()

                      li.SubItems.Clear()

li.SubItems(0).Text = reader("name").

…………….

6 列表显示


未完待续......

<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
<script type="text/javascript"><!--google_ad_client = "pub-2947489232296736";/* 160x600, 创建于 08-4-23MSDN */google_ad_slot = "4367022601";google_ad_width = 160;google_ad_height = 600;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
原创粉丝点击