VB程序设计实验报告

VB程序设计实验实验一V isual Basic环境和程序设计初步一、实验目的1．了解Visual Basic系统对计算机软、硬件的要求。

2．掌握启动与退出Visual Basic的方法。

3．掌握建立、编辑和运行一个简单的Visual Basic应用程序的全过程。

4．掌握常用控件（文本框、标签、命令按钮）的应用。

二、实验内容实验1.1 联系将教学篇第一章重的例题自己建立一个工程，并运行程序，体会效果。

实验1.2 启动V isual Basic6.0，创建一个“标准EXE”类型的应用程序，要求在屏幕上显示“欢迎您使用Visual Basic”，并“请输入您的姓名”。

实验1.3 Move方法练习、移动具有浮雕效果的文字和插入图片。

在窗体插入心形图片，窗体上有以浮雕效果显示的字符串“新年快乐”，还有两个命令按钮。

按钮上分别有左右指向图案，要求当单击左指向按钮时，字符串“新年快乐”向左移动50个单位，单击右指向按钮时，向右移动50单位。

实验 1.4 若将上题改为上下移动，同时命令按钮的图标也相应改变，程序如何改写？若用Move方法实现，会出现什么问题，如何使用？实验1.5 Print方法练习，显示字符图形。

实验1.6 字号、按钮、随机函数练习在文本框输入一字符串，对字号进行放大和缩小，缩放比例由随即函数产生。

实验二顺序程序设计一、实验目的1．掌握表达式、赋值语句的正确书写规则。

2．掌握常用函数的使用。

3．掌握InputBox与MsgBox的使用。

二、实验内容实验2.1 编一个华氏温度与摄氏温度之间转换的程序。

所用公式为：3259+=C F )32(95-=F C ，要求用按钮实现转换。

即单击“华氏转”按钮，则将摄氏温度转换为华氏温度，同样，单击“摄氏转”按钮，则将华氏温度转换为摄氏温度。

实验2.2 输入半径，计算圆周长和圆面积。

实验2.3 窗体上有2个命令按钮，第一个按钮显示“文字处理”，第2个按钮显示“VB6.0”,要求单击命令按钮，，利用shell 函数执行对应的应用程序。

实验报告01：熟悉Visual Basic 6.0编程环境一、实验目的1．熟悉Visual Basic 6.0编程界面。

2．掌握编写VB6.0程序的基本过程。

3．能够建立VB工程，制作应用程序界面，输入程序代码，并执行程序和生成EXE可执行程序。

二、实验内容1．熟悉VB编程界面2．编写程序。

（1）在使用VB系统设计应用程序时，一般包括两个阶段，分别是界面设计阶段和代码设计阶段。

（2）一个完整的VB工程包括一个工程文件（*.vbp）、至少一个窗体文件（*. frm ）。

（3）某个程序的界面设计如图所示：其中在窗体上显示文字的是标签控件。

需要将窗体的Caption 属性设置为“欢迎窗口”。

3．设计一个简单的VB程序，界面和各个对象属性初值如下：对象属性初值按钮1（Command1）Caption 确定按钮2（Command3）Caption 结束标签1（Label1）Caption 请输入你的姓名标签2（Label2）Caption 空文本框（Text1）Text 空要求：输入姓名后，单击“确定”按钮，将在下方Lable2标签中显示文本框中姓名&“，祝你学好VB程序设计！”（1）界面设计：向窗体中添加两个按纽（C ommand1、Command2）、二个标签（Lable1、Lable2）、一个文本框（Text1）。

（2）设置好各对象属性值。

（3）编写两个命令按钮的事件代码。

（4）调试运行程序。

（5）在桌面上建立文件夹，保存工程，工程文件命名为sy1_1.vbp，窗体文件命名为sy1_1.frm。

三、思考题1．VB采用了面向对象的程序设计思想。

2．窗体上有一个文本框Text1，为了在该文本框中显示“Hello！”，所使用的语句是Text1.Text=”Hello!”。

3．用户在输入程序代码时，是否需要区分大小写？词与词之间的空格是否可以删除？答：不需要区分大小写。

词与词之间的空格不可以删除。

4．简单说明VB应用程序的开发步骤答：（1）创建工程（2）建立用户界面（3）设置各个对象的属性（4）编写事件过程代码（5）运行调试程序（6）保存程序（7）生成可执行文件。

VB程序设计实训报告心得体会1. 引言本报告旨在总结和分享我在VB程序设计实训过程中的心得体会和对VB课程设计报告的思考。

VB（Visual Basic）是一种基于事件驱动的编程语言，常用于Windows应用程序的开发。

通过该实训，我对VB 的特性和应用进行了深入了解，并运用所学知识完成了一个实际的课程设计报告。

2. 实训过程在整个实训过程中，我遵循了以下几个步骤：2.1 需求分析和设计首先，我对课程设计报告的需求进行了分析，并根据需求设计了相应的界面和功能。

这一步骤非常重要，它决定了后续的编码和实现过程。

2.2 编码实现接下来，我利用VB编程语言，根据需求分析和设计的结果，逐步实现了报告生成所需的功能。

在编码的过程中，我注意了代码的可读性和可维护性，同时遵循了一定的编程规范。

2.3 调试和测试完成编码之后，我对程序进行了调试和测试。

通过不断地调试和修改，我确保了程序的正确性和稳定性。

同时，我对程序的界面进行了优化，以提升用户体验。

2.4 优化和改进在测试阶段，我还发现了一些潜在的问题和改进点。

我进行了进一步的优化和改进，以提升程序的性能和功能。

通过这一过程，我学会了持续改进和迭代的重要性。

3. 心得体会在完成该实训过程中，我获得了以下几点心得体会：3.1 学会需求分析和设计在实际的编程过程中，需求分析和设计是至关重要的。

只有对需求有清晰的理解并合理地设计程序，才能高效地完成开发任务。

因此，我意识到需求分析和设计在编程中的重要性，并努力提升自己在这方面的能力。

3.2 重视代码质量和编程规范编码是程序开发过程中最基本的环节。

良好的编码习惯和规范能够提高代码的可读性和可维护性，进而提升开发效率和代码质量。

因此，我在编码的过程中，一直注意保持良好的编程规范，并时刻关注代码质量。

3.3 持续改进和学习通过实训，我深刻认识到编程是一个不断探索和学习的过程。

在开发过程中，我遇到了许多问题和挑战，但通过不断地改进和学习，我成功地解决了这些问题，并提升了自己的编程能力。

湖北文理学院VB程序设计课程实验报告学院物电学院专业自动化班级 1211学号姓名王亮任课教师王福林实验一、VB控制结构一、实验目的1.掌握选择语句的使用2.掌握循环语句的使用二、实验内容1、选择语句程序1：创建应用程序。

要求：单击窗体可弹出输入框，任意输入三个数，然后按从小到大的顺序输出到窗体上。

程序2：创建应用程序。

要求：单击窗体可弹出一输入框，任意输入一个正整数，在窗体上显示该整数是否为素数的字样。

2、循环语句程序3：创建应用程序。

要求：单击窗体可显示一个由“*”组成的平行四边形图案。

程序4：创建应用程序，其功能是显示所有的水仙花数。

三、实验记录程序1如下：Private Sub Command1_Click()Dim a As Integer, b As Integer, c As Integer, t As Integer '定义a,b,c,t为整形变量Cls '清屏a = Val(InputBox("请输入第1个数：")) '给a赋值b = Val(InputBox("请输入第2个数：")) '给b赋值c = Val(InputBox("请输入第3个数：")) '给c赋值If a > b Then t = a: a = b: b = t '如果a>b，把a的值赋给t，b的值赋给a，t的值赋给bIf b > c Then '嵌套，如果b>ct = b: b = c: c = t '把b的值赋给t，b的值赋给c，t的值赋给cIf a > b Then '再次嵌套，如果a>bt = a '把a的值赋给ta =b 'b的值赋给ab = t 't的值赋给bEnd IfEnd IfPrint a; "、"; b; "、"; c '输出 a "、"b;"、"; c End SubPrivate Sub Command2_Click()End '退出程序End Sub程序2如下：Private Sub Command1_Click()Dim i As Integer, k As Integer, n As Integer '定义整形变量i,k,n n = Val(InputBox("任意输入一个整数：")) '给n输入值i = 2 'i初始值为2k = Int(n / 2) '为整形的二分之一n的值赋给kDo While i <= k '当i小于且等于k If n Mod i = 0 Then '如果n模除i为0 Exit Do '退出循环Elsei = i + 1 '否则i加1End IfLoopIf i > k Then Print n; "是素数" Else Print n; "不是素数" '如果i大于k，输出n的值是素数，否则输出n的值不是素数End SubPrivate Sub Command2_Click()End ' 退出程序End Sub程序3如下：Private Sub Form_Click()Dim m As Integer, n As Integer '定义整形变量m,nCls '清屏PrintFor m = 1 To 6 'm赋初始值为1，当m大于6停止 Print Tab(15 - m); '第15 - m列开始输出For n = 1 To 8 'n赋初始值为1，当n大于6停止 Print "*"; '输出*Next nPrint "" '输出空格Next mEnd Sub程序4如下：Private Sub Command1_Click()Dim i As Integer, m As Integer, n As Integer, k As Integer, sxh As Intege '定义整形变量i,m,n,k,sxkFor i = 100 To 999 'i赋初始值为100，当i大于999，停止循环 m = i \ 100 'i除以100，结果赋给mn = (i Mod 100) \ 10 'i模除100后的值再除以10,最后结果赋给n k = i Mod 10 'i模除10后的值赋给ksxh = m ^ 3 + n ^ 3 + k ^ 3 'sxh作算术运算If sxh = i Then '如果sxh等于iPrint i, '输出i的值End IfNext iEnd SubPrivate Sub Command2_Click()End '程序结束End Sub四、实验总结实验二、窗体和标准控件一、实验目的1.掌握命令按钮、标签及文本框控件的使用方法2.掌握复选框、单选按钮及框架控件的使用方法3.掌握列表框和组合框控件的使用方法4.掌握滚动条和定时器控件的使用方法二、实验内容1、命令按钮、标签及文本框控件的使用方法程序1：在窗体上建立两个标签、两个文本框和两个命令按钮，运行界面如左图所示。

Visual Basic程序设计实验(本科)教学大纲实验课程名称：Visual Basic程序设计实验课程性质：基础必修适用专业：理工科各专业实验总学时： 48 学分数：4（含理论）教材：《Visual Basic程序设计方法》李敬有主编北京航空航天大学出版社参考书：《Visual Basic程序设计》邓文新主编北京航空航天大学出版社一、实验教学目标与要求：目标：以Visual Basic 6.0中文版为语言背景，通过实验进一步理解程序设计的基本知识，掌握可视化程序设计的基本思想以及会用VB开发工具设计一些实用的应用程序。

重点培养学生的编程能力、理论联系实际的能力、程序的调试能力及创新能力。

要求：注意自始至终贯彻课程中所介绍的程序设计风格，养成良好的编程习惯。

事先预习设计好程序，上机过程中能顺利完成程序的调试，独立完成所布置的上机作业。

第一次实验报告课程名称：Visual Basic 程序设计实验实验项目：VB集成开发环境实验室：15J13室（504）机器编号：班级：数学072姓名：姓名(学号)实验日期：2008年3月8日目的:1.熟悉VB集成开发环境的组成及设置；2.掌握VB的启动、退出方法；3.掌握VB创建工程的基本步骤。

软硬件环境：硬件：cpu主频：2.4GHz,内存：256M，硬盘：80G软件：Windows 2000操作系统，Visual Basic 6.0内容:1.练习VB的启动、退出方法；2.利用“视图”菜单显示属性窗口、代码窗口、工程资源管理器窗口、工具箱等；3.建立一个简单的VB程序，运行并保存；4.通过“工具”菜单的“选项”命令设置VB环境。

实验数据记录第二次实验报告课程名称：Visual Basic 程序设计实验实验项目：基本控件实验室：15J13室（504）机器编号：班级：姓名：实验日期：2008年3月23日实验目的：掌握常用控件（标签、文本框、命令按钮）的属性、事件和方法。

实验报告一实验目的（1）熟悉Visual Basic6.0集成开发环境（2）掌握Visual Basic程序的开发过程，能够运行一个完整的Visual Basic程序（3）掌握选择控制结构（If、Select case）语句实现程序分支（4）掌握控制结构相关控件（单选按钮、复选框）（5）能综合运用选择及循环控制结构解决较复杂的问题实验内容一、VB环境和顺序结构【实验1】设计一个简单VB程序（10分）它由一个窗体、一个文本框和3个命令按钮组成。

窗体的标题为"Visual Baidc 程序设计示例"，当用户单击命令按钮“显示”时，文本框中出现“欢迎使用Visual Basic 6.0”,窗体上显示“你好”，单击命令按钮“清除”时,清除文本框中显示的内容和窗体上的内容，单击命令按钮“结束”时，结束程序。

实验结果：【实验1 代码】【实验1 典型结果】【实验2】编写程序，其功能为输入三角形的三边，求三角形的面积。

计算公式为：S=(a+b+c)/2，面积=sqr(s*(s-a)*(s-b)*(s-c)) （20分）程序界面如下所示实验结果：【实验2 代码】【实验2 典型结果】【选做1】单击窗体时，随机产生一个三位正整数，然后逆序输出该数，产生的数与逆序数同时显示，结果如下所示,要求用两种方法实现（使用数字的逆序和字符串的逆序）（15分）实验结果：【方法1 代码】【方法1 典型结果】【方法2 代码】【方法2 典型结果】二、选择结构【实验3】输入一年份，判断它是否为闰年，并显示有关信息。

判断闰年的条件为：1.能被4整除，但不能被100整除，2.或者能被400整除（注意各个条件表达式的括号）（20分）实验结果：【实验3 代码】【实验3 典型结果】【实验4】任意输入三个数，求三个数中最大数和最小数（15分）实验结果：【实验4 代码】【实验4 典型结果】【实验5】使用Inputbox任意输入三个边长，判断是否能构成三角形，若能构成三角形，则判断该三角形是等边、等腰还是一般三角形（15分）实验结果：【实验5 代码】【实验5 典型结果】【选做2】求解分段函数，要求输入x的值，输出计算得到的y值（5分）实验结果：【选做2 代码】【选做2 典型结果】实验小结1.遇到的问题：2.对课程的建议：⎪⎪⎩⎪⎪⎨⎧≥<≤<≤<=2000320001000210005005.1500xxxxxxxxy。

VB实验报告一（二）引言概述：VB（VisualBasic）是一种面向对象的程序设计语言，广泛应用于Windows操作系统中的软件开发。

本实验报告旨在详细介绍VB实验一（二）的内容与实验结果，并对其进行分析和总结。

正文内容：一、实验目的1.1学习VB语言的基本语法和开发环境的使用；1.2熟悉VB的界面设计和事件处理；1.3掌握VB语言中的数据类型、循环结构和条件语句。

二、实验步骤2.1搭建VB开发环境2.1.1并安装VisualStudio；2.1.2配置VB开发环境。

2.2界面设计2.2.1创建一个新的WindowsForms应用程序；2.2.2在设计窗口中添加控件，如按钮、文本框等；2.2.3设置控件的属性和事件。

2.3事件处理2.3.1编写相应按钮的Click事件处理程序；2.3.2实现按钮的功能，如计算、跳转等。

2.4数据类型的应用2.4.1声明和初始化变量；2.4.2使用不同数据类型进行计算和赋值。

2.5循环结构和条件语句2.5.1使用For循环和While循环实现特定功能；2.5.2利用条件语句实现条件判断。

三、实验结果3.1搭建VB开发环境成功；3.2界面设计符合预期，控件添加和属性设置正确；3.3事件处理程序编写无误，按钮功能正常；3.4数据类型的应用正确，计算和赋值结果准确；3.5循环结构和条件语句的实现正确。

四、分析与讨论4.1在搭建VB开发环境的过程中，可能会遇到版本兼容性问题，需要根据实际情况进行相应的配置和调整；4.2界面设计的合理布局与控件的正确设置对用户体验起到重要作用；4.3事件处理程序的编写需要注意语法的正确性和逻辑的严谨性；4.4在应用不同数据类型进行计算和赋值时，要注意数据类型的转换和溢出的问题；4.5循环结构和条件语句的合理运用能够简化程序的逻辑结构，提高代码的可读性和可维护性。

五、总结通过本次VB实验一（二）的学习和实践，我对VB语言的基本语法和开发环境的使用有了更加深入的了解。

VB实验报告《VB程序设计》实验单元一实验报告专业班级：姓名学号 2指导教师：王云侠完成时间： 3月22日实验一VB环境和可视化编程基础一、实验目的1 了解Visual Basic的安装2 掌握启动与退出Visual Basic3 掌握建立、编辑和运行一个简单应用程序的全过程4 掌握基本控件的使用二、实验环境VB6.0三、实验内容1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。

提示：对窗口编写两个事件：Form_Load事件对文本框初值设为空；Form_Click事件对文本框计数。

对文本框计数：Text1=Val(text1)+1 。

2、命令按钮、字号、内容和格式的复制练习。

按钮1：使得Text1中的文本按要求改变。

按钮2：将Text1中选定的文本复制到Text2. 控件名 Form1 Label1 Label2 Text1 属性 Ca ption=”实验2” 复制文本输入文本Text=“VB功能强大，但要下功夫学习才能学好。

” （每个同学文本框中内容可以不同） Text2 Command1 Command2 四、实验步骤1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。

从运用中点击vb6.0经典版Text=”” Caption=”隶书25磅” Caption=”复制=>” 打开标准 EXE 建立一个form 1添加一个Label和TextBox，Label的caption改为“你单击窗体的次数”，TextBox 的text改为空，然后编写代码如图点击运行即可。

2、命令按钮、字号、内容和格式的复制练习。

从运用中点击vb6.0经典版打开标准 EXE 建立一个form 1添加两个Label两个TextBox两个CommandButton，Label的caption改为“输入内容”和“复制效果”，TextBox的text改为“任意文字”和“空”，CommandButton的caption改为“隶书25磅”和“复制=>”。

实验一：设计简单的VB 应用程序一、实验目的1．掌握Visual Basic 启动和退出的方法。

2．熟悉Visual Basic 的集成开发环境。

3．掌握Visual Basic 程序设计的基本步骤，了解VB 程序的编写、保存和编译的方法过程。

4．初步了解几个常用基本控件控件（标签、命令按钮和文本框）的使用方法。

二、实验类型综合三、实验时间：2013-3-8四、实验任务1、启动Visual Basic ，然后创建一个“标准 EXE ”工程（保存在D 盘以自己学号命名的文件夹中，文件名和窗体名均为SJT ），并了解Visual Basic 集成开发环境下各组成部分及其作用。

2、编一程序，计算任意输入的正整数的平方根。

3、编写一个应用程序，界面如图1-1所示。

窗体中文字“VB 应用程序！”为一标签控件，单击标题为“放大”的命令按钮，则“VB 应用程序！”的字号放大一号，单击“缩小”按钮则反之；同时，窗体中还有4个含某种指向图案的按钮，若单击某个按钮，则使“VB 应用程序！”向该按钮所指向的方向移动50Twip 。

（提示：四种指向的图案可以在Visual Basic 安装目录中的“…graphics\icon\Arrows ”子目录中找到，名称分别为arw07dn.ico 、arw07lt.ico 、arw07rt.ico 和arw07up.ico ）五、实验要求 写出实验报告，内容是：1、第1小题的操作步骤2、第2、3题1).程序的界面设计。

2).程序主要代码。

3).运行结果（输入与输出）。

4).实验总结。

(写上你自己的总结。

可以从以下几个方面来总结：你在编程过程中花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)图1-1 实验1-2程序运行实验二：数据的输入和输出一、实验目的1．掌握常量和变量、表达式的基本概念和正确书写格式。

2．掌握基本语句（Print语句、赋值语句、Dim语句等）的使用；3、掌握常用函数的正确使用方法；4、掌握数据的动态输入InputBox和信息提示MsgBox的基本使用方法。

《VB程序设计》实验报告一、实验目的及要求（见实验书，要求手填）：1.了解系统对计算机软件、硬件的要求。

2.掌握启动与退出的方法。

3.掌握建立、编辑和运行应用程序的全过程。

4.掌握常用控件的使用，如文本框、标签、命令按钮、图片框。

二、实验完成情况：三、界面设计与程序代码要求：给出界面设计示意图，在属性窗口修改过的对象属性需列出，列出方式如下：1、创建一个程序步骤：①在窗体上建立3个标签、一个命令按钮和一个文本框。

②在代码窗口中选择Button1对象Click事件，在Button1-Click事件模板内输入代码。

③单击启动调试按钮运行程序。

④单击工具栏的“全部保存”按钮。

①界面设计②程序代码Public Class Form1Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickLabel3.Text = TextBox1.TextEnd Sub ③运行结果2、左右移动文字步骤：①在窗体上建立1个标签、1个命令按钮、1个定时器。

②在代码窗口分别对3个控件编写代码，最后编写左右移动的单位。

③单击启动调试按钮运行程序。

④单击工具栏的“全部保存”按钮。

①界面设计②程序代码Public Class Form1Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickTimer1.Enabled = TrueEnd SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickTimer1.Enabled = FalseCall mymove()End SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickCall mymove()End SubSub mymove()Label1.Left = Label1.Left + 50If Label1.Left > Me.Height Then Label1.Left = 0End SubEnd Class③运行结3、统计鼠标单击窗口的次数步骤：①在窗体上建立一个标签、一个文本框。

vb程序设计实验报告VB程序设计实验报告一、引言在计算机科学与技术领域中，程序设计是一项至关重要的技能。

Visual Basic （VB）作为一种强大的编程语言，被广泛应用于软件开发领域。

本实验报告旨在总结和分析我在VB程序设计实验中的学习和实践经验。

二、实验目的本次实验的主要目的是通过设计和实现一个简单的VB程序，加深对VB语言的理解和掌握。

通过这个实验，我将学习如何使用VB语言进行界面设计、事件处理和数据处理。

三、实验过程1. 界面设计在实验开始时，我首先进行了界面设计。

通过VB的可视化设计环境，我选择了合适的控件，布局了用户界面。

我使用了文本框、标签、按钮等控件，使用户能够输入数据并进行相应的操作。

2. 事件处理在界面设计完成后，我开始编写事件处理程序。

我为按钮添加了点击事件，当用户点击按钮时，程序会执行相应的操作。

例如，当用户点击“计算”按钮时，程序会读取用户输入的数据，并进行计算操作。

通过编写事件处理程序，我学会了如何响应用户的操作，并进行相应的逻辑处理。

3. 数据处理在实验中，我还学习了如何进行数据处理。

我使用了VB的变量和运算符，对用户输入的数据进行计算和处理。

通过编写算法和逻辑，我实现了对用户输入数据的验证和处理，确保程序能够正确运行。

四、实验结果经过一段时间的设计和调试，我成功完成了VB程序的实现。

我的程序可以根据用户输入的数据进行相应的计算，并将结果显示在界面上。

通过这个实验，我不仅巩固了VB语言的基础知识，还提高了自己的编程能力。

五、实验总结通过这次VB程序设计实验，我收获了很多。

首先，我学会了如何使用VB语言进行界面设计，掌握了一些常用的控件和布局方法。

其次，我学习了如何编写事件处理程序，响应用户的操作，并进行相应的逻辑处理。

最后，我还学习了如何进行数据处理，使用变量和运算符对数据进行计算和处理。

在实验过程中，我遇到了一些问题和挑战。

例如，我曾经遇到过界面布局不合理导致用户体验不佳的情况，但通过不断的调整和改进，最终解决了这个问题。

华北科技学院计算机学院综合性实验
实验报告
课程名称程序设计语言（VB）
实验学期 2011 至 2012 学年第 2 学期学生所在系部
年级专业班级
学生姓名学号
任课教师李芙玲
实验成绩
计算机学院制
实验报告须知
1、学生上交实验报告时，必须为打印稿（A4纸）。

页面空间不够，可以顺延。

2、学生应该填写的内容包括：封面相关栏目、实验地点、时间、目的、设备环境、
内容、结果及分析等。

3、教师应该填写的内容包括：实验成绩、教师评价等。

4、教师根据本课程的《综合性实验指导单》中实验内容的要求，评定学生的综合
性实验成绩；要求在该课程期末考试前将实验报告交给任课教师。

综合性实验中，所涉及的程序，文档等在交实验报告前，拷贝给任课教师。

任课教师统一刻录成光盘，与该课程的期末考试成绩一同上交到系里存档。

5、未尽事宜，请参考该课程的实验大纲和教学大纲。

《程序设计语言（VB）》课程综合性实验报告。

台州学院《VB程序设计》实验报告实验六：过程一、实验目的和要求1．掌握函数的定义和调用方法；2．掌握过程的定义和调用方法；3．掌握形参与实参的对应关系；4．掌握值传递和地址传递的传递方式；5．掌握变量、函数和过程的作用域；6．熟悉程序设计中的常用算法。

二、实验主要仪器和设备计算机一台，Windows XP 操作系统，V isual Basic 环境。

三、实验内容实验6.1 编写一个求三个数最大值的函数max(x ，y ，z)，然后调用此函数求下列表达式的值，首先在文本框中输入a,b,c 三个数，然后单击“计算”按钮，在文本框中输出表达式的值m 。

表达式为：),,max(),,max(),,max(c b b a c b b a c b a m +⨯+=运行界面如图6-1所示。

图6-1 程序运行时的界面实验6.2 编一求素数的函数过程Prime(x)，若x 是素数返回True ，否则返回False 。

主调程序调用Prime(x)函数输出100之内的所有素数。

实验6.3（选做）编一过程Find(S1,S2)，用于在字符串S1中查找子串S2，并用消息框输出结果：未找到或找到的个数。

（提示：利用Mid 函数反复在字符串S1找S2子串。

） 四、实验原始纪录实验6.1程序的界面设计。

程序代码。

Function max(ByV al x As Single, ByV al y As Single, ByV al z As Single) As Single max = xIf max < y Then max = yIf max < z Then max = zEnd FunctionPrivate Sub Command1_Click()Dim a As Single, b As Single, c As Single, m As Singlea = Text1.Textb = Text2.Textc = Text3.Textm = max(a, b, c) / (max(a + b, b, c) * max(a, b, b + c))Text4.Text = mEnd Sub实验6.2程序的界面设计。

vb课程设计实践报告一、教学目标本课程的教学目标是使学生掌握VB编程的基础知识，培养学生运用VB解决实际问题的能力。

具体分为三个部分：1.知识目标：学生需要掌握VB的基本语法、数据类型、变量、常量、运算符、控制结构、函数等编程基础知识和技能。

2.技能目标：学生能够运用VB编写简单的程序，解决实际问题，如计算器、文本排序等。

3.情感态度价值观目标：培养学生对编程的兴趣和主动性，提高学生分析问题、解决问题的能力。

二、教学内容根据教学目标，本课程的教学内容主要包括以下几个部分：1.VB基本语法和数据类型2.变量、常量和运算符3.控制结构：顺序结构、选择结构、循环结构4.函数：数学函数、字符串函数、日期时间函数等5.面向对象编程：类和对象、属性、方法、事件等6.常用控件及其属性和方法7.数据库访问技术三、教学方法为了达到教学目标，本课程将采用以下几种教学方法：1.讲授法：讲解VB的基本语法、数据类型、变量、常量、运算符、控制结构、函数等基础知识。

2.案例分析法：通过分析实际案例，使学生掌握面向对象编程、常用控件及其属性和方法。

3.实验法：让学生动手编写程序，解决实际问题，提高学生的编程能力。

4.讨论法：分组讨论，分享学习心得，互相答疑解惑。

四、教学资源为了支持教学内容和教学方法的实施，我们将准备以下教学资源：1.教材：《VB编程与应用》2.参考书：《VB编程实例教程》3.多媒体资料：教学PPT、视频教程4.实验设备：计算机、网络环境、编程软件以上教学资源将有助于丰富学生的学习体验，提高学生的编程能力。

五、教学评估为了全面、客观、公正地评估学生的学习成果，我们将采取以下评估方式：1.平时表现：评估学生的出勤、课堂参与度、提问回答等情况，占总成绩的20%。

2.作业：布置适量的作业，评估学生的编程能力和应用能力，占总成绩的30%。

3.考试：进行期中和期末考试，评估学生对VB基础知识和技能的掌握程度，占总成绩的50%。

VB上机实验——实验报告实验标题：班级：姓名：学号：时间：实验七文件的基本操作和文件的读写[实验目的]1．掌握DriveListBox、DirListBox和FileListBox等文件控件的使用方法2．掌握用传统方式进行文件复制、移动、删除及重命名等基本方法3．掌握顺序文件、随机文件和二进制文件的读写操作方法4．了解MSFlexGrid控件的使用方法[实验内容]一、使用DriveListBox、DirListBox和FileListBox等控件程序1：建立一个应用程序，该程序利用文件系统控件可以实现文件的复制、移动和删除，如下图所示。

程序代码见附录。

实验思考题1：如果要求一次操作多个文件或文件，应如何修改程序？答：将File属性框中Mulistlest改为2-Extended。

二、顺序文件、随机文件和二进制文件的读写程序2：编写程序，要求能将文本框中的内容写入顺序文件，或者能将顺序文件的内容读入到文本框中，如下图所示。

程序代码见附录。

实验思考题2：● 顺序文件的读写还有哪些方法？答：顺序文件的读写方法有：1. 打开顺序文件语句，格式如下：Open <文件名> For [Input | Output | Append] As <文件号> [Len = <记录长度>]2.关闭顺序文件语句，格式如下：Close [[#]<文件号>] [，[#]<文件号>]……3、将数据写入文件语句，格式如下：Print #文件号，[<表达式列表>]4.读文件数据语句，格式如下：Write #<文件号>，[<表达式列表>]程序3：编写程序，要求能将下图中若干个文本框中的内容写入随机文件中，或者能将随机文件的内容读入到相应的文本框中，如下图所示。

提示：● 在随机文件读写操作之前，应先定义一个自定义的记录类型。

定义方法见下例。

VB实验报告2-顺序结构VB 程序设计实验报告2020年04月25 日课程名称：VB程序设计实验名称：实验二顺序结构一、实验目的1.掌握表达式、赋值语句的正确书写规则2.掌握函数的使用3.掌握inputbox与msgbox的使用4.掌握print方法和format格式的使用二、实验内容实验2-1随机生成3 个正整数，其中一个1 位数， 1 个 2 位数， 1 个 3位数，计算它们的平均值，保留两位小数实验2-2我国有13 亿人口，假定按人口年增长0.8% 计算，多少年后我国人口超过26 亿实验2-3输入一个合法的3 位正整数，测试其数值合法性后，逆序输出并显示。

例如，输入“734 ”，输出是“437 ”实验2-4输入一个字符串，分别调用UCase 、Len、Mid、Left 、Right函数，显示如图2.2.4 所示的效果。

实验2-5效仿实验2.4 ，验证转换函数的使用，Text1 文本框输入字符串，Text2 文本框显示调用所选函数的结果，4 个命令按钮为转换函数，Label2 显示对应的函数名，运行效果如图实验2-6Print 方法练习，显示字符图形。

参考教学篇例4.4 输出简单图形，如图2.2.6 所示。

要求窗体不可改变大小，当单击“清屏”按钮后，清除窗体所显示的图形。

实验2-7用InputBox 输入一个正实数，用Print 方法在一行上显示出它的平方和平方根、立方和立方根，每个数保留三位小数，其间有间隔。

三、实验分析及设计实验2-1随机数生成某范围内的正整数公式为Int(Rnd* 范围+基数)其中范围=数的上限- 下限+1，基数=数的下限保留两位小数，利用Format 函数，形式为Format( 要显示的数值, "0.00 ")实验2-2已知年增长率r=0.8% ，求人数超过26 亿的年数n的公式为：n = log(2)/log(1+r),r = 0.8%实验2-31.利用Text1_LostFocus 事件，输入数据合法性检查调用IsNumeric 函数，参阅教学篇例2.5 ；若有错利用MsgBox显示出错信息，如图2.2.3 所示；清除文本框内输入的非法数据，通过SetFocus 定位于文本框处，重新输入2. 利用“MOD ”和“”运算符将一个3 位数分离出3 个1位数，然后利用乘法和加法运算将3 个 1 位数连接成一个逆序的 3 位数。

高级语言程序设计（VB）实验报告实验日期：年月日姓名学号成绩实验名称：VB编程基础及顺序结构一．实验目的：掌握VB编程基础及顺序结构二．实验内容和步骤：1、程序运行界面w=10:x=8:y=3:z=7print w>x and y<=z or x>yFalseprint x>z orw=y and y<xFalseFalseprint not(w>y and x=z)Trueprint not(y<>x or w*3>z)Trueprint int(abs(99-100)/2)print sqr(sqr(64))2.82842712474619print fix(-3.1415926)-3print sgn(7*3+2)12.界面运行图程序代码Private Sub Form_Click()Dim a As Integer, h As Integer, t As Integer, n As Integer Randomizea = Int((999 - 100) * Rnd + 100)h = Int(a \ 100)t = Int((a - h * 100) \ 10)n = Int(a - h * 100 - t * 10)Print a, "的逆序为:", n & t & hEnd Sub程序运行代码Private Sub Command1_Click()f = Text1.TextText2.Text = (5 / 9) * (f - 32) End SubPrivate Sub Command2_Click() Text2 = ""End Sub5、拓展题1)界面运行图程序代码Private Sub Form_Click() Static a As IntegerDim b As Integera = a + 1b = b + 1Print "a="; a, "b="; bEnd Sub因为他们的变量声明格式不同。