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

王朝vb·作者佚名  2006-01-08
宽屏版  字体: |||超大  

所有源代码这里下载:

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

用vb.net与acess结合实现简单的电话号码本程序(一)--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 列表显示

未完待续......

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
© 2005- 王朝网络 版权所有