vb实验二
《程序设计基础—VB程序实验》
《程序设计基础—VB程序实验》说明：实验1和实验2均为电子实验报告，后面8个实验是纸制实验报告。
实验1 计算机基本操作实验目的⑴熟悉计算机，能够正确进行开、关机操作。
⑵熟悉键盘，掌握键盘上所有字符的输入，掌握正确的指法，能够进行中、英文切换。
⑶理解操作系统概念，掌握Windows XP的基本操作，能够利用“控制面板”进行一些参数的设置。
⑷知道“回收站”的功能，学会有关文件、文件夹的基本操作。
⑸学会在计算机上搜索或查找相关的文件或文件夹，掌握通配符的使用。
实验内容⑴熟悉上机实验的计算机，熟悉键盘，学会中、英文输入方式的转换。
⑵学会用正确的指法进行输入，知道键盘上所有字符的输入。
⑶利用“控制面板”修改系统时间、桌面背景、鼠标属性。
⑷在桌面上新建一个文件夹，该文件夹以学生自己的名字+班级+学号的后3位命名。
⑸用文本方式或Word文档，写一段字数不少于300字的自我介绍，以1.doc命名并保存到上述文件夹中。
⑹将上述文件夹复制到ftp://10.10.9.222上。
实验2 常用软件的基本操作实验目的⑴了解Word功能，掌握Word的基本操作，包括页眉/页脚的设置、分栏、页面设置、添加底纹等。
⑵学会文件的保存与打开、打印预览、段落的间隔、首字符位置改变等，能够在Word中插入图片、表格、艺术字、特殊符号等。
⑶了解Excel的功能，掌握Excel的基本操作，包括单元格属性的设置、数字的几种填充形式、单元格的合并与恢复、边框的设置等。
⑷掌握Excel的基本公式的使用，能够用公式进行基本计算。
掌握Excel中的图形制作方法，能够根据表格做出图形。
实验内容⑴将ftp上自己文件夹中的1.doc文件复制到桌面上，然后做如下处理：①将标题“自我介绍”居中；②将文章中第二段的内容进行分栏，要求中间有分割线；③插入一个4行4列的表格，内容为学号、姓名、某门课的成绩；④任意插入一张图片；⑤在文章中的任意位置加底纹。
将做好的文档以2.doc命名并保存。
VB实验--------所有实验题目
实验题目总体要求：本学期的所有的实验题目，希望同学们按如下步骤认真做，（1）先画出处理界面（窗体）；（2）再给出处理步骤，（3）写出程序代码：可参考下面的例题：例如：设计程序，求1+2+3+...+N 的和值。
其处理过程是：（一）设计界面（在纸上画出界面，并注明各控件的名称）：（二）处理步骤：单击命令按钮，按以下步骤处理（1）定义3个变量：N ，s ，x ，分别用于存放：输入的数值，和值，控制循环（2）将文本框1的值，提供给变量N ；（3）s=0（累加前，将变量s 初始化为0）；（4）X=1（设置循环的开始值）（5） 当X<=N 时 重复执行S=s+xX=X+1（5）在文本框2中显示和值S（三）编写有关的代码：Private Sub Command1_Click()Dim n%，s%，x%N=val(text1.text)S=0X=1Do while x<=nS=s+xX=x+1LoopText2=sEnd Sub文本框1：TEXT1 文本框2：TEXT21：Command1标签1：Label1 标签2：实验一：用语言或流程图描述处理步骤(1次)1.判定一个数X是否是偶数的处理步骤;2.写出求5的阶乘的计算步骤;3.写出求1+2+3+...... +100的计算过程;4.写出计算1!+2！+3！+4！+......+20!的计算步骤;5.写出求一元二次方程解的处理步骤;6.给出将三个整数A,B,C按从小到大的顺序排列的处理步骤;实验二：表达式及其运算的实现(1次)1.设计一个程序，完成利用文本框输入任意两个数的乘法运算，并显示计算结果。
2.进一步完善程序，完成利用文本框输入任意两个数的加法、减法、乘法、除法运算，并显示计算结果，3.再进一步，改进，完成，利用随机函数，产生任意两个100到200之间的整数，并完成两个数的加法、减法、乘法、除法运算，并显示计算结果。
4．求方程AX+B=0的解。
实验二 摄氏温度与华氏温度互转_Visual Basic程序设计实验指导_[共2页]
![实验二 摄氏温度与华氏温度互转_Visual Basic程序设计实验指导_[共2页]](https://img.taocdn.com/s3/m/f6c40fd503d8ce2f01662321.png)
9 笔记：（请记录注意事项、纠错过程、经典代码等内容）
实验二 摄氏温度与华氏温度互转
【实验内容】
设计一个程序完成华氏温度和摄氏温度之间的转换。
【实验指导】
华氏温度和摄氏温度之间的转换公式如下。
摄氏转华氏：华氏 = 摄氏*9/5+32。
华氏转摄氏：摄氏
=（华氏-32）*5/9。
【界面设计】
界面设计如图2-3
所示。
Command1Label1
Label2
图2-3 界面设计
【属性设置】
设计阶段可以在属性窗口中设置控件的部分属性。
Form1的Caption 属性设置为“华氏摄氏温度转换”。
Form1的FontName 属性设置为“宋体”。
Form1的FontSize 属性设置为“四号”。
Form1的FontBold 属性设置为“True ”。
Label1的Caption 属性设置为“摄氏温度”。
Label2的Caption 属性设置为“华氏温度”。
Command1的Caption 属性设置为“摄氏转华氏”。
Command2的Caption 属性设置为“华氏转摄氏”。
Command3的Caption 属性设置为“清空”。
【代码设计】
' 一些控件的初始属性也可在窗体的Load 事件中设置。
vb实验二
实验二窗体和标准控件[实验目的]1.掌握常用VB控件的使用方法2.掌握InputBox、MsgBox的使用方法3.掌握窗体的常用事件的使用。
[实验内容]一、命令按钮、标签及文本框控件的使用方法程序1：在窗体上建立两个标签、两个文本框和两个命令按钮，运行界面如左图所示。
要求在运行时，两个文本框中的内容均不允许用户编辑；如果用户在“原文”的文本框中选定所需的内容，单击“复制”命令按钮，则在“输出”文本框中输出选定的内容，如果第一个文本框中文本没有被选中，则复制全部内容；如果单击“结束”命令按钮，则结束程序的运行。
提示：●文本框中选定内容可以使用文本框的属性SelText（选定文本内容）、SelStart（选定文本起始点）、SelLength（选定文本长度）读取或设置。
●使文本框有滚动条，先设置文本框的MultiLine属性值为True，然后设置其ScrollBars属性为2（0为无滚动条，1为水平滚动条，2为竖直滚动条，3为两者皆有）。
●使文本框内容只读，设置Locked属性值为True。
想一想：如果要求原文中文本框的内容不通过属性窗口设置Text属性值，而是通过程序代码设置，则应该怎样修改程序？提示：可将设置该文本框的Text属性的代码写到窗体的Load事件中。
程序2：建立如下图所示的窗体，要求程序能对输入的“性别”和“邮政编码”、“电话号码”进行校验（性别只允许输入“男”或“女”，邮政编码必须是6位数字，电话号码必须是8位数字）。
所有的校验工作可以在单击“检查”按钮后进行，此时，程序检查所有文本框，如果输入的数据不符号要求，则清空相应的文本框，并将焦点入点置于该框中。
提示：●在过程中间要退出过程可使用命令“Exit Sub”，通过函数Len(字符串)可得到字符串的长度，通过函数IsNumeric(字符串)可检验字符串是否是数值。
想一想：●如果要求在文本框失去焦点时就对文本框的内容进行校验，则如何编程？提示：●可以在文本框的LostFocus事件中对当前文本框输入的内容进行检查。
VB软件误差理论实验
实验二 误差的基本性质与处理 一、实验目的了解误差的基本性质以及处理方法二、实验原理（1）正态分布设被测量的真值为0L ，一系列测量值为i L ，则测量列中的随机误差i δ为iδ=iL -0L （2-1）式中i=1，2，…..n.正态分布的分布密度()()222f δσδ-=（2-2）正态分布的分布函数()()222F e d δδσδδ--∞=⎰（2-3）式中σ-标准差（或均方根误差）； 它的数学期望为()0E f d δδδ+∞-∞==⎰ （2-4） 它的方差为()22f d σδδδ+∞-∞=⎰ （2-5）（2）算术平均值对某一量进行一系列等精度测量，由于存在随机误差，其测得值皆不相同，应以全部测得值的算术平均值作为最后的测量结果。
1、算术平均值的意义在系列测量中，被测量所得的值的代数和除以n 而得的值成为算术平均值。
设 1l ，2l ，…,n l 为n 次测量所得的值，则算术平均值121...nin i l l l l x n n=++==∑ 算术平均值与真值最为接近，由概率论大数定律可知，若测量次数无限增加，则算术平均值x 必然趋近于真值0L 。
i v = i l -xi l ——第i 个测量值，i =1,2,...,;ni v ——i l 的残余误差（简称残差）2、算术平均值的计算校核算术平均值及其残余误差的计算是否正确，可用求得的残余误差代数和性质来校核。
残余误差代数和为：11n niii i v l nx ===-∑∑当x 为未经凑整的准确数时，则有1nii v==∑01）残余误差代数和应符合： 当1ni i l =∑=nx ，求得的x 为非凑整的准确数时，1ni i v =∑为零；当1nii l =∑>nx ，求得的x 为凑整的非准确数时，1ni i v =∑为正；其大小为求x 时的余数。
当1nii l =∑<nx ，求得的x 为凑整的非准确数时，1ni i v =∑为负；其大小为求x 时的亏数。
大学vb 实验作业2 简单控件的使用(一) - 副本
1、设计窗体。设计一个简单的计算器。参考界面如下：
2、设计窗体。参考界面如下：
要求：
1）将窗体背景设置为自己喜欢的颜色。
2）在窗体上添加一个标签控件，通过属性窗囗设置标签格式：
Caption：字体格式
Alignment：2—Center（居中）
Autosize：True（自动调整大小）
BorderStyle：1—Fixed Single（有边框）
要求：1）在文本框1输入内容时标题栏同步显示文本框1的内容。
2）文本框2获得焦点时显示文本框1内容的大写格式（Ucase函数）
3）文本框2失去焦点时文本框3显示文本框1内容的小写格式（Lcase函数）
4）双击文课给大家标注的属性。
6、验证教材P35[例1-9]和[例1-11]。
实验小结
实验名称
实验二简单控件的使用（一）
实验时间
第二周2013年9月11日3-6节、9月12日5-8节
实验目的
（1）进一步熟悉VB集成开发环境及程序设计的全过程。
（2）掌握基本控件窗体、标签、文本框、命令按钮的使用。
（3）掌握对象事件的应用。
（4）掌握顺序结构程序设计的方法。
实验环境
硬件:微型计算机
软件: Microsoft VisualBasic6.0
实验内容
3、设计窗体。设计一个能够统计某学生三门课程成绩总分和平均分的程序。参考界面如下图，要求：（1）启动窗体后标题栏再显示“学生分数的统计”（2）没有计算出总分前，计算均分的命令按钮不可用，计算出总分后，计算均分的命令按钮才可用。（属性介绍见书P26表1-2）
4、设计窗体，实现简单的文本编辑操作。
Backstyle：0—Tansparent（背景透明）
实验二缓冲溶液与pH值测定
4.电极校正
各种厂家不同品牌的pH计有所不同
7 20
取用pH＝6.86的 溶液定位。
再以pH=9.00或pH=4.01的缓 冲液测其斜率（或称为灵敏度)， 拭净后即可使用。电极校正后可 以暂时浸渍于蒸馏水中待命。
5 实验结束
实验结束后，将电极 洗净沾干，小心置入 保护套中，保护套中 应有足够的KCl溶液。
ΔpH
1. 缓冲溶液总浓度:缓冲比一定，缓冲溶液的总浓
度 ，缓冲能力 。
2. 缓冲比：总浓度一定时，若[共轭碱]／[共轭
酸]=1，则缓冲容量最大。
【操作流程】
0.100mol/L HAc
100 mL
0.100mol/L NaAc
100 混匀 mL
取40mL
取40mL
+
1.000mol/L NaOH 1－2
取
40m+L
1.000mol/L HCl 1－2滴
滴
测量各溶液的pH值。
取20mL
+
蒸馏水20mL
pH值的测量采用0.01级精密级pH 计源自数显斜率电极
mV、pH、oFF 定位
温补
pH计的使用
7.20
1.暖机
(1)将pH计的电源打开， 暖机5min以上。
77﹒22 00
2.清洗与沾干 以纯水清洗
01的缓冲液测其斜率（或称为灵敏度)，拭净后即可使用。 pH＝pKa + lg (2)
（1）选择适当的缓冲对，使所选缓冲 配制缓冲溶液时，若使用相同浓度的共轭酸和共轭碱，则可用其体积（V）比代替浓度比，即：
100mol/L NaAc 100mol/L NaAc
VB-
对中共轭酸的 pKa 与欲配制的缓冲溶液 实验二 缓冲溶液及其pH的测定
vb实验报告二
总结（对上机实验结果进行分析，上机心得体会及改进意见
忻州师范学院计算机系
实 验 报 告
学号：姓名：班级
课程名称
Visual Bisic 程序设计
实验课时
2课时
ห้องสมุดไป่ตู้实验项目
VB程序设计步骤
实验时间
指导老师
史文秀
实验成绩
实验目的（本次上机实验所涉及并要求掌握的知识点）
1、掌握Visual Bisic程序设计步骤
2、掌握窗体的常用成员
3、掌握命令按钮的使用
4、掌握标签的使用方法
5、掌握文本框的使用方法
6、进一步了解类、对象、属性、事件和方法的概念
实验环境
Visual
实验内容
1、设计一个VB小程序，包括一个文本框和三个单选按钮。要求单击“显示”按钮时，文本框中出现红色的“欢迎使用Visual Bisic!”的文字；单击“清除”按钮时，文本框中文字消失；单击“退出”按钮后，程序结束。（窗体标题为“练习”）
2、设计一个“我的窗体”为标题的小程序。利用窗体的属性和方法，在单击窗体时，显示“Visual Bisic”文字。
3、窗体中包括一个标签、一个文本框和一个单选按钮。在文本框中输入文字，单击“设置”按钮，则将窗体标题为相应的文字。
4、窗体中包括一个文本框和一个单选按钮。程序运行时，单击“显示”命令按钮，则将文本框按钮显示为黄色，并显示蓝色文字“hello”。
VB实验 线性表基本操作 冒泡排序法
实验二线性表的基本操作一．实验目的使用数组模拟一个线性表，并完成简单的操作。
二．实验条件和环境Visual Basic6.0集成开发环境三．实验任务和要求参照主教材《大学计算机基础》中例6-2，使用数组定义一个数组型的线性表，将0-20中的奇数依次插入到线性表中，并打印该表，输出13在线性表中的位置（以0为起始位置计算），随后删除13，并再次打印该表。
四．实验步骤和操作指导（一）实验步骤（1）运行Visual Basic6.0，新建一个工程应用程序。
（2）参照主教材《大学计算机基础》中的例6-2编写程序，包括定义线性表、主过程、线性表的插入过程、删除过程、打印过程、定位过程。
（二）操作指导（1）线性表表使用如下方式定义。
（放在模块中）Type listtypedata() As Integern As IntegerEnd Type（2）程序大致如下（放在窗体中，教材中的程序）Private Sub Form_Click()Const MAX As Integer = 1000Dim list As listtypeDim i As IntegerReDim list.data(MAX)Call initiate(list)For i = 0 To 9Call insert(list, i, i + 1)Next iCall print1(list)Call insert(list, 5, 99)Call print1(list)Call delete(list, 8)Call print1(list)End Sub（实验要求程序）Private Sub Form_Click()Const MAX As Integer = 20Dim list As listtypeDim i As IntegerDim loc As IntegerReDim list.data(MAX)Call initiate(list)For i = 0 To 9Call insert(list, i, 2 * i + 1)Next iCall print1(list)loc = locate(list, 13)Form1.Print "13在线性表的位置是："; locCall delete(list, loc)Call print1(list)End Sub（放在模块中）Sub initiate(ByRef l As listtype)l.n = 0End SubFunction getlength(ByRef l As listtype) As Integergetlenth = l.nEnd FunctionFunction getdata(ByRef l As listtype) As IntegerIf i >= 0 And i < l.n Thengetdata = l.data(i)Exit FunctionElseForm1.Print "要求的元素不存在，程序终止"EndEnd IfEnd FunctionFunction priordata(ByRef l As listtype, ByVal i As Integer) As Integer If i >= 1 And i < l.n Thenpriordata = l.data(i - 1)Exit FunctionElseForm1.Print "要求的元素不存在，程序终止"EndEnd IfEnd FunctionFunction nextdata(ByRef l As listtype, ByVal i As Integer) As Integer If i >= 0 And i < l.n - 1 Thennextdata = l.data(i + 1)Exit FunctionForm1.Print "要求的元素不存在，程序终止"EndEnd IfEnd FunctionFunction locate(ByRef l As listtype, ByVal x As Integer) As Integer Dim i As Integeri = 0Do While i < l.nIf x = l.data(i) Thenlocate = iExit FunctionEnd Ifi = i + 1Looplocate = -1End FunctionSub insert(ByRef l As listtype, ByVal i As Integer, ByVal x As Integer) Dim j As Integerj = l.nIf i >= 0 And i <= l.n ThenDo While j > il.data(j) = l.data(j - 1)j = j - 1Loopl.data(i) = xl.n = l.n + 1ElseForm1.Print "插入位置不正确！，程序终止"EndEnd IfEnd SubSub delete(ByRef l As listtype, ByVal i As Integer)If i >= 0 And i < l.n ThenDo While i < l.nl.data(i) = l.data(i + 1)i = i + 1Loopl.n = l.n - 1ElseForm1.Print "删除位置不正确，程序终止"EndEnd SubSub print1(ByRef l As listtype)Dim i As IntegerFor i = 0 To l.n - 1Form1.Print l.data(i)Next iForm1.Print "表长为："; l.nEnd Sub实验三VB冒泡排序法一．实验目的熟悉VB集成开发环境，掌握一种排序算法，即冒泡排序法二．实验条件和环境Visual Basic6.0集成开发环境三．实验任务和要求1.将一组数据(12.5, 34, 45, 21, 67, 4, 12, 45, 47, 56)从小到大排序，要用冒泡排序法四．实验内容1.实验步骤（1）运行Visual Basic6.0，新建一个工程应用程序。
vb报告地理
VB 实验报告班级：学号：姓名：指导教师：实验一了解vb一些简单的功能一. 实验目的1.掌握VB6．0的启动与退出。
2.了解VB6．0的集成开发环境，熟悉各主要窗口的作用。
3.掌握在VB6．0中创建和运行简单应用程序的方法。
4.掌握在窗体上添加控件以及调整控件的大小和位置的方法，掌握简单的多窗体应用程序的创建。
二．实验准备工作软件准备：安装Microsoft Visual Basic 6.0中文版，单击【开始】，指向【程序】，指向【Microsoft Visual Basic 6.0中文版】，单击【Microsoft Visual Basic 6.0中文版】，即可启动VB。
三．实验内容1.打开Visual Basic，在【新建工程】对话框中选择“标准EXE”,单击【打开】按钮，进入Visual Basic集成开发环境。
2.新建工程，设置窗体form1的属性，属性设置如图，属性设置BackColor &H00000000&Borderstyle 3-Fixed DialogFont 宋体、三号ForeColor &H00FFFFFF& StartUpPosition 2-屏幕中心3.代码编写。
在对象窗体中双击Form1窗体，会自动切换到代码窗口。
并且以生成了Load事件过程的代码框架。
4.运行结果如下图，单击时双击时5.运行无误后，保存工程。
实验二vb中一些常用的函数与表达式的用法一．实验目的1.掌握变量的定义方法。
2.掌握常用内部函数的方法。
3.掌握运算符和表达式的用法。
二．实验准备工作软件准备：安装Microsoft Visual Basic 6.0中文版，单击【开始】，指向【程序】，指向【Microsoft Visual Basic 6.0中文版】，单击【Microsoft Visual Basic 6.0中文版】，即可启动VB。
三．实验内容1.打开Visual Basic，在【新建工程】对话框中选择“标准EXE”,单击【打开】按钮，进入Visual Basic集成开发环境。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
软件技术实验报告
序号实验二名称界面辅助工具的应用
实验内容及完成情况：
运用VB中提供的界面辅助工具生成一个应用程序界面，要求该界面带有顶行下拉菜单和工具栏按钮。
掌握Toolbar、Imagelist、StatusBar等控件的加载、设置和使用，窗体间的切换方法。
实验中遇到的问题及解决方法：
这个实验相比第一个实验比较复杂。
因为用的这些个空间全是新的，尤其是下拉菜单。
不了解那个东西。
所以实验挺费劲的。
解决方法就是好好听老师讲，然后看老师是怎么操作的，这样你按着老师说的去做就一般不会错了。
所以这个也体现了上课听老师讲课时特别重要的，这样自己就可以少走弯路。
实验中所涉及的知识及技术：
实验中要求采用两个外部控件即Toolbar和ImageList,向 ImageList 控件中置入合适的图象，将 ImageList 控件与Toolbar控件相关联，向 Toolbar 控件中添加按钮，打开菜单编辑器，可在VB的顶行菜单下面的工具栏点击快捷按钮或在顶行菜单中找到“工具”菜单并下拉选择单击“菜单编辑器”，然后逐一填写标题框中的标题（即你希望出现在顶行菜单中的标题文字和名称框中的名称（即你将要在程序中使用的有关于该菜单操作时的英文标识符），选择你喜欢的界面图片设置为该窗体的picture属性，状态栏控件的使用，在该工程中添加若干窗体（与Toolbar生成的按钮数相同），并且在每个窗体上放一个命令按钮，以便实现窗体间的切换。
实验中的创新及功能扩充：
实验中要求采用两个外部控件即Toolbar和ImageList,这两个控件都是ActiveX控件，都被包含于VB中携带的“Microsoft Windows Common Control 6.0”控件组中，需要在“工程”下拉菜单中找到“部件”并单击之，随后在弹出的控件目录中点选“Microsoft Windows Common Control 6.0”，使之“应用”并“确定”，这样，该组控件便被全部添加到了工具箱中。
向 ImageList 控件中置入合适的图象，即把未来要用于界面中按钮上的小图标预先置入ImageList 控件，最左边一列菜单项即为顶行菜单显示项，如果需要生成下拉，则每级级联都向右缩进一格。
通过双击控件图标快捷添加空间到窗体上；可以对空间进行复制粘贴，这样就省去了添加多个控件到窗体上的麻烦。
可以使用control键一次选中多个控件，并对其公共属性例如字体与字体颜色进行设置，这样不用分别设置，节省
时间。
排列控件时也可以一次全部选中，利用菜单栏中的格式进行排列，既整齐又快捷。
收获与体会：
首先要有强大的心理。
因为，这次的试验相比于前一次真的难很多。
所以，即使好好预习了，做起来仍然有一定难度。
但是当你认真去做了，你就会发现他其实没有你想象中那么难的，因为你克服了这个困难嘛。
所以它就不是那么难了。
其次，上课听老师讲很重要，尤其是听老师讲怎么做，这个时候要去看，要去记。
因为借用别人的成果你真的可以省好多力。
然后就是做实验一定要自己一步一步来，要有个纲，觉得自己要做什么样的，心里要有个数，然后怎么来，要有计划，不然乱作一团，特别混乱，又浪费时间。
备注：。