VB实验指导书06_循环结构

《VB实验指导书06_循环结构》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、辽宁科技大学VisualBASIC6.0程序设计实验指导书六实验六循环结构一.实验目的1.理解并掌握标记控制循环、计数控制循环语句的使用；2.理解并掌握循环结构中多种嵌套形式的使用；3.掌握与循环结构相关的简单控件的程序设计。二.实验内容1.创建一个名为vbpTest6_1的应用程序，并修改窗体名为frmRenKou。[1]实现程序的编制：假设已知2005年1月6日我国人口总数已达13亿，现在假设我国人口的年增长率为1%，编写程序，计算多少年后我国人口会增加到16亿。[2]按照表6-1所示，设置相关控件及属性。表6-1第一项实验中对象的属性值设

2、置表对象类型对象名称属性名称属性值【注】FormForm1Caption中国人口FrameFrame1Caption预测数据LabelLabel1Caption人口年增长率(%)Label2Caption预达到人口数(亿)TextBoxtxtRateTexttxtPopulationTextCommandButtonbtnRenQinCaption预测(&Y)[3]注：◎不修改控件名而采用其默认的名称可以节省时间，但是这并不是一个好的习惯；[4]将相关控件放置到窗体上，设计好在窗体中所放置的各个控件的对应位置，程序运行前的效果大概如图6-1(A

3、)所示，程序运行后的效果大概如图6-1(B)所示。(A)设计界面(B)运行界面图6-1第一项实验的程序效果界面图[5]提示：人口的年增长率和所要预测达到的人口数都由用户输入，注意它们的计数单位分别是百分比和亿。假设现有人口数为P，年增长率为R，则下一年的人口可以用下面的公式来计算：P=P+P×R把该公式放在循环体内（这里的循环类型可以依个人的喜好自由选择），即在循环内计算P值，而每计算执行一次循环，就把某个变量n自增1。当P大于或等于16亿时退出循环，此时就不再循环，从而就可得到年数n啦。例如：Do'添加代码n=n+1'n代表年数增加了一年Lo

4、opWhileP<=162.关闭上一个工程后，重新创建一个名为vbpTest6_2的应用程序，窗体名为默认的Form1。[1]实现程序的编制：输入两个正整数，求它们的最大公约数和最小公倍数。-1-辽宁科技大学VisualBASIC6.0程序设计实验指导书六[2]按照表6-2所示，设置相关控件及属性。表6-2第二项实验中对象的属性值设置表对象类型对象名称属性名称属性值FormForm1Caption最大公约数和最小公倍数FrameFrame1Caption输入两个正整数Frame2Caption显示结果LabelLabel1Captionm=La

5、bel2Captionn=Label3Caption最大公约数=Label4Caption最小公倍数=TextBoxText1TextText2TextText3TextText4TextCheckBoxCheck1Caption同时求最小公倍数Value1-CheckedCommandButtonCommand1Caption计算[3]编写程序并运行以后的效果如图6-2所示。图6-2第二项实验的程序运行效果界面图[4]提示：求最大公约数的算法思想是：最小公倍数=两个整数之积/最大公约数（由于变量m和n的值均会变化，所以应该在之前就将两个整数之

6、积存放到某个变量中），步骤如下：◎对于已知两数m，n，使得m>n总成立（即，Ifm

7、照表6-3所示，设置相关控件及属性。表6-3第三项实验中对象的属性值设置表对象类型对象名称属性名称属性值FormForm1Caption字符串加密TextBoxText1TextText2TextCommandButtonCommand1Caption加密DefaultTrue-2-辽宁科技大学VisualBASIC6.0程序设计实验指导书六[3]编写程序并运行以后的效果如图6-3所示。图6-3第三项实验的程序运行效果界面图[4]提示：可以先实现将输入的文本逆向输出，即当在输入文本框中输入字符串"ABCD"的时候，在输出文本框中输出"DCBA"

8、。在循环内部可以使用Mid()函数从左向右依次取出一个字符，对这个字符处理后再依次地添加到用于显示的文本框中。这一过程是在一个计数循环中实现的，循环的