2016年华北科技学院计算机学院综合性实验实验报告(VB).docVIP

华北科技学院计算机学院综合性实验报告 PAGE  第  PAGE 13 页 华北科技学院计算机学院综合性实验 实 验 报 告 课程名称 程序设计语言（VB）  实验学期 2015 至 2016 学年 第 2 学期 学生所在系部 XXXX学院 年级 2015级 专业班级 XXB151班 学生姓名 堂阜居士 学号 2015050XXXXX 任课教师 XXX 实验成绩 计算机学院制 《 程序设计语言（VB）》课程综合性实验报告 开课实验室： 基础实验室一 2016 年 6 月25 日 实验题目Visual Basic综合应用程序开发 实验目的： 掌握数组的应用： 数组的定义 数组的基本操作，包括数组的输入输出、数组元素的比较、求平均值、数组的排序等。 会使用过程编程和字符串操作 function过程的定义调用 字符串相关操作 掌握基本控件的使用 包括常用标准控件的使用：标签、按钮、文本框、单选按钮、滚动条、时钟、进度条、选项（命令）组、列表框和组合框等。 掌握菜单的使用 实验设备及环境： 硬件：多媒体计算机 软件：Windows7以上的操作系统、Visual Basic6.0集成开发环境 实验内容及要求： 先进入”欢迎”界面，在屏幕上显示欢迎您使用本程序（10%） 密码验证：用户名和密码框输入和验证。（10％） 密码正确后进入系统主界面，主界面包括“数组应用”、“字符应用”、“计算器”、“版本”和“退出”等菜单，并提供相关工具栏或命令按钮。（10％） “数组应用”：在名称为完成数组数据（比如10个）的输入、输出、升降序、最大/小值寻找、清空。（20％） “字符应用”：完成字符的大小写转换以及个数统计。（20％） “计算器”：完成四则计算以及计时功能。（20％） “版本说明”：做简单说明。（5%） 单击“退出”菜单，退出程序运行。（5%） 考核标准： 成实验要求全部功能；或完成90％以上功能；或完成85％以上功能，并能对部分程序有自己的创新，成绩为优。 完成80％以上功能；或完成75％以上功能，并能对部分程序有自己的创新，成绩为良。 完成70％以上功能；或完成65％以上功能，并能对部分程序有自己的创新，成绩为中。 完成60％以上功能；或完成55％以上功能，并能对部分程序有自己的创新，成绩为及格。 完成60％以下功能者，成绩不及格。 实验结果及分析 （以下内容根据个人情况撰写） 1. 工程资源管理器窗口：系统组成情况 图1 工程资源管理器 2. 欢迎窗体： 图2 欢迎界面 (1)Form的Load事件：设置定时器的时间间隔和两个Label的Caption. Private Sub Form_Load() Timer1.Interval = 50 Label1.Caption = 欢迎您使用本程序 Label2.Caption = By 测绘B151：刘传旭 End Sub (2) 计时器控件（Timer1）:实现字幕移动 Private Sub Timer1_Timer() If Label1.Left Form1.Width Then Label1.Left = -Label1.Width Else Label1.Left = Label1.Left + 100 End If Label2.Move Label2.Left - 30 If Label2.Left = -300 Then Label2.Left = 7000 End If End Sub (2) Command1的Click事件：进入登录界面 Private Sub Command1_Click() Form2.Show Unload Me End Sub (3)Command2的Click事件：结束程序。 Private Sub Command2_Click() End End Sub 3.密码验证窗体： 图3密码验证界面 (1) Command1的Click事件：登入主界面。 Private Sub Command1_Click() usr = Text1