人教版九年级信息技术全册复习课---VB课堂练习.pptVIP

举例1：输入两个数，然后交换这两个数，再输出交换后的结果。;输入数a;程序，复制到VB中修改执行;举例2：输入两个数，显示其中的较大数。;流程图;程序，复制到VB中修改执行;举例3：计算1+2+3+……+100的和。;流程图;程序，复制到VB中修改执行;练习一 ：求一个矩形的周长和面积？;输入矩形的长a;程序，复制到VB中修改执行;1、 2、 3、 4、 5、 6、;流程图;程序，复制到VB中修改执行;练习三 ：计算2+4+6+8+……+100的和 ;流程图;程序，复制到VB中修改执行;练习四 ： 猜数游戏 ;Dim x As Integer Dim guess As Integer x = Int(Rnd(10) * 100) n = 0 Do While guess x guess = InputBox(请输入所猜的数字（1~100）, 猜数) n = n + 1 If guess x Then Print guess; 太大了 Else If guess x Then Print guess; 太小了 End If End If Loop Print 恭喜你，猜对了！是：; guess Print 你共猜了; n; 次