浙教版初中信息技术九年级上学期期末试卷（4）
试卷日期：2021-04-14 考试类型：期末考试
一、选择题
-
1. 下列不属于计算机语言的高级语言的是（ ）A、BASIC语言 B、C语言 C、PhotoShop D、.Java2. VB程序在保存工程的时候生成的工程文件后缀名是（ ）A、.frm B、.vbp C、.exe D、pdf3. 想要改变对象的文字颜色，我们可以修改以下哪个属性值来实现（ ）A、BackColor B、BackStyle C、FontSize D、FonrColor4. 下列对象不具有Caption属性的是（ ）A、Label B、Form C、Command D、Text5. 下列VB赋值语句中不正确的的是（ ）A、Text1.Text = Str(x) B、x =Val（text1.text） C、a = - b D、Label1.Caption=“你好”6. 由“For i=1 To 10 Step 2”决定的循环结构被执行的次数是（ ）A、3 B、4 C、5 D、67. 下列常用函数中表示求x的算数平方根的是（ ）A、val（x） B、str（x） C、sqr（x） D、cint（x）8. 在for-----next 循环结构的语句中的循环变量可以是 （ ）A、integer B、single C、string D、boolean9. 我们在优化“海伦公式求三角形面积”程序，判断a、b、c三边能否构成三角形条件是：a+b>c，b+c>a,a+c>b三个条件同事满足，在VB程序中表示该条件的逻辑表达式是 （ ）A、a+b>c，b+c>a, a+c>b B、（a+b）>c and（b+c）>a and（a+c）>b C、（a+b）>c or（b+c）>a or（a+c）>b D、a+b>c or b+c >a or a+c >b10. 以下VB程序段运行后，x的值是（ ）
Dim x As Interger
x= 1
Do While x < 50
x = ( x + 1 )*( x + 2 )
Loop
A、50 B、56 C、72 D、6二、综合题
-
11. 计算机程序一般可以分为三种结构：顺序结构、结构和结构。12. 自从1946年出现第一台电子计算机以来，计算机技术以惊人速度发展着。计算机语言也从 ， 发展到 ， 再发展到高级语言。13. 完成流程图
⑤ ⑥
14. 窗体上有四个文本框Text1控件数组，两个按钮Command1和Command2。程序功能是解一个一元二次方程ax2+bx+c=0（a≠0）。程序运行后如图所示。给定的程序不完整，将程序补充完整。
Private Sub Command1_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command2_Click()
Dim a As Single, b As Single, c As Single
Dim x1 As Single, x2 As Single, det As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
det = ‘（根的判别式b2-4ac）
Select Case det
Case Is > 0
x1 = (-b + Sqr(det)) / (2 * a)
x2 = (-b - Sqr(det)) / (2 * a)
Text4.Text = "方程有两个实数根" & " x=" & Str(x1) & " x=" & Str(x2)
Case Is = 0
Text4.Text = "方程有两个相等的实数根 x=" & Str(x1)
Case
Text4.Text = "此方程无实数根"
End Sub
三、解答题
-
15. 用VB程序实现：过年的时候小李打算每个月都把一部分零花钱存起来，第一个月他存了10元，他准备以后每个月都比上个月多存2元。请问当小明的存钱达到1000元以上要几个月？