DOC《《程序设计》报告》

《程序设计》报告 课程名称 课题名称 专业班级学号学生姓名 指导教师 完成日期 信息工程学院 1.

设计要求 (1)设计内容 设计要求及内容:设计一个通讯录系统,其功能和界面参考Windows操作系统附件中的 通讯簿 进行设计,但各具该系统功能要求可简化.其功能要求: 通讯记录信息组成:姓名、性别、地址,电话和EMAIL;

完成通讯录的记录增加、修改、删除、浏览和查询功能. 命令形式:菜单、图标 通讯记录信息管理:文件管理 (2)开发环境 Visual Basic6.0是一个强大的Windows平台上的开发工具,从开发个人或小组使用的小工具,到大型企业应用系统,甚至通过Internet的遍及全球分布式应用程序,都可在Visual Basic提供的工具中各取所需. Visual Basic之所以有这么广泛的用途是因为:(1)真正的面向对象编程的;

(2)可视化的编程方法以及向导的功能;

(3)数据访问特性允许对包括Microsoft SQL Sever和其他企业数据库在内的大部分数据库格式建扩数据库和前端的应用程序;

(4)通过ActiveX技术可使用其他应用提供的功能,甚至可直接使用Visual Basic创建的应用程序和对象;

(5)可以生成真正的.exe文件. Visual Basic6.0是Microsoft公司推出的一个可视化的面向对象的应用开发环境.由于它继承了BASIC语言的简单,易学的优点,又加强了可视化,分布式数据库及Internet编辑功能,因此很快成了一种易学实用的Windows平台上的面向对象的应用开发工具. 2.算法(部分功能) (1)登录功能 3.系统设计与实现 (1)登录窗体 实现功能:输入用户名和密码后,进入主窗体,增加登录窗口可增加系统的安全性. 代码如下: Private Sub cmdCancel_Click() '

设置全局变量为 false '

不提示失败的登录 LoginSucceeded = False Me.Hide End Sub Private Sub cmdOK_Click() '

检查正确的密码 If txtPassword =

123 Then '

将代码放在这里传递 '

成功到 calling 函数 '

设置全局变量时最容易的 LoginSucceeded = True Me.Hide Form2.Show Else MsgBox 无效的密码,请重试! , , 登录 txtPassword.SetFocus SendKeys {Home}+{End} End If End Sub (2)主界面(图一) 图一 界面可实现的功能:通过的下拉菜单可进入新建和浏览功能窗体;

通过下拉菜单可进入添加,删除,查询等功能窗体,通过选项可以结束程序.此主窗体是进入该系统的第一个窗体,界面设计要具备交互性好的特点,让人第一眼从视觉上就能够接受这个系统 代码如下: Private Sub add_Click() Form1.Show End Sub Private Sub delete_Click() Form1.Show End Sub Private Sub exit_Click() End End Sub Private Sub new_Click() Form1.Show End Sub Private Sub search_Click() Form1.Show End Sub Private Sub see_Click() Form1.Show End Sub (3)副窗体----添加,删除,查询窗体(图二) 图二 实现功能:该副窗体集添加,删除,修改,查询等功能于一体 (4)添加----在左边的文本框中输入相关信息后,点击添加按钮,即在下面的listview中显示出添加的信息.并跳出 添加成功 窗体以确认添加成功.如下面图三和图四 图三图四 代码如下: 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 MsgBox 添加成功 End Sub (5)删除功能―在listview中选中一条记录,点击删除按钮,弹出是否确认删除窗体(图五),点击确认,将所选记录删除,删除后如图六, 图五 图六 代码如下: Private Sub Command2_Click() '