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

修改时间：2021-08-02 浏览次数：52 类型：期末考试编辑

选择试卷全部试题 *点击此按钮，可全选试卷全部试题，进行试卷编辑

一、选择题

1. 下列不属于计算机语言的高级语言的是（）

A . BASIC语言 B . C语言 C . PhotoShop D . .Java

查看解析收藏纠错

+选题
2. VB程序在保存工程的时候生成的工程文件后缀名是（）

A . .frm B . .vbp C . .exe D . pdf

查看解析收藏纠错

+选题
3. 想要改变对象的文字颜色，我们可以修改以下哪个属性值来实现（）

A . BackColor B . BackStyle C . FontSize D . FonrColor

查看解析收藏纠错

+选题
4. 下列对象不具有Caption属性的是（）

A . Label B . Form C . Command D . Text

查看解析收藏纠错

+选题
5. 下列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 . 6

查看解析收藏纠错

+选题
7. 下列常用函数中表示求x的算数平方根的是（）

A . val（x） B . str（x） C . sqr（x） D . cint（x）

查看解析收藏纠错

+选题
8. 在for-----next 循环结构的语句中的循环变量可以是（）

A . integer B . single C . string D . boolean

查看解析收藏纠错

+选题
9. 我们在优化“海伦公式求三角形面积”程序，判断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 >b

查看解析收藏纠错

+选题
10. 以下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。程序功能是解一个一元二次方程ax²+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 =      ‘（根的判别式b²-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元以上要几个月？

查看解析收藏纠错

+选题

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

一、选择题

二、综合题

三、解答题

相关试卷 收起∨

相关试卷收起∨