浙教版初中信息技术九年级上学期期末试题（9）

要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（  ）。

下列语句中，正确的赋值语句是（  ）。

设窗体上有一个名称为Text1的文本框，要求只能显示信息，不能输入，应选择答案是（  ）。

以下可表示[50, 100]之间的随机数的语句是（  ）。

运行程序时，系统自动执行窗体的（  ）事件。

下列程序运行后，输出的结果为（  ）。

b=1

Do while (b<40)

    b=b*(b+1) 

Loop

Print b

 

下列程序执行后，变量s的值为（  ）。

Dim s As long, x As Integer

s=0 : x=1

Do While (x<10)

    s=s+x

    x=x+2

Loop

Print s

若整型变量a的值为3、b的值为2，则下列程序段执行后整型变量c的值为（  ）。

If a>5 then

    if b<4 then

        c=a-b

    else

        c=b-a

    End if

Else

    if b>3 then

        c=a*b

    else

        c= a mod b

    End if

End if

下面程序执行后，x的结果为（  ）。 

x=0

For i = 1 to 5 

    For j = i to 5

        x=x+1

    Next j

Next i

Print x

有如下程序段，该程序执行后，变量a的值为（  ）。

a=0

For i=1 To 2 

    For j=i To 2

        For k=1 To j

            a=a+2

        Next k

    Next j

Next i

某物流公司规定A、B两地之间物品的托运费用根据下面的方法计算：物品重量在50千克以内，托运费为每千克0.65元，超过的话，超过部分每千克0.95元，请完善下面的程序。

Dim G As Integer

Dim M As Integer

Input “输入重量 G = ”; G

If  then

    M=0.65*G

Else

    M=

End if

Print “运费为：”; M

以下程序计算2到50间所有偶数的和，请补充完善该程序。

Sub mult( )

    Dim Sum As Integer

    Sum=0

    Dim i as integer

    For to 50

        If i MOD 2= Then

            

        End if

    Next i

    Print sum

End Sub

以下程序实现，一个四位数，各位之和等于其前两位，各位之积各于其后二位，最后打印出该四位数，请补充完善该程序。

For  to 9

    For b=0 to 9

        For c=0 to 9

            For d=0 to 9

                X=

                If then

                    print x

                End if

            Next d

        Next c

    Next b

Next a

设计一个计算程序。该程序用户界面自己设计，由四个文本框：文本框1（text1，语文）、文本框2（text2，数学）、文本框3（text3，英语）、文本框4（text4，平均分），和三个按钮：命令按钮1（command1，清空）、命令按钮2（command2，计算）、命令按钮3（command4，退出）组成。程序运行后，用户按清除按钮，则清除文本框中显示的内容，按计算按钮，则计算三科平均成绩。单击退出按钮则退出。