第21课VB教学二.pptVIP

* * VB教学二 一、当型循环 VB教学二 1、循环次数确定(for语句、do while语句都可用） 例题：求某学生5门学科考试成绩的总分sum。 for语句 Sum=0 For i=1 to 5 Input mark Sum=sum+mark Next I Print sum Do while 语句 Sum=0 i=1 Do while i=5 Input mark Sum=sum+mark i=i+1 loop Print sum VB教学二 2、循环次数不确定(只有do while语句可用） 例题：输入若干数x，当输入为999时结束， 求输入数据的和s。 Do while 语句 S=0 Input x Do while x999 S=s+x Input x Loop Print s 注意：编程是在按钮的click事件里面。 VB教学二 二、直到型循环 VB教学二 二、直到型循环 使用do …loop until语句 sum = 0 n = 1 DO INPUT x sum = sum + x n = n + 1 LOOP UNTIL n 12 PRINT sum 在VB中编写程序，解决如下问题，保存为“工程211”。 【练习5】求满足1+2+3+4+…+n20最大的n值。 输入20个数，求其中最大值max和最小值min。 评委打分 求6个评委的打