可视化程序设计实验报告.doc

XI AN TECHNOLOGICAL UNIVERSITY 实验报告 实验课程名称 可视化程序设计 专 业 信息管理与信息系统 成 绩 2015 年 4 月 20 日 西安工业大学实验报告 一 实验目的 1 熟悉 Visual Basic 6 0 集成开发环境 2 学习怎样启动和退出 VB 3 掌握开发一个简单程序的基本步骤 4 掌握简单代码的编写 二 实验内容 1 启动和退出 VB 2 开发一个简单程序 3 将 Visual Basic 工程编译生成可执行文件 三 实验步骤 数据记录及处理 1 1 启动和退出 启动和退出 VBVB 进入 VB 集成开发环境 要进入 VB 应用程序 首先要运行 VB 的集成开发环境 启动 VB 的方法如下 方法方法 1 1 单击任务栏上的 开始 按钮 选择 程序 文件夹 接着选取 Microsoft Visual Basic 6 0 中文版 文件夹 再选取 Microsoft Visual Basic 6 0 中文版 项 如图 1 1 所示 专业信息管理与信息系统班级 13051 3 姓名贾丹丹学号 13051311 7 实验课程可视化程序设计指导教师姬浩实验日期 2015 年 3 月 22 日 同实验者 实验项目熟悉 VB 的开发环境 程序设计的基本步骤 实验设备 及器材 硬件 IBM PC 及其兼容机 要求 CPU 为 Pentium166 以上 内存在 32MB 以上 硬盘有 200MB 以上的自由空间 软件 操作系统为中文 Windows 95 98 或 Windows 2000 Professional 开发环境为 Visual Basic 6 0 中文企业版 图图 1 1 启动启动 VB 的方法的方法 1 单击鼠标左键 方法方法 2 2 单击任务栏上的 开始 按钮 选择 程序 文件夹 使用 Windows 资源按理器 查找 VB 可执行文件 VB6 exe 双击图标 方法方法 3 3 在桌面创建一个 VB 快捷键 双击该快捷键 VBVB 启动后 出现 VB6 0 的 新建工程 对话框 图 2 单击 打开 按钮 带有一 个窗体的新工程将被创建 并可以看到 VB 集成开发环境的界面 如图 1 3 所示 有的系统 启动后可直接进入图 1 3 所示的界面 图图 1 2 VB6 0 的的 新建工程新建工程 对话框对话框 图图 1 3 VB 的集成开发环境窗口的集成开发环境窗口 退出 VB 方法 1 单击主窗口右上角的 关闭 按钮 2 执行 文件 菜单中的 退出 命令 3 按 Alt Q 键 2 2 开发一个简单程序 开发一个简单程序 要求 要求 新建一工程 在窗体 Form 上添加一个标签 Label 当单击窗体时标签 Label 显示 床前明月光 实验步骤 实验步骤 1 新建工程 在桌面上双击 Microsoft Visual Basic 6 0 快捷方式图标 系统进入 Visual Basic6 0 集成开发环境 并显示 新建工程 对话框 默认选择是建立 标准 EXE 即标准工程 单击 打开 按钮 Visual Basic 6 0 进入设计模式 如图 1 4 所示 图 1 4 新建工程 对话框 单击 文件 菜单 选择 新建工程 菜单项 也可进入设计模式 2 设计界面 在系统提供的名为 Form1 的窗体上进行界面设计 单击工具箱上的标签 Label 控件 在窗体上添加标签的位置处按下鼠标左键 并拖动 调整虚框的大小 松开鼠标 就将标 签控件添加到窗体上 初始界面如图 1 5 所示 图 1 5 初始界面 3 设置属性 如表 1 1 所示 表 1 1 属性设置 对象属性属性值 Form1Caption 我的第一个 VB 程序 Label1Caption 设置属性后的界面如图 1 6 所示 图 1 6 设置属性后的界面 图 1 7 第一个程序 4 编写程序代码 Private Sub Form Click Label1 Caption 床前明月光 End Sub 5 运行程序 运行 VB 程序有三种方法 单击工具栏上的 启动 按钮 从 运行 菜单中选择 启动 菜单项 按 F5 键 例如 单击工具栏上的 启动 按钮运行程序后 单击窗体 程序运行效果如图 1 7 所示 6 保存程序 单击工具栏中的 保存 按钮或单击 文件 菜单中的 保存工程 菜单项 选择合 适的保存路径 先保存窗体文件 例如窗体文件名为 实验一 frm 然后保存工程文 件 例如工程文件名为 实验一 vbp 3 3 将 将 VisualVisual BasicBasic 工程编译生成可执行文件工程编译生成可执行文件 单击 文件 菜单中的 生成实验一 exe 菜单项 就可生成可执行的 exe 文件 退出 Visual Basic 集成开发环境 双击实验一 exe 文件 则实验一 exe 文件就可直接运 行 四 实验心得 通过这次实验 我熟悉了 Visual Basic 6 0 集成开发环境 能够熟练地启动和退出 VB 掌握了开发一个简单程序的基本步骤和简单代码的编写 西安工业大学实验报告 一 实验目的 1 掌握命令按钮 文本框和标签常用属性值的设置方法 2 学会使用命令按钮 文本框和标签在窗体上建立用户界面的方法 3 掌握命令按钮的主要事件的使用 专业信息管理与信息系统班级 13051 3 姓名贾丹丹学号 13051311 7 实验课程可视化程序设计指导教师姬浩实验日期 2015 年 3 月 22 日 同实验者 实验项目常用基本控件使用 实验设备 及器材 硬件 IBM PC 及其兼容机 要求 CPU 为 Pentium166 以上 内存在 32MB 以上 硬盘有 200MB 以上的自由空间 软件 操作系统为中文 Windows 95 98 或 Windows 2000 Professional 开发环境为 Visual Basic 6 0 中文企业版 二 实验内容 1 利用命令按钮 文本框和标签判断密码是否正确 2 建立应用程序 对两个文本框中输入的内容进行交换 三 实验步骤 数据记录及处理 1 实验内容 要求要求 在文本框中输入 goodbaby 然后单击 登录 命令按钮 则在标签 Label2 中显示 欢迎使用本系统 在文本框中输入 abc 然后单击 登录 命令 按钮 则在标签 Label2 中显示 密码错误 请重新输入密码 步骤 步骤 1 设计界面 在窗体上添加两个标签 一个文本框和两个命令按钮 初始界面如图 2 1 所示 图 2 1 初始界面 图 2 2 设置属性后的界面 2 设置属性 设置属性后的界面如图 2 2 所示 表 2 1 属性设置 对象属性属性值 Label1Caption请输入密码 Command1Caption登陆 Command2Caption退出 Label2Caption Label2BorderStyle1 Fixed Single Text1Text Text1MaxLength16 Text1PasswordChar Form1Caption登陆界面 3 编写程序代码 Private Sub Command1 Click If Text1 Text goodbaby Then Label2 Caption 欢迎使用本系统 Else Label2 Caption 密码错误 请重新输入密码 End If End Sub Private Sub Command2 Click End End Sub 4 运行程序 在文本框中输入 goodbaby 然后单击 登录 命令按钮 则在标签 Label2 中 显示 欢迎使用本系统 运行结果如图 2 3 所示 图 2 3 输入的密码正确 在文本框中输入 abc 然后单击 登录 命令按钮 则在标签 Label2 中显示 密码错误 请重新输入密码 运行结果如图 2 4 所示 图 2 4 输入的密码错误 2 实验内容 1 设计界面 在窗体上放置两个 Label 控件 两个 TextBox 控件和三个 CommandButton 控件 初 界面如图 2 5 所示 图 2 5 初始界面 图 2 6 属性设置后的界面 2 属性设置 设置属性后的界面如图 2 6 所示 表 2 2 属性设置 对象属性名称属性值 Form1Caption 交换 Label1Caption 输入第 1 个数 Label2Caption 输入第 2 个数 Text1Text 空 Text2Text 空 NameCmdChange Caption 交换 Command1 DefaultTure NameCmdClear Command2 Caption 清空 NameCmdExit Command3 Caption 退出 3 编写程序代码 Option Explicit Private Sub CmdChange Click Dim temp As Integer temp Text1 Text Text1 Text Text2 Text Text2 Text temp End Sub Private Sub CmdExit Click Unload Me End Sub Private Sub CMdCLear Click Text1 Text Text2 Text Text1 SetFocus End Sub 4 运行程序 执行结果如图 2 7 a b 所示 单击 清空 按钮并再数入数据 进行交换 图 2 7 a 交换前的界面 图 2 7 b 单击交换后的界面 四 实验心得 通过本次实验 我掌握命令按钮 文本框和标签常用属性值的设置方法 学会了使用 命令按钮 文本框和标签在窗体上建立用户界面的方法并且掌握命令按钮的主要事件的使 用 西安工业大学实验报告 专业信息管理与信息系统班级 13051 3 姓名贾丹丹学号 13051311 7 实验课程可视化程序设计指导教师姬浩实验日期 2015 年 3 月 25 日 同实验者 实验项目 VB 控制结构 实验设备 硬件 IBM PC 及其兼容机 要求 CPU 为 Pentium166 以上 内存在 32MB 以上 硬盘有 200MB 以上的自由空间 一 实验目的 1 掌握逻辑表达式的正确书写形式 2 掌握单分支与双分支条件语句的用法 熟悉 If Then Else 语句 3 掌握选择结构中多条件 多分支程序的用法 熟悉 Select Case 语句 4 掌握 For 语句的使用 5 掌握 Do 语句的使用 6 掌握如何控制循环条件 防止死循环或不循环 二 实验内容 1 编写程序 利用文本框检查用户密码 提示 可以用文本框的 PasswordChar 属 性来隐蔽用户输入的字符 提示 设密码是 123456 利用文本框的 PasswordChar 属性 可以隐蔽用户输入的字符 2 输入一个数字 0 6 用中英文显示星期几 提示 用多条件多分支选择语句 SelectCase 来解决 3 利用 For 循环求 S 1 1 2 1 2 3 1 2 3 n 的值 提示 本题是先进行内循环累加 再进行外循环累加 因此需要两个累加器 也可用一个循环来 实现 括号内每累加一个数 就往 S 中累加一次 4 输入一个正整数 利用 当型 循环判断是否素数 提示 素数 是除了 1 和该数本身 不能被任何整数整除的数 判断一个自然数是否素数 只要依次 2 n 用做除 数去除 n 若 n 不能被其中任何一个数整除 则 n 为素数 三 实验步骤 数据记录及处理 选择结构 1 实验内容 1 建立用户界面 2 设置对象属性 表 4 1 属性设置 对象属性属性值说明 Frame1Caption请输入您的密码 Text 清空 Text1 PasswordChar 只显示字符 Caption FontName黑体字体名称 Label1 fontSize三号字体大小 3 编写事件代码 Private Sub Text1 KeyPress KeyAscii As Integer If KeyAscii 13 Then 回车字符的 Ascii 为 13 及器材 软件 操作系统为中文 Windows 95 98 或 Windows 2000 Professional 开发环境为 Visual Basic 6 0 中文企业版 If Text1 Text 123456 Then Label1 Caption 欢迎使用本系统 Else Label1 Caption 对不起 密码错 End If Text1 SelStart 0 Text1 SelLength Len Text1 Text End If End Sub 4 运行程序 程序输出界面如图 4 1 图 4 2 所示 图 4 1 验证密码正确 图 4 2 验证密码不正确 2 实验内容 1 建立用户界面 参考图 4 3 所示 图 4 3 界面设计 2 设置对象属性 表 4 2 属性设置 对象属性属性值说明 Form1Caption星期 Label1Caption输入一个数字 0 6 Caption 空Label2 BorderStyle1 Fixed Single边框样式 Caption星期 Command1DefaultTrue缺省命令按 钮 Text1Text 空 3 编写事件代码 Private Sub Command1 Click Dim n As Integer m As String n Val Text1 Text Select Case n Case 1 m 星期一 Monday Case 2 m 星期二 Tuesday Case 3 m 星期三 Wednesday Case 4 m 星期四 Thursday Case 5 m 星期五 Friday Case 6 m 星期六 Saturday Case 0 m 星期日 Sunday Case Else m 重新输入 End Select Label2 Caption m End Sub 4 运行结果 程序输出界面如图 4 4 所示 图 4 4 程序运行结果 循环结构 1 实验内容 1 建立用户界面 2 设置对象属性 参考图 5 1 所示 图 5 1 属性设置 图 5 2 程序运行结果 3 编写事件代码 Private Sub Command1 Click Dim n As Integer i As Integer j As Integer s As Long n Val Text1 Text j 0 s 0 For i 1 To n j j i s s j Next i Label2 Caption 和数 S s End If End Sub 4 运行程序 如图 3 5 a b c d 所示 a b c d 图 3 5 计算三角形的面积 四 实验心得 通过这次实验 我掌握了表达式的构成和如何求表达式的值 掌握了赋值语句的使用 掌握了 InputBox 函数的使用和 MsgBox 语句的使用 西安工业大学实验报告 一 实验目的 1 了解一维数组的用法 2 学会声明 使用一维数组 应用数组解决有关数组常用算法问题 3 了解二维数组的用法 4 学会声明 使用二维数组 应用数组解决有关数组常用算法问题 二 实验内容 1 将下列文字 盐城生物工程高等学校计算机系 存放到数组中 并以倒序打印 出来 要求把这 14 个字符存放到数组 C 14 中 首先依此读取 然后利用循环 设置步长 为 1 初值为 14 终值为 1 实现倒序输出 2 编写程序 建立并输出一个 10 10 的矩阵 该矩阵两条对角线元素为 1 其余 元素为 0 提示 由于矩阵由行 列组成 需要双下标才能确定一元素位置 所以 使用 二维数组来表示矩阵 设行用 n 表示 列用 m 表示 则主对角线元素即为行与列相等的元 素 即 n m 而次对角线的下标满足 n 11 m 三 实验步骤 数据记录及处理 1 实验内容 1 设计界面 2 设置属性 如图 13 1 所示 专业信息管理与信息系统班级 13051 3 姓名贾丹丹学号 13051311 7 实验课程可视化程序设计指导教师姬浩实验日期 2015 年 4 月 12 日 同实验者 实验项目VB 数组应用 实验设备 及器材 硬件 IBM PC 及其兼容机 要求 CPU 为 Pentium166 以上 内存在 32MB 以上 硬盘有 200MB 以上的自由空间 软件 操作系统为中文 Windows 95 98 或 Windows 2000 Professional 开发环境为 Visual Basic 6 0 中文企业版 图 13 1 将字符倒序输出 3 编写程序代码 Private Sub Command1 Click Dim x As Integer c 1 To 14 As String c 1 盐 c 2 城 c 3 生 c 4 物 c 5 工 c 6 程 c 7 高 c 8 等 c 9 学 c 10 校 c 11 计 c 12 算 c 13 机 c 14 系 For x 1 To 14 Label1 Caption Label1 Caption c x Next x For x 14 To 1 Step 1 Label2 Caption Label2 Caption c x Next x End Sub 4 运行程序 程序输出界面如图 13 2 所示 图 13 2 将字符倒序输出结果 图 13 3 界面设计 2 实验内容 1 建立用户界面 在窗体中使用图片框控件 Picture1 参见图 13 3 所示 当然也可用列表框控件来显 示矩阵的元素 2 设置对象属性 3 编写事件代码 Private Sub Form Activate Dim z 10 10 As Integer For n 1 To 10 For m 1 To 10 If n m Or n 11 m Then z n m 1 Else z n m 0 End If Next Next Picture1 Print For n 1 To 10 For m 1 To 10 Picture1 Print Tab m 3 z n m 输出各元素的值 Next Print 换行 Next End Sub 4 运行程序 程序输出界面如图 13 4 所示 图 13 4 程序运行结果 四 实验心得 通过本次实验 我了解了一维数组和二维数组的用法 学会了声明 使用一维数组和 二维数组 并能够应用数组解决有关数组常用算法问题 西安工业大学实验报告 一 实验目的 1 掌握 Sub 过程的定义 2 掌握 Sub 过程的调用 3 掌握 Sub 过程参数传递规则 4 掌握 Function 过程的定义 5 掌握 Function 过程的调用 6 掌握 Function 过程参数传递规则 二 实验内容 1 编写一个求阶乘的过程 调用该过程求 4 和 6 2 编写一个求任意数的平方的函数 调用该函数求 1 10 的平方数 三 实验步骤 数据记录及处理 Sub 过程 1 设计界面 专业信息管理与信息系统班级 13051 3 姓名贾丹丹学号 13051311 7 实验课程可视化程序设计指导教师姬浩实验日期 2015 年 4 月 12 日 同实验者 实验项目VB 过程设计 实验设备 及器材 硬件 IBM PC 及其兼容机 要求 CPU 为 Pentium166 以上 内存在 32MB 以上 硬盘有 200MB 以上的自由空间 软件 操作系统为中文 Windows 95 98 或 Windows 2000 Professional 开发环境为 Visual Basic 6 0 中文企业版 在窗体上添加两个命令按钮和两个标签 初始界面如图 6 1 所示 图 6 1 初始界面 图 6 2 设置属性后的界面 2 设置属性 表 6 1 属性设置 对象属性属性值 Command1Caption求 4 Command2Caption求 6 Label1Caption Label1BorderStyle1 Fixed Single Label2Caption Label2BorderStyle1 Fixed Single 设置属性后的界面如图 6 2 所示 3 编写程序代码 Private Sub jiecheng n As Integer result As Long Dim i As Integer result 1 For i 1 To n result result i Next i End Sub Private Sub Command1 Click Dim x As Integer t As Long x 4 Call jiecheng x t Label1 Caption Str x Str t End Sub Private Sub Command2 Click Dim x As Integer t As Long x 6 Call jiecheng x t Label2 Caption Str x Str t End Sub 4 运行程序 分别单击 4 命令按钮和 6 命令按钮 程序运行效果如图 6 3 所示 图 6 3 求 4 和 6 Function 过程 1 设计界面 在窗体上添加一个标签和一个列表框 初始界面如图 7 1 所示 图 7 1 初始界面 图 7 2 设置属性后的界面 2 设置属性 表 7 1 属性设置 对象属性属性值 Label1Caption求 1 10 的平方数 List1List 设置属性后的界面如图 7 2 所示 3 编写程序代码 Private Function power x As Integer As Integer power x x End Function Private Sub Form Click Dim a As Integer For a 1 To 10 List1 AddItem power a Next a End Sub 4 运行程序 运行程序后 单击窗体 程序运行效果如图 7 3 所示 图 7 3 求 1 10 的平方数 四 实验心得 掌握了 Sub 过程和 Function 过程的定义 调用 过程参数传递规则 遇到了很多不懂 的地方 在同学的帮助下解决了困难 完成了这次实验 西安工业大学实验报告 一 实验目的 1 掌握菜单设计器窗口的操作技术 2 掌握下拉式菜单和弹出式菜单的设计方法 3 掌握通过工具条控件创建工具栏的步骤和方法 4 掌握通过状态栏控件创建状态栏的步骤和方法 二 实验内容 1 建立一个窗体菜单 测试快捷键和访问键的功能 在窗体上放置一个文本框 根 据菜单中选择的颜色 变换文本框的背景色 2 在上题的基础上添加一个弹出式菜单 并测试弹出式菜单的执行情况 专业信息管理与信息系统班级 13051 3 姓名贾丹丹学号 13051311 7 实验课程可视化程序设计指导教师姬浩实验日期 2015 年 4 月 14 日 同实验者 实验项目菜单 工具栏 状态栏设计 实验设备 及器材 硬件 IBM PC 及其兼容机 要求 CPU 为 Pentium166 以上 内存在 32MB 以上 硬盘有 200MB 以上的自由空间 软件 操作系统为中文 Windows 95 98 或 Windows 2000 Professional 开发环境为 Visual Basic 6 0 中文企业版 3 创建具有 新建 复制 打开 和 打印 功能的工具栏 4 应用 StatusBar 控件制作状态栏 三 实验步骤 数据记录及处理 菜单设计 1 实验内容 1 建立用户界面 利用 工具 菜单中的 菜单编辑器 菜单项 建立如图 14 1 所示的菜单 图 14 1 初始菜单 2 属性设置 表 14 1 菜单设计 标题名称快捷键 颜色 C mnuColor 红色 mnuRedCtrl R 蓝色 mnuBlueCtrl B 绿色 mnuGreenCtrl G Line 白色 mnuWhiteCtrl W 黑色 mnuBlackCtrl K 退出 X mnuExit 3 编写事件代码 Private Sub mnuExit Click End End Sub Private Sub mnuBlack Click Text1 BackColor RGB 0 0 0 End Sub Private Sub mnuBlue Click Text1 BackColor RGB 0 0 255 End Sub Private Sub mnuGreen Click Text1 BackColor RGB 0 255 0 End Sub Private Sub mnuRed Click Text1 BackColor RGB 255 0 0 End Sub Private Sub mnuWhite Click Text1 BackColor RGB 255 255 255 End Sub 4 运行程序 测试程序 测试快捷键和访问键 观察运行结果 2 实验内容 1 在实验 1 的菜单中增加一个菜单项 如表 14 2 所示 表 14 2 新增菜单项 标题名称可见性 弹出菜单 mnuPopFalse 打印星号 mnuPopStar 打印字母 mnuPopNum 2 修改属性 将 Text1 的对齐属性 Alignment 设为 2 居中 多行属性 MultiLine 设为 Ture 字体 Font 属性设为 小三 3 添加程序代码 Private Sub Form MouseDown Button As Integer Shift As Integer X As Single Y As Single If Button 2 Then Form1 PopupMenu mnuPop 4 End Sub Private Sub mnuPopNum Click Text1 Text Text1 Text 1 2 3 4 5 6 7 8 9 0 Chr 13 Chr 10 0 9 8 7 6 5 4 3 2 1 End Sub Private Sub mnuPopStar Click Text1 Text Text1 Text Chr 13 Chr 10 End Sub 4 运行程序 效果如图 14 2 所示 图 14 2 弹出式菜单效果 工具栏 状态栏设计 1 实验内容 1 建立用户界面 添加一个文本框控件 Text1 添加 AxtiveX 控件 参考图 15 1 所示 图 15 1 添加控件 将工具箱中 Toolbar 和 ImageList 控件双击到窗体上 参考图 2 15 2 所示 图 15 2 设置界面 2 设置对象属性 鼠标指向 ImageList 控件 单击右键在弹出的快捷菜单中选择属性 在打开的 属性 页 对话框 选择 图象 选项卡 单击 插入图片 按钮 选择图片 如图 15 3 所示 图 15 3 插入图片 在窗体的工具栏上单击鼠标右键 在弹出的快捷菜单中选择属性 打开的 属性页 对话框 在 图象列表 选项中选取 ImageList1 建立与图象列表框的关联 参考图 2 15 4 所示 图 15 4 设置 Toolbar 的属性 选择 按钮 选项卡 单击 插入 按钮 向工具栏中添加 4 个工具按钮 索引分别 为 1 2 3 4 对应图象索引值分别为 1 2 3 4 参考图 15 5 所示 图 15 5 建立与图象列表框的关联 3 编写事件代码 Private Sub Toolbar1 ButtonClick ByVal Button As MSComctlLib Button Select Case Button Index Case 1 Text1 Text Case 2 Debug Print 复制 Case 3 Debug Print 打开 Case 4 Debug Print 打印 End Select End Sub 4 运行程序 程序输出界面如图 15 6 所示 图 15 6 程序运行结果 2 实验内容 1 建立用户界面 添加 AxtiveX 控件 向窗体中添加一个 StatusBar 控件和 Timer 控件 参考图 15 7 所 示 图 15 7 界面设计 图 15 8 插入一个窗格 2 设置对象属性 设置 Timer 控件的 Interval 属性为 100 右击 StatusBar 控件 在弹出的快捷菜单中选 择属性 在打开的 属性页 对话框 选择 窗格 选项卡 选择插入窗格命令 插入一 个窗格 如图 15 8 所示 3 编写事件代码 Private Sub Form Load StatusBar1 Panels 1 Text 欢迎使用本系统 End Sub Private Sub Timer1 Timer StatusBar1 Panels 2 Text Time End Sub 4 运行程序 程序输出界面如图 15 9 所示 图 15 9 程序运行结果 四 实验心得 通过本次试验 我掌握了菜单设计器窗口的操作技术和下拉式菜单和弹出式菜单的设 计方法 掌握了通过工具条控件创建工具栏的步骤和方法和通过状态栏控件创建状态栏的 步骤和方法 西安工业大学实验报告 一 实验目的 1 掌握数据库 表 记录和字段的概念 2 掌握可视化数据库管理器的使用 3 了解使用 SQL 语句对数据库中的数据进行查询和更新的功能 专业信息管理与信息系统班级 13051 3 姓名贾丹丹学号 13051311 7 实验课程可视化程序设计指导教师姬浩实验日期 2015 年 4 月 14 日 同实验者 实验项目VB 数据库设计 实验设备 及器材 硬件 IBM PC 及其兼容机 要求 CPU 为 Pentium166 以上 内存在 32MB 以上 硬盘有 200MB 以上的自由空间 软件 操作系统为中文 Windows 95 98 或 Windows 2000 Professional 开发环境为 Visual Basic 6 0 中文企业版 二 实验内容 使用可视化数据库管理器建立一个名为 Student mdb 的 Access 数据库 它包 括一个学生学籍表 该表的表名为 xjb 各列的名称 数据类型 长度及意义如下所示 列名 数据类型 长度 意义 st No Integer 学号 name Text 10 姓名 sex Text 2 性别 addr Text 50 地址 height single 身高 三 实验步骤 数据记录及处理 1 数据库的创建 1 单击 外接程序 菜单项的 可视化数据管理器 菜单项 启动 可视化数据管理 器 显示如图 19 1 所示的 VisData 窗口 图 19 1 可视化数据管理器 2 选择 可视化数据管理器 中 文件 菜单中的 新建 菜单项用于创建数据库 3 选择 Microsoft Access 菜单项 单击该菜单项下的 Version 7 0 MDB 菜单项 打开 选择要创建的 Microsoft Access 数据库 对话框 4 选择新建数据库保存的目录后 在 文件名 文本框中输入数据库的名称 student 单击 确定 可视化数据管理器 开始在指定的目录下创建以指定名称命名的 Microsoft Access 数据库 如图 19 2 所示 图 19 2 创建数据库后的 可视化数据管理器 界面 2 向数据库中添加数据表 1 在 数据库窗口 中右击鼠标 在弹出的快捷菜单中选 新建表 菜单项 系统 将打开 表结构 对话框 如图 19 3 所示 图 19 3 表结构 对话框 2 在 表名称 文本框中键入表名 这里键入名称 xjb 3 单击 添加字段 按钮 系统显示 添加字段 对话框 如图 19 4 所示 在这 个对话框中定义表的字段 单击 确定 按钮 这样我们就定义了 xjb 表的第一个字段 图 19 4 添加字段 对话框 4 需要继续添加字段时 单击 添加字段 按钮 按与第 3 步相似的方法添加新的 字段 单击 关闭 按钮关闭 添加字段 对话框 此时 表结构 中显示将该表所有字 段的定义 5 单击 生成表 按钮 可视化数据管理器 创建指定的表并关闭 表结构 对 话框 如图 19 5 所示 6 若要修改现有表的表结构 在 数据库窗口 中右击鼠标 单击弹出的快捷菜单 中 设计 菜单项 系统将打开 表结构 对话框 对欲修改的字段进行修改即可 3 编辑数据表中的数据 1 在 可视化数据管理器 中打开数据库 student mdb 如图 2 20 6 所示 2 在 数据库窗口 中右击要添加 修改 或删除记录的表 从弹出菜单中选择 打开 菜单项 系统显示 Dynaset 表名 对话框 其中显示所选表中第一条记录的内 容 如图