循环结构程序设计初步Do语句

s=1+1/2+1/3+……+1/n，当n=？时，s第一次大于10。特征：无法预先知道循环的次数，在递推过程中才能确定是否结束循环。循环结构程序设计——丽水第二高级中学——《算法与程序设计》——Do语句Do语句DoWhiles<=10 i=i+1 s=s+iLoopDo语句一般格式：DoWhile条件表达式语句1语句2（循环体）……Loop每次返回重新判断条件是否成立，成立继续循环。Do语句开始表达式执行循环体结束TFDo语句一般格式：DoWhile条件表达式语句1语句2（循环体）……Loop每次返回重新判断条件是否成立，成立继续循环。Do语句编写步骤（1）确定条件变量的初值（2）确定满足循环条件的表达式（逻辑型）（3）写循环体，在循环体中一定要有能改变循环条件变量的表达式。Do语句与For语句的区别区别：For循环只能用在循环次数已知的情况。凡是用For循环的程序都可以用Do循环来写。循环次数未知时，只能用Do循环。Do语句课前问题回顾s=1+1/2+1/3+……+1/n，当n=？时，s第一次大于10。PrivateSubCommand1_Click()DimsAsSingle,nAsIntegers=0n=1Text1.Text=Str(n)EndSubDoWhiles<=10n=n+1s=s+1/nLoopDo语句课前问题回顾PrivateSubCommand1_Click()DimsAsSingle,nAsIntegers=0n=1Text1.Text=Str(n)EndSubs=1+1/2+1/3+……+1/n，当n=？时，s第一次大于10。DoWhiles<=10s=s+1/nn=n+1LoopLongDo语句练习1s=0：t=1Fort=1To6Step2s=s+tNexttFor–Do改写：使左右两边VB程序段实现相同功能。s=0：t=1DoWhilet<=6s=s+t11111111111Loopt=t+2Do语句练习2有如下VB程序段：s=0x=1DoWhilex<=5s=s+xx=x+1Loop该程序段运行后，语句s=s+x执行的次数是（）A.1B.2C.3D.5DDo语句练习3有如下VB程序段：s=0：i=1DoWhiles=s+ii=i+2Loop该程序段运行后，变量s的值等于9，则程序中画线处的语句是（）A.i<5B.i<=5C.i<=7D.i=9BDo语句练习4有如下VB程序段：s=1：c=0flag=TrueDoWhileflags=s+2Ifs>5Thenflag=Falsec=c+1LoopLabel1.Caption=Str(s+c)该程序段运行后标签Label1上显示的是（）A.3B.7C.10D.12CDo语句课堂任务编写“去除前置0”程序，实现如下功能：在文本框Text1中输入一个数据，单击“去除”按钮Command1，在标签Label1上显示结果。程序运行界面如图a所示。图a1234图b(1)在设计程序界面时，应使用图b所示“控件工具箱”中的（填写相应编号）添加“Text1”文本框。2Do语句课堂任务(2)实现上述功能的VB程序如下，请在划线处填入合适的代码。PrivateSubCommand1_Click()DimsAsString,iAsIntegerDimnAsStrings=Text1.Textn=①i=1DoWhilei<=nch=Mid(s,i,1)Ifch="0"Theni=i+1ElseExitDo'退出循环EndIfLoopLabel1.Caption="结果为："+②

EndS