VB循环语句教学提纲.ppt

《VB循环语句教学提纲.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB循环语句PrivateSubCommand1_Click()Dims,iAsIntegers=0Fori=1To10Step1s=s+iNextiPrintsEndSubFori=1To10Step1s=s+iNextiFor循环变量=初值to终值step步长语句块nextFori=1To10Step1s=s+iNextiFor循环变量=初值to终值step步长语句块next1、For语句中步长值可以是正数，也可以是负数，但不可以是0。2、但步长值为1时，可省略，即可省略“step1”。3、一段for循环语句中for和next必定是

2、成对出现的。1、在VB窗体界面上输出1~10这10个自然数Fori=1to10printinexti2、求5+4+3+2+1和s=0forI=5to1s=s+InextIprintsstep-13、求1+2+3+4+5的和s=0fori=1to5step1s=s+inextjprintsi4、求7+5+3+1的和：S=0ForI=7to1Step2S=S+INextIPrintS-2用for循环语句编程求1+1/2+1/3+……+1/99的和For循环变量=初值to终值step步长语句块nextDims,iAssingles=0Fori

3、=1To1/99Step1s=s+iNextiPrints,k99k=1/is=s+k用for循环语句编程求1/2+2/3+3/4……+98/99的和答案：93.82265阿基米德与国王下棋，国王输了，国王问阿基米德要什么奖赏？阿基米德对国王说：我只要在棋盘上第一格放一粒米，第二格放二粒，第三格放四粒，第四格放八粒„„„按这个比例放满整个棋盘64个格子就行。国王以为要不了多少粮食，可一个粮仓的米还摆不完一半的棋格子，全部摆满后，你知道国王究竟付出了多少米吗？米的总粒数S=2^0+2^1+2^2+……+2^63第N格放的米粒数量k=2^n

4、实际应用1．有如下VB程序段：s＝0Fori＝________To5s＝s＋iNexti该程序段运行后，循环体s＝s＋i被执行10次，则循环变量i的初值是()A．14B．－5C．1D．－4【答案】D2．有如下循环结构VB程序段s＝16Fori＝1To10Step________s＝s/2Nexti程序执行后，s的值为1，则循环语句的步长应为()A．1B．2C．3D．4【答案】C3．PrivateSubForm_Click()Forx＝1To2a＝0Fory＝1Tox＋1a＝a＋1NextyPrinta；NextxEndsub该程序的输出

5、结果是()A．11B．00C．12D．23【答案】D4．下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是____________________。PrivateSubCommand1_Click()Dima(1To10)AsInteger,iAsInteger,sAsIntegera(1)＝1:a(2)＝1Fori＝3To10a(i)＝a(i－1)＋a(i－2)NextiText1.Text＝Str(a(i－1))EndSub【答案】55此课件下载可自行编辑修改，仅供参考！感谢您的支持，我们努力做得更

6、好！谢谢