第三章三种基本程序控制结构解析.pptVIP

例3-15 编程计算1！+2！+3！+…+10!。 程序如下： Private Sub Form_Click() Dim i As Integer Dim s As Long, t As Long t = 1? For i = 1 To 10 t = t * i s = s + t Next i Print 1!+2!+3!+…+10!= s End Sub * 例3-16 由随机函数产生10道一位整数与两位整数相加的加法题，产生的加法题依次显示在屏幕上，每产生一道题后，由用户输入答案，如果答案正确，记10分；如果答案错误，允许第二次输入答案，第二次输入答案正确，记5分，错误记0分。最后给出总得分。程序代码如下： * 3.4.3 Do…Loop语句 Do…Loop语句通常用于循环次数未知，但循环条件容易给出的循环。Do…Loop语句实现的循环有两种，一种是当型循环，一种是直到型循环。 * 当型循环 Do While/Until…Loop语句 Do {While/Until}条件 循环体 Loop 直到型循环 Do…Loop While/Until语句 Do 循环体 Loop {While/Until}条件 当型循环流程图 * 直到型循环 * 例3-17爱因斯坦出了一道这样的数学题：有一条长阶梯，若每步跨2阶，则最后剩1阶；若每步跨3阶，则最后剩2阶；