文档介绍:
华北科技学院计算机学院综合性实验
实验报告
课程名称程序设计语言(VB)
实验学期 至 学年第 2 学期
学生所在系部 XXXX学院
年级 级专业班级 XXB151班
学生姓名堂阜居士学号 050XXXXX
任课教师 XXX
实验成绩
计算机学院制
《程序设计语言(VB)》课程综合性实验报告
开课实验室: 基础实验室一 年 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 mand1_Click()
Form2.Show
Unload Me
End Sub
(mand2的Click事件:结束程序。
Private mand2_Click()
End
End Sub
3.密码验证窗体:
图3密码验证界面
(1) Command1的Click事件:登入主界面。
Private mand1_Click()
usr = Text1.Text
pswd = Text2.Text
If usr = "123" And pswd = "123" Then
MDIForm1.Show
Unload Me
MsgBox "登录成功!", vbInformation + vbOKOnly, "验证"
Else
Label3.Caption = "用户名或密码错误,请重新输入!"
Text1.SetFocus
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Text2.Text
内容来自淘豆网转载请标明出处.