VB第4章复习资料.doc

《VB第4章复习资料.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第4章补充资料习题解答1．计算下列循环语句的次数：（1）ForI=-3To20Step4答：循环次数为6次。循环体内I的值分别为：-3，1，5，9，13，17；出了循环体后I的值为21。（2）ForI=-3.5To5.5Step0.5答：循环次数为19次。（3）ForI=-3.5To5.5Step-0.5答：不循环，步长<0，循环初值<终值。（4）ForI=-3To20Step0答：无数次，步长=0。2.下列30～90为语句标号，分别标记该语句，第40号语句共执行了几次，第50号语句共执行了几次，执行第90号语句后显示的结果是多少？30Forj=1T

2、o12Step340Fork=6To2Step-250mk=k60Printj,k70Nextk80Nextj90Printj,k,mk答：第40号语句共执行了4次，是外循环的循环体；第50号语句共执行了12次，是内循环的循环体，循环次数为两重循环次数的乘积；第90号语句显示的结果是1302。3．如果实现不知道循环次数，如何用For…Next结构来实现？答：只要将循环的终值设置成一个非常大的值，然后再循环体内增加If语句，判断是否满足循环结束的条件。形式如下：For循环变量=1To非常大的数…If满足循环结束条件ThenExitFor…Next循环变

3、量4．利用循环结构，实现如下功能：（1）答：s=0Fori=1To10s=s+(i+1)*(2*i+1)Nexti（2）分别统计1～100中，满足3的倍数、7的倍数的整数各有多少？答：s3=0s7=0Fori=1to100Ifimod7=0Thens7=s7+1Ifimod3=0Thens3=s3+1Nexti（3）将输入的字符串以反序显示。如输入“ASDFGHJKL”，显示“LKJHGFDSA”。答：s=InputBox(“输入字符串”)Fori=Len(s)To1Step-1PrintMid(s,i,1)；Nexti5．下面程序的运行结果是什么？

4、该程序的功能是什么？PrivateSubCommand1_Click()Dimx＄,n％n=20DoWhilen<>0a=nMod2n=n2x=Chr(48+a)＆xLoopPrintxEndSub答：运行后结果为10100，该程序的功能是将十进制数转换成二进制字符串。6.下面程序的运行结果是什么？该程序的功能是什么？PrintSubCommand1_Click()Dimx％,y％,z％x=242:y=44z=x*yDoUntilx=yIfx>yThenx=x–yElsey=y–xLoopPrintx,z/xEndSub答：运行结果为22和484；

5、该程序的功能是用相减法求x,y的最大公约数和最小公倍数。7.利用随机函数产生50～100范围内的20个随机数，现实其中的最大值、最小值和平均值。PrivateSubForm_Click()Dimi％,min％,max％,avg％,x％min=100‘设置最小值、最大值和平均值的初态max=50avg=0Fori=1To20x=Int(Rnd*51+50)Printx;Ifx>maxThenmax=xIfx

6、dSub常见错误和难点分析1.一般循环控制变量在循环体内可以引用但不要被赋值如在循环控制变量的引用和赋值将影响循环次数，引起混乱，效果如图4.1所示。PrivateSubCommand1_Click()Print“单击Command1输出：”Fori=1To20s=s+i‘循环控制变量i被引用，正确使用PrintI;NextiPrintEndSubPrivateSubCommand2_Click()Print“单击Command2输出：”Fori=1To20i=i+2‘循环控制变量i被赋值，改变了循环次数，不正确使用PrintI;NextiPrint

7、EndSub图4.1循环控制变量引用和赋值的两种使用方式运行效果2.不循环或死循环的问题出现不循环或死循环的情况主要是循环条件、循环初值、循环终值、循环步长的设置有问题。例如，以下循环语句不执行循环体：Fori=10To20Step-1‘步长为负，初值必须大于等于终值，才能循环Fori=20To10‘步长为正，初值必须小于等于终值，才能循环DoWhileFalse‘循环条件永远不满足，不循环例如，以下循环语句为死循环：Fori=10To20Step0‘步长为0,死循环DoWhile1‘循环条件永远满足，死循环3．循环结构中缺少配对的结束语句For··

8、·Next语句没有配对的Next语句；Do语句没有一个终结的Loop语句等。4．循环嵌套时，内外循环交叉Fo