当前位置: 答案解析 / 填空题
  • 1. 程序填空:用VB实程序实现:小明今年15岁,他在今年生日的这一天种了1课树,他有一个愿望:从明年开始他每年比上一年多种1棵树。请问当小明所种的树达到100棵时,他的年龄是多少?

    Private Sub Command1_Click()

        Dim age As Integer, tree As Integer

        age = 15

        tree = 1

        Do While tree

            age =

            Tree = tree + (age - 14)

         

        Text1.Text = Str(age)

    End Sub

举一反三换一批
  • 1. 读程序写结果
    1. (1) 林娜编制了一个验证乘法运算结果的小程序(如下图所示),当在“输入结果”右边的文本框中输入60时,输出内容为图片_x0020_4
    2. (2) Private Sub Form_Click()

          Dim i As Integer, sum As Integer

          sum = 0

          For i = 2 To 10

              If i Mod 2 <> 0 And i Mod 3 = 0 Then

                  sum = sum + i

              End If

          Next i

          Print sum

      End Sub

      程序运行后,单击窗体,输出结果为

  • 2. 以下VB 程序运行后,x的值是(      )

    Dim x As Integer

    x=0

    Do While x<50

        x=(x+2)*(x+3)

    Loop

    A . 50 B . 72 C . 168 D . 0
  • 3. (2020九上·长兴期末) 下面程序中, 语句print (i)共执行了几次(    )

    for i in range(5) :

        print(i)

    A . 3 B . 4 C . 5 D . 6

微信扫码预览、分享更方便