您好,欢迎访问三七文档
高一信息技术VB循环语句——for语句例:编写VB程序,计算整数1+2+3……+10的值DimsasintegerPrintsS=1+2+3+4+5+6+7+8+9+10S=0S=s+1S=s+2S=s+3S=s+4S=s+5S=s+6S=s+7S=s+8S=s+9S=s+10PrivateSubCommand1_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必定是成对出现的。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=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实际应用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该程序的输出结果是()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
本文标题:VB循环语句
链接地址:https://www.777doc.com/doc-4868944 .html