实验5循环结构.doc

实验五 循环结构 一、实验目的 1．理解循环结构的含义和作用。 2．掌握For…Next、Do While----Loop结构的用法。 3．能够使用循环结构编写程序。 二、实验内容 1．实验准备 在练习文件夹中建立vb5-1、vb5-2、vb5-3、vb5-4、vb5-5、vb5-6、vb5-7、vb5-8文件夹。 2．Do While—Loop选择结构 例1：给内部变量赋值 设计一个简单的VB程序，在窗体上放置一个命令按钮Command1，要求在窗体上输出1, 2, 3, …, 10。 （1）创建工程。 （2）建立用户界面，如右图所示。 （3）双击按钮控件，切换到代码设计窗口，添加程序代码如下： Private Sub Command1_Click() End Sub （4）调试运行程序。 （5）保存结果到练习文件夹中的vb5-1文件夹。 该程序通过在循环结构中添加 K=K+1语句，使得K的值分别为2, 3, 4, …, 10。 例2：设计一个简单的VB程序，在窗体上放置一个命令按钮Command1，要求在窗体上显示1+3+5+7+ … +19的值，要求完成下述填空。 （1）创建工程。 （2）建立用户界面，如上图所示。 （3）双击按钮控件，切换到代码设计窗口，添加程序代码如下： Private Sub Command1_Click() End Sub （4）调试运行程序。 （5）保存结果到练习文件夹中的vb5-2文件夹。 3．For—Next选择结构 例3：设计一个简单的VB程序，在窗体上放置一个命令按钮Command1，要求在窗体上显示1+3+5+7+ … +19的值，要求完成下述填空。 程序代码如下： Private Sub Command1_Click() End Sub （4）调试运行程序。 （5）保存结果到练习文件夹中的vb5-3文件夹。 三、思考题 1．设计一个程序，要求在窗体上显示20个100~200之间的随机整数。保存结果到练习文件夹中的vb5-4文件夹。 2．设计一个程序，要求用对话框输入n值，在窗体上显示s=1*2+2*3+3*4+…+n*(n+1)的值。保存结果到练习文件夹中的vb5-5文件夹。 3．设计一个程序，求表达式的和值第一次大于1000时的n值，表达式为1*2+2*3+3*4+…+n*(n+1)。要求程序写在命令按钮Command1的Click事件中。 设计提示：（1）使用变量s保存和值。n的计算结果为14。 （2）使用Do While----Loop结构判断s的大小，当s1000时结束循环。保存结果到练习文件夹中的vb5-6文件夹。 （3）使用For/Next结构，结合Exit For语句判断s 1000时结束循环。保存结果到练习文件夹中的vb5-7文件夹。 4．设计一个程序，编程输出26个大写英文字母，要求在程序中不能出现“BCDE…XYZ”字母。保存结果到练习文件夹中的vb5-8文件夹。 设计提示：（1）字符“B”可由表达式Chr(Asc(“A”)+1)计算得到，字符“C”可由表达式Chr(Asc(“A”)+2)计算得到，字符“D”可由表达式Chr(Asc(“A”)+3)计算得到，…… （2）使用For…Next结构产生26个大写英文字母并输出。 理解课程内容、完成实验任务、写好实验报告 1