VB实验三 实验报告 - 2016
VB实验报告(含答案)

If Check1.Value = 1 Then
Label1.FontBold = True
Else
Label1.FontBold = False
End If
If Check2.Value = 1 Then
Label1.FontItalic = True
Else
Label1.FontItalic = False
图1.1实验1-1运行界面
三.实验结果:对象属性设置
对象
属性
属性值
说明
Form1
caption
我的第一个vb程序
窗体
Label1
caption
请输入姓名
标签
Text1
text
““
文本框
Command1
caption
显示
命令按钮
Command2
caption
清除
命令按钮
四.实验思考:
1.标签label控件设置的属性代码有哪些?
加粗
复选框
Check2
Caption
倾斜
复选框
Check3
Caption
下划线
复选框
Check4
Caption
删除线
复选框
四.实验思考:
1.模拟简易计算器Command1命令的单击事件的程序代码是什么?
Private Sub Command1_Click()
Dim a!, b!
Dim c As String
If Option1.Value = True Then
Label1.FontName = “宋体”
ElseIf Option2.Value = True Then
vb实训报告

vb实训报告1. 引言本文旨在对VB实训进行全面的报告和总结。
报告内容包括实训的目的、实训的步骤和方法、实训过程中遇到的问题及解决方法、实训结果的分析与评价等。
2. 实训目的本次VB实训的目的是通过编写一个实用的程序,来提高学生们的VB编程能力和实践操作能力。
通过实际操作,学生们能够更好地了解VB的工作原理和应用场景,为他们将来从事相关工作奠定基础。
3. 实训步骤和方法(1)熟悉VB开发环境:学生首先进行VB开发环境的安装和配置,并熟悉VB开发工具的功能和操作方法。
(2)了解VB基础知识:学生通过上课和自学的方式,对VB 的基础语法、界面设计、事件处理等进行学习和掌握。
(3)实践操作:在掌握了VB的基础知识后,学生们开始进行实践操作,根据老师布置的任务,编写相应的VB程序。
(4)调试和优化:学生们在编写程序的过程中,遇到问题需要进行调试,并对程序进行优化,以提高程序的运行效率和稳定性。
4. 实训过程中遇到的问题及解决方法在实践操作过程中,学生们遇到了一些问题,在这里列举并给出了解决方法。
(1)界面设计问题:学生们在进行界面设计时,遇到了一些难题。
他们通过查找相关资料和请教老师同学,最终解决了这些问题,并得到了满意的界面设计结果。
(2)程序逻辑问题:学生们在编写程序的过程中,遇到了一些逻辑上的困惑。
他们通过仔细思考和与老师的交流,逐步找到了解决方法,并成功实现了程序的功能。
5. 实训结果的分析与评价经过一段时间的实训,学生们完成了任务,并提交了他们编写的VB程序。
这些程序在功能上较好地实现了要求,并具备较高的用户体验。
然而,我们也发现了一些问题。
首先,在实训过程中,学生们对VB的理解和熟练程度存在差异,部分学生可能由于基础薄弱,对实训内容的掌握有一定困难。
其次,在实训过程中,有些学生对问题的解决方法存在依赖性,对于独立思考和解决问题的能力还有一定的提升空间。
综上所述,通过本次VB实训,学生们获得了较好的实践经验和编程能力的提升。
vb实验报告三

忻州师范学院计算机系
实验报告
学号:姓名:班级
课程名称Visual Bisic 实验课时2课时实验项目VB数据类型(顺序结构)实验时间
指导老师史文秀实验成绩
实验目的(本次上机实验所涉及并要求掌握的知识点)1、掌握常量的分类和作用
2、掌握变量的定义和使用
3、掌握常量的运算符的作用
4、掌握各种表达式的使用
5、掌握常用函数的使用方法
6、掌握赋值语句的使用方法
7、加深理解程序设计过程和基本控件的使用
实验环境Visual Bisic 6.0
实验内容1、赋值语句。
设计一个留言板,留言板窗体中包括两个标签、两个文本框和一个单选按钮。
要求在文本框中输入留言后,单击“提交”按钮,上面文本框的内容复制到下面的留言文本框中。
2、静态变量和全局变量。
设计一个投票程序,程序运行时为两个候选人投票。
候选人票数
显示在两个标签上,。
初始状态票数均为0。
单击“投票”按钮,可以分别为两个候选人投票,其新增加的票数显示在相应人名下。
3、数值计算。
设计一个程序,程序运行时,输入两点的坐标,单击“计算”按钮,在文本
框中显示两点之间的距离,以两位小数的形式输出。
(使用Format函数控制输出格式为两位小数)
4、自由设计一个界面,编写一个华氏温度F与摄氏温度C之间的转换的应用程序。
其中F
与C之间的关系为:F = C + 32。
实验步骤(关键代码要写出)9 5
总结(对上机实验结果进行分析,上机心得体会及改进意见。
VB实验报告三(学号)

广州大学学生实验报告
一、实验目的
(1)掌握循环语句的使用。
(2)掌握如何控制循环条件,防止死循环或不循环。
(3)掌握数组常用的操作和常用算法。
二、实验设备
实验设备要求每个学生一台电脑,并装有Visual Basic 6.0。
三、实验内容
1、完成实验D循环结构(P.268)中的第.4、6题,其中第1题利用单循环结构显示如图D.1(P.268)所示的界面,而后将图形改为倒三角形。
2、选做实验E数组(P.271)中的第1、3题中的任意二题
3、以实验D中的第4题和实验E中的第3题完成下面的实验报告。
四、实验步骤和结果
1、界面设计
实验D第4题
实验E中的第3题
2、属性设置
实验D第4题
实验E中的第3题
3、代码设计
实验D第4题
实验E中的第3题
五、实验结果分析和实验心得。
vb实训报告

vb实训报告在这份报告中,我将详细介绍我在VB实训中所进行的工作和学习成果。
通过这次实训,我对VB的掌握程度有了显著的提高,并且获得了宝贵的实践经验。
**项目背景和目标**首先,我将介绍我们所进行的VB实训项目的背景和目标。
我们的项目是设计一个学生信息管理系统,旨在提高学校学生信息管理的效率和准确性。
我所负责的任务是开发一个学生选课模块,使学生能够在线选择课程,并将选课结果及时更新到数据库中。
**需求分析**为了开发出一个满足实际需求的学生选课模块,我首先进行了详细的需求分析。
我与实训导师和其他团队成员一起讨论,并借助流程图和数据流图等工具进行可行性分析和功能规划。
通过需求分析,我确定了以下主要功能:1. 学生登录:学生可以使用其学号和密码登录系统。
2. 课程列表:学生可以查看当前可选的课程列表,包括课程名称、授课教师和课程时间等信息。
3. 选课功能:学生可以根据自己的需求选择课程,并将选课结果保存到数据库中。
4. 课程查询:学生可以通过课程名称或教师姓名等关键词进行课程查询。
5. 已选课程查看:学生可以查看自己已选的课程列表。
**系统设计与实现**在需求分析的基础上,我进行了系统设计与实现的工作。
首先,我使用VB进行界面设计,力求使界面直观、友好,并具备良好的用户体验。
在设计界面时,我采用了常见的元素布局和色彩搭配,以确保系统整体的美观和易用性。
接下来,我着手进行程序的编码工作。
我采用了面向对象的编程思想,将系统的不同功能模块进行分离,并使用模块间的接口进行交互。
在编码过程中,我注重代码的规范性和可维护性,使用了有意义的命名并写明了注释,以方便后期的维护和改进工作。
**测试与优化**完成编码后,我进行了系统的测试工作。
我使用了黑盒测试和白盒测试相结合的方法,对系统的功能、性能和稳定性进行了全面测试。
在测试过程中,我发现了一些潜在的问题,并及时进行了修复和优化。
通过多轮的测试与优化,我确保了系统的稳定性和功能的完备性。
vb报告 (3)

目录一.目的 (2)二.题目 (2)三.问题描述 (2)四.程序设计说明 (2)五.程序数据类型和函数 (4)六.结束语 (5)七. 源代码 (6)沈阳理工大学机械工程学院Vb程序设计训练任务书学生姓名:班级:100101学号:100101设计题目:时钟设计要求:制作一个提取系统时间并正确走时的时钟该时钟有时针、分针和秒针,并且可以走动,如果系统时间正确,则它的时间也准确课程设计报告一.目的计算机程序设计训练是学习完《vb程序设计》课程后进行的一次全面的综合性上机实验。
其目的在于为学生提供了一个既动手又动脑,独立实践的机会,将课本上的理论知识和实际有机的结合起来,锻炼学生的分析解决实际问题的能力。
提高学生适应实际,实践编程的能力。
实验报告内容:二.题目:时钟三.问题描述根据题目要求使用VB设计语言制作一个简易的指针式时钟本程序应具有以下功能:1.在程序窗口中能有一个指针式时钟,此时钟拥有时针,分针和秒针。
2.时钟的三个指针能够如真实指针式时钟一样转动,并且所指时间为电脑系统准确时间。
四.程序设计说明1.设计程序用到主要的控件(此处控件为制作时钟必不可少的,下面还有美化时钟的控件再做单独介绍)及其属性设置:此程序设计用到的控件有一个timer1,三个line,一个shape控件。
其中,timer的Interval属性值为1000,三个line的X1和Y1相同分别为2000和1500,line2和line3的borderwidth属性值都设置为2(使的时针和分针指针宽度略大于秒针指针)。
Shape的shape属性设置为3-circle。
Shape的height和width属性值都是2000(即用shape所画的圆半径为1000),Shape的left属性值为1000(计算方法为其属性值=X1-圆的半径1000),top的属性值为500(其属性值=Y1-圆的半径1000),这样设置是为了使得三线的交点在圆形的中心。
vb程序实验报告

vb程序实验报告VB 程序实验报告一、实验目的通过本次实验,深入了解和掌握 Visual Basic(VB)程序设计的基本概念、语法和编程技巧,提高解决实际问题的能力,培养逻辑思维和创新能力。
二、实验环境操作系统:Windows 10开发工具:Microsoft Visual Basic 60三、实验内容本次实验主要包括以下几个方面的内容:1、界面设计使用 VB 的窗体设计器,创建一个简单的用户界面,包含文本框、按钮、标签等控件,并设置其属性,如字体、颜色、大小等,以实现美观和友好的用户交互。
2、变量与数据类型在程序中声明不同类型的变量,如整数型(Integer)、字符串型(String)、布尔型(Boolean)等,并进行赋值和运算操作,理解不同数据类型的特点和适用场景。
3、控制结构运用顺序结构、选择结构(IfThenElse、Select Case)和循环结构(ForNext、WhileWend)编写程序,实现条件判断和重复执行的功能,例如计算阶乘、判断素数、打印九九乘法表等。
4、数组与过程定义数组来存储和处理大量的数据,掌握数组的声明、初始化和遍历操作。
同时,学习使用过程(Sub 过程和 Function 过程)来封装可重复使用的代码块,提高程序的可读性和可维护性。
5、文件操作实现对文本文件的读写操作,包括创建文件、写入数据、读取数据和关闭文件,了解文件处理在实际应用中的重要性。
四、实验步骤1、界面设计(1)打开 Microsoft Visual Basic 60,新建一个标准 EXE 工程。
(2)在窗体上添加所需的控件,如文本框 Text1、Text2,命令按钮 Command1、Command2,标签 Label1 等。
(3)通过属性窗口设置各个控件的属性,如 Text1 的 Text 属性为空,Command1 的 Caption 属性为“计算”,Label1 的 Caption 属性为“结果:”等。
VB实验三 实验报告

实验报告三实验目的(1)掌握Function过程的定义及调用(2)掌握Sub过程的定义和调用(3)掌握过程调用之间参数传送的方法(4)掌握变量的作用域实验内容第7周实验内容【实验1】、【实验2】、【实验3】其中【实验1】可以查考教材P127例6-1【实验1】编写计算n! 的函数过程,调用该过程,计算1!+2!+3!+……+10!之和(10分)实验结果:【实验1 代码】【实验1 典型结果】【实验2】编写计算n! 的子过程,调用该过程,计算1!+2!+3!+……+10!之和(10分)实验结果:【实验2 代码】【实验2 典型结果】【实验3】编写计算n!的函数过程,调用该过程,计算e x的近似值(10分)e x=1+x/1! +x2/2!+x3/3!+ ……+x n/n!要求:1)x的值用InputBox函数输入2)要求精度:x n/n!<0.000001实验结果:【实验3 代码】【实验3 典型结果】【实验4】编写程序输出200~300之间的素数。
(10分)要求:1)利用函数过程判断每个数是否是素数,是素数则返回1,否则返回0 2)将素数输出到列表框实验结果:【实验4 典型结果】【实验5】编写程序验证100以内数的哥德巴赫猜想(任意一个大于6的偶数可以表示成两个素数之和),要求素数判断用函数过程实现。
(15分)实验结果:【实验5 代码】【实验5 典型结果】【实验6】编写一个Sub过程用于将一个数据插入到有序数组中,使用这个sub过程实现从一个顺序文件中读入一组有序数,将数据55插入到有序数组中,并将整个数组存入顺序文件c:\result1.txt内。
(10分)实验结果:【实验6 代码】【实验6 典型结果】【实验7】编写一个通用子过程实现将某个数据从数组中删除的功能,使用这个sub过程将数据55从有序数组(3,6,9,12,27,36,40,55,59,62,77)中删除,然后将数组存入顺序文件c:\result2.txt内。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
实验报告三
实验目的
(1)掌握一维数组(静态、动态)定义及使用
(2)掌握二维数组(静态、动态)定义及使用
(3)掌握“控件数组”的使用
(4)掌握数组相关算法(求最值,排序,查找)
(5)通过数组巩固循环及多重循环程序设计
实验内容
【实验1】对一维数组A(1 to 10)先赋值1、3、5、7、9、11、13、15、17、19,然后再输出。
程序运行界面如下图所示。
(5分)
掌握一维静态数组的定义及使用
实验结果:
【实验1 代码】
Option Base 1
Dim A(1 T o 10) As Integer
Private Sub Command1_Click()
Dim i As Integer
For i = 1 T o 10
A(i) = 2 * i - 1
Next i
End Sub
Private Sub Command2_Click()
Dim i As Integer
For i = 1 T o 10
Print A(i)
Next i
End Sub
Private Sub Form_Load()
End Sub
【实验1 典型结果】
【实验2】用Array函数对一维数组进行赋值,程序运行界面如下图(5分)
掌握一维动态数组的定义及使用
实验结果:
【实验2 代码】
Option Base 1
Dim a
Private Sub Command1_Click()
a = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)
End Sub
Private Sub Command2_Click()
Dim i As Integer
For i = 1 T o 10
Print a(i);
Next i
End Sub
Private Sub Form_Load()
End Sub
【实验2 典型结果】
【实验3】动态数组声明及输入输出,程序运行界面如下图所示。
(10分)
掌握动态数组的使用
实验结果:
【实验3 代码】
Private Sub Command1_Click()
Dim a() As Integer
n = 3
ReDim a(n)
a(1) = 10
a(2) = 20
a(3) = 30
Print a(1), a(2), a(3)
Print "用Redim Preserve a(n)改变数组大小"
n = 4
ReDim Preserve a(n)
a(4) = 40
Print a(1), a(2), a(3), a(4)
End Sub
【实验3 典型结果】
【实验4】静态声明一个二维数组,输入和输出该数组各元素的值 (10分) 要求:1.计算并输出数组主对角线和次对角线元素的和。
2.交换1、3行后输出整个数组的值 3.交换数组的行与列后输出整个数组的值
12345678910111213141516171819202122232425⎡⎤
⎢⎥⎢
⎥⎢⎥⎢
⎥⎢⎥⎢⎥⎣⎦
掌握二维数组的定义及使用
实验结果:
【实验4 代码】
【实验4 典型结果】
【实验5】利用控件数组模拟电话拨号程序,界面设计如图4-4所示。
要求按任意一个字符,在文本框中显示,最多可拨11位数字字符,单击“重拨”按钮,重新显示原来所拨的号码。
建立Command1控件数组,索引为0-9;Command2和Command3分别为“重拨”、“清屏”按钮;Timer1控件为“重拨”服务。
(10分)
掌握控件组的使用
实验结果:
【实验5 代码】
Dim no As String, i As Integer
Private Sub Command1_Click(Index As Integer)
T ext1.T ext = T ext1.T ext & Index
End Sub
Private Sub Command2_Click()
no = T ext1.T ext
T ext1.T ext = ""
i = 1
Timer1.Interval = 200
Timer1.Enabled = True
End Sub
Private Sub Command3_Click()
T ext1.T ext = ""
Timer1_Timer()Private Sub Timer1_Timer()
T ext1.T ext=T ext1.text&mid(no,i,1)
i=i+1
If i >Len(no) Then Timer1.Enabled=False
End Sub
【实验5 典型结果】
【实验6】随机产生10个100-999之间的数以递增顺序存放在列表框中,并实现对列表框内数据插入、删除等操作,使得列表框内数据还是有序。
程序运行界面如下图所示(10分)
掌握数组插入与删除操作
实验结果:
【实验6 代码】
【实验6 典型结果】
【实验7】设计一个利用简单组合框对各省、直辖市名称维护的应用程序。
要求:添加不重复的省或直辖市到组合框中,对不正确的可修改,以按汉字内码顺有序显示。
运行效果如下图所示。
(10分)
掌握数组常用算法:插入与删除操作
实验结果:
【实验7 代码】
【实验7 典型结果】
【实验8】用比较法对数组中的元素按升序排列,程序运行界面如下图所示。
(10分)
掌握数组常用算法:数组排序
实验结果:
【实验8 代码】
【实验8 典型结果】
【实验9】选择法对数组中的元素按升序排列,程序运行界面如下图所示。
(10分)
掌握数组常用算法:数组排序
实验结果:
【实验9 代码】
【实验9 典型结果】
【实验10】用冒泡对数组中的元素按升序排列,程序运行如下图所示。
(10分)
掌握数组常用算法:数组排序
实验结果:
【实验10 代码】
【实验10 典型结果】
【选做1】利用一维数组,统计一个班学生成绩0~59,60~69,70~79,80~89,90~100各分数段的人数,生成一个各分数段的柱状图。
人数为运行时输入,成绩给定方法要求为键盘输入。
(5分)
掌握控件数组的使用
实验结果:
【选做1代码】
【选做1典型结果】
【选做2】从键盘输入10个整数,存放在一个一维数组中,然后将前5个元素与后5个元素交换,即第1个与第10个交换,第2个与第9个交换……(5分)
掌握一维数组的使用
实验结果:
【选做2代码】
【选做2典型结果】
实验小结
1.遇到的问题:
2.对课程的建议:。