vb实验4 循环结构程序设计.docVIP

安徽机电职业技术学院实训实验报告 系部 电气工程系 班级 姓名_______________ 学号___________ 日期 地点 指导教师____________ 成绩 实验4：循环结构程序设计 【实验目的】 掌握三种循环结构用法，即For、Do…Loop与While…wend三种循环语句的使用； 加深理解循环的概念，掌握循环的规则及其执行过程； 学会如何控制循环条件，防止死循环或不循环； 掌握与循环有关的常用程序设计算法。 【实验内容】 完成For、Do、while语句循环结构的程序设计。 进行循环语句结构的程序阅读。 【实验环境】 实验软件：Windows 2000/XP操作系统+ Visual Basic6.0软件 【实验步骤】 用For、Do、While语句分别编写一个累加器程序，如输入10，则计算1+2+3+……+10的和，如输入1000，则计算1+2+3+……+1000的和。 要求：完成界面设计，控件属性设置，编写程序代码，正确运行程序，将结果保存在D：盘自己的学号姓名文件夹下，并将代码记录下来： 编写程序，计算1！+2！+3！+...+10! 的结果。 提示：在设计累加和连乘问题时一定要注意存储总和及乘积的变量初值问题。 要求：完成界面设计，控件属性设置，编写程序代码，正确运行程序，将结果保存在D：盘自己的学号姓名文件夹下，并将代码记录下来： 编写程序，能将输入的任意字符串反序输出，例如：输入“abcd”，则输出“dcba”。 要求：完成界面设计（可以参考右图），控件属性设置，编写程序代码，正确运行程序，将结果保存在D：盘自己的学号姓名文件夹下，并将代码记录下来： 程序阅读题。 要求：先手工写出下面程序段的运行结果，然后在VB环境中运行下列程序。 Dim i% Do While i 4 i = i + 1 y = String(i * 2 - 1, *) Print Space(4 - i) y Loop For j = 3 To 1 Step –1 Print Space(4 - j) String(j * 2 - 1, *) Next j 【思考与练习】 1、求斐波那契数列的前20项之和。 提示：斐波那契数列问题是一个著名的古典数学总问题。此数列前几项为： 1，1，2，3，5，8，13，21，34，55，89，…… 从数列中，可以看出这样的规律：从第三项开始，每一项都是由前两项相加得到的。 【实验小结】 简述你的实验心得，也可留下你的问题和建议，谢谢！ 运行结果：