VB循环语句PPT课件VIP

-,1,高一信息技术,VB循环语句for语句,-,2,例：,编写VB程序，计算整数1+2+3+10的值,DimsasintegerPrints,S=1+2+3+4+5+6+7+8+9+10,S=0S=s+1S=s+2S=s+3S=s+4S=s+5S=s+6S=s+7S=s+8S=s+9S=s+10,-,3,PrivateSubCommand1_Click()Dims,iAsIntegers=0Fori=1To10Step1s=s+iNextiPrintsEndSub,-,4,Fori=1To10Step1s=s+iNexti,For循环变量=初值to终值step步长语句块next,-,5,Fori=1To10Step1s=s+iNexti,For循环变量=初值to终值step步长语句块next,1、For语句中步长值可以是正数，也可以是负数，但不可以是0。2、但步长值为1时，可省略，即可省略“step1”。3、一段for循环语句中for和next必定是成对出现的。,-,6,1、在VB窗体界面上输出110这10个自然数Fori=1to10printi,nexti,-,7,2、求5+4+3+2+1和s=0forI=5to1s=s+InextIprints,step-1,-,8,i,-,9,4、求7+5+3+1的和：S=0ForI=7to1Step2S=S+INextIPrintS,-2,-,10,用for循环语句编程求1+1/2+1/3+1/99的和,For循环变量=初值to终值step步长语句块next,Dims,iAssingles=0Fori=1To1/99Step1s=s+iNextiPrints,k,99,k=1/is=s+k,-,11,用for循环语句编程求1/2+2/3+3/4+98/99的和,答案：93.82265,-,12,阿基米德与国王下棋，国王输了，国王问阿基米德要什么奖赏？阿基米德对国王说：我只要在棋盘上第一格放一粒米，第二格放二粒，第三格放四粒，第四格放八粒按这个比例放满整个棋盘64个格子就行。国王以为要不了多少粮食，可一个粮仓的米还摆不完一半的棋格子，全部摆满后，你知道国王究竟付出了多少米吗？,米的总粒数S=20+21+22+263,第N格放的米粒数量k=2n,实际应用,-,13,1有如下VB程序段：s0Fori_To5ssiNexti该程序段运行后，循环体ssi被执行10次，则循环变量i的初值是()A14B5C1D4,【答案】D,-,14,2有如下循环结构VB程序段s16Fori1To10Step_ss/2Nexti程序执行后，s的值为1，则循环语句的步长应为()A1B2C3D4,【答案】C,-,15,3PrivateSubForm_Click()Forx1To2a0Fory1Tox1aa1NextyPrinta；NextxEndsub该程序的输出结果是()A11B00C12D23,【答案】D,-,16,4下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是_。PrivateSubCommand1_Click()Dima(1To10)AsInteger,iAsInteger,sAsIntegera