浙教版初中信息技术九年级上学期期末试卷（9）
试卷更新日期：2021-04-14 类型：期末考试
一、单选题
-
1. 要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（ ）。A、Caption B、Name C、Text D、Label2. 下列语句中，正确的赋值语句是（ ）。A、i+j=10 B、2i=j C、j=i+j D、i*j=03. 设窗体上有一个名称为Text1的文本框，要求只能显示信息，不能输入，应选择答案是（ ）。A、Text1.MaxLength=0 B、Text1.Width=0 C、Text1.Visible=False D、Text1.Enabled=False4. 以下可表示[50, 100]之间的随机数的语句是（ ）。A、Int(Rnd * 51) + 49 B、Int(Rnd * 51 + 50) C、Int(Rnd * 50) + 5 D、Int(Rnd * 50 + 50)5. 运行程序时，系统自动执行窗体的（ ）事件。A、load B、click C、unload D、GotFocus6. 下列程序运行后，输出的结果为（ ）。
b=1
Do while (b<40)
b=b*(b+1)
Loop
Print b
A、42 B、39 C、6 D、17. 下列程序执行后，变量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、10 B、25 C、50 D、1008. 若整型变量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
A、2 B、-2 C、6 D、19. 下面程序执行后，x的结果为（ ）。x=0
For i = 1 to 5
For j = i to 5
x=x+1
Next j
Next i
Print x
A、5 B、10 C、15 D、2010. 有如下程序段，该程序执行后，变量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、2 B、8 C、10 D、20二、综合题
-
11. 某物流公司规定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
12. 以下程序计算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
13. 以下程序实现，一个四位数，各位之和等于其前两位，各位之积各于其后二位，最后打印出该四位数，请补充完善该程序。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
三、程序设计题
-
14. 设计一个计算程序。该程序用户界面自己设计，由四个文本框：文本框1（text1，语文）、文本框2（text2，数学）、文本框3（text3，英语）、文本框4（text4，平均分），和三个按钮：命令按钮1（command1，清空）、命令按钮2（command2，计算）、命令按钮3（command4，退出）组成。程序运行后，用户按清除按钮，则清除文本框中显示的内容，按计算按钮，则计算三科平均成绩。单击退出按钮则退出。