vb点虐 制作通讯录 vb通讯录管理系统课程设计

我想用VB.NET 2005来编一个简单的通讯录软件,向高手请教之

先构造一个类，属性有姓名性别之类。还是要用数据库，不是要存在文本文件里吧。VB 有类的模板，但是内容还是你自己做吧……才 10 分啊

专注于为中小企业提供成都网站建设、网站建设服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业巴彦淖尔免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了上千家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

我想用VB.NET+sql做一个带登陆窗体的通讯录程序

你别侮辱了程式员。

如果你是想学习，我很愿意教你，如果你是所谓的兴趣而已，那么就更应该靠自己。

以上你所说的东西，很容易写，但是从我开始学的时候，你知道我花了多少时间才完成吗？

你不把问题发出来，一个语句一个小问题，那需要多少的实践？

鄙视你。

用VB做通讯录？有查询，添加，删除功能的！

用VB做通讯录　2007-07-10 00:41

分类：软件编程 字号： 大大 中中 小小 如果你平时有许多同学和朋友的信息，试试在电脑上编写一个我这样的通讯录。很方便的哟。 先新建一个工程，在“工具箱-右键-部件”添加“Microsoft windows common control 6.0”，然后在窗体上添加五个标签，“标题”分别为 “姓名、电话、Oicq、E-Mail、地址”；添加一个文本框（text1）, 然后[复制/粘贴4次]使其成为控件数组；添加一个Listview控件(Listview1),在其属性框中，添加五个“列首”，“文本”值分别为“姓名、电话、Oicq、E-Mail、地址”，“查看属性”为 “3-lvwReport”, 选中“整行选择”，取消“隐藏选择”；添加两个按钮，其标题属性分别为“添加”、“删除”。添加如下代码：

Option Explicit

Dim fileName As String

Private Sub Command1_Click()

'将文本框中的信息添加到列表框中

Dim i As Integer

　With ListView1.ListItems.Add()

.Text = Text1(0)

For i = 1 To 4

.SubItems(i) = Text1(i)

　Next i

　End With

End Sub

Private Sub Command2_Click()

'删除列表框中信息

If ListView1.ListItems.Count 0 Then

　If MsgBox("真的要删除吗？", vbQuestion + vbYesNo + vbDefaultButton2) = vbYes Then

　ListView1.ListItems.Remove ListView1.SelectedItem.Index

　End If

End If

End Sub

Private Sub Form_Load()

Dim tpStr As String, i As Integer

fileName = App.Path "\data.txt"

If Dir(fileName) "" Then

　'加载数据

　Open fileName For Input As #1

Do While Not EOF(1)

　With ListView1.ListItems.Add()

For i = 0 To 4

　Line Input #1, tpStr

　If i = 0 Then

.Text = tpStr

　Else

.SubItems(i) = tpStr

　End If

Next i

　End With

Loop

　Close #1

End If

End Sub

Private Sub Form_Unload(Cancel As Integer)

Dim i As Integer

Dim tpList As ListItem

'保存数据

Open fileName For Output As #1

　For Each tpList In ListView1.ListItems

Print #1, tpList.Text

For i = 1 To 4

　Print #1, tpList.SubItems(i)

Next i

　Next tpList

Close #1

End Sub

本程序已在windows98+VB6.0环境下调试通过。

VB.NET用ListView控件制作通讯录的相关问题

在工程里面建立一个VS自带的本地数据库，用数据库来操作要方便得多，追求性能的话，图片单独创建一个图片目录来存放，数据库里面存入图片链接，如果图片需要保密，那就直接放到数据库。

用Excel操作也是可以的，引用Microsoft.Office.Tools.Excel，然后在VB.NET里面对Exce进行修改，图片的话，创建一个图片目录，Excel存入图片名称，在代码里面对目录下的名称进行匹配，读取到ListView，我电脑上没装Excel没法给你写相关Excel的代码示例！