浙江省湖州市长兴县2020届九年级上学期信息技术期末考试试卷_试卷库

浙江省湖州市长兴县2020届九年级上学期信息技术期末考试试卷

年级：学科：信息技术（信息科技）类型：期末考试来源：91题库

一、选择题(本大题共25小题，每小题2分，共50分。在每小题给出的四个选项中只有一个选项是正确的)（共25小题）

1、下面文件中哪一个是VisaulBasic的工程文件（），

A . exe. frm B . abc.vbp C . te.msc D . df.exe

2、下列关于算法的描述，正确的是（）

A . 描述算法的方法只能是流程图 B . 用一种程序语言来实现某个具体问题的算法只可能有一种 C . 同一种算法只能用一种程序语言来实现 D . 算法是描述解决问题的方法和步骤

3、下列4个流程图图形按顺序对应的名称正确的是（）

A . 开始，终止框、输入／输出框、判断框，处理框 B . 判断框、开始／终止框、处理框、输入／输出框 C . 处理框、输入，输出框、判断框、开始／终止框 D . 输入／输出框、处理框、判断框、开始／终止框

4、在VisualBasic中，语句Label1. Caption=“欢迎使用本系统”中的“Label1”是（）

A . 属性值 B . 属性名 C . 对象名 D . 类名

5、在VisualBasic窗体中添加一个命令按钮，在工具箱中要单击的是（）

A .

B .

C .

D .

6、要使下列VB程序命令按钮Command1上产生单击事件时被执行，则填在横线处最合适的是（）

Private Sub

MsgBox(“好运中国!”)

EndSub

A . Command1_Click( ) B . Command1_Dbclick( ) C . Command1_KeyPress( ) D . Command1_单击( )

7、Dim a as String的作用是将变量a定义为（）

A . 整数型 B . 单精度实数型 C . 字符型 D . 布尔型

8、在Visual Basic中，表达式“9 mod 10”的值是（）

A . 0 B . 1 C . 9 D . 10

9、下列可以作为Visual Basic变量名的是（）

A . 6bf B . fb6 C . -bf6 D . Dim

10、表达式Abs(-6)+Len(“ABCDE”)的值是( )

A . 6ABCDE B . -6ABCDE C . 11 D . 不能计算，出错

11、下列控件中可以用于接受用户输入文本，又可用于显示文本的是（）

A . Label控件 B . TextBox控件 C . CommandButton控件 D . PictureBox控件

12、VB中表达式Mid(“hello”，2，3)的值是（）

A . “ll” B . “llo” C . “ell” D . “ello”

13、VB中下列表达式书写正确的是（）

A . a>b And b>c B . a>b>c C . a≤b D . a≠22

14、把数值123转化成字符串“123”时应该使用的函数是（）

A . Str（） B . Val（） C . Len（） D . Abs（）

15、下面程序的执行结果是（）(提示：Print语句是表示输出)

I=10

J=20

If I>J Then Print I Else Print J

A . 10 B . 20 C . 1020 D . 2010

16、能正确描述条件“A、B之一为零但不同时为零”的VB逻辑表达式是（）

A . A=O Or B=0 B . A*B=0 And A+B<>0 C . A*B=0 Or A+B<>0 D . A=0 And B=0

17、下列程序运行后，变量Value的值是（）

x=10

If x>=10 Then

Value = 5*x

Else

Value=3*x+10

End If

A . 40 B . 50 C . 60 D . 70

18、当在文本框Text1中输入3时，执行下面的程序后，Y的值是（）

x=Val(Text1. Text)

If x<=2 Then

y=2

Else

If x<=3 Then

y=3

Else

y=4

End If

A . 2 B . 3 C . 4 D . 程序出错，没有结果

19、在Select多分支结构中，下面哪个的表达式不正确（）

A . Case 1->10 B . Case“A”,“B” C . Case 3 to 6 D . Case Is<10

20、编程求1+2+3+……+1000的和，该题设计最适合使用的是控制结构为（）

A . 顺序结构 B . 分支结构 C . 循环结构 D . 选择结构

21、下面程序执行后，s的值是多少（）

s = 0

For i=1 To 10 Step 1

s=s+i

Next i

A . 50 B . 55 C . 45 D . 60

22、有如下的VB程序段。

For i=1 To 10 Step 4

s = s+i

Next i

该程序段运行后，语句s=s+i执行的次数为（）

A . 1 B . 3 C . 4 D . 10

23、假定有如下VB程序段

x=1

Do While x<28

X = x * 4

Loop

Print x

程序运行后，输出结果是（）

A . 81 B . 16 C . 4 D . 64

24、下面程序段运行后，总共显示（）个星号

For i=1 To 5

For j=1 To 3

Print”*”

Next j

Next i

A . 5 B . 10 C . 15 D . 2

25、以下程序段执行后，x的值为（）

x=0

For i=1’To 10

For j=i To 10

x=x+1

Next i

A . 50 B . 55 C . 100 D . 105

二、判断题(本大题共10个小题，每小题1分，共10分。)（共10小题）

1、在VB中，语句Dim x As String的作用是：定义x为字符型变量。

A . 正确 B . 错误

2、VB程序代码的基本结构有两种：选择结构和循环结构。

A . 正确 B . 错误

3、VB中表达式2*Sqr(36)+5的值是21。

A . 正确 B . 错误

4、在VB中，For…Next循环结构的初值和终值、步长必须是数值型。如果步长省略，则系统默认步长为1。

A . 正确 B . 错误

5、若要将图片“D：＼电子相册＼HZ. JPG”载入到当前的图片框(PictureBox)中，应该用LoadPicture函数来加载。

A . 正确 B . 错误

6、在VB中，利用搜索过程，列举出所有可能的结果，并逐一判断，排除其中不符合要求的结果，这就是枚举算法，一般利用多重循环来解决。

A . 正确 B . 错误

7、在VB中，平时我们在编程的时候，涉及到数值时一般用十进制表示，所以计算机内所有信息都是用十进制表示的。

A . 正确 B . 错误

8、在VB中有许多常用的函数，例如Rnd随机函数，它的取值范围是0≤Rnd≤1。

A . 正确 B . 错误

9、在VB中，要清除Text1文本框中的内容，可以用Text1. Caption=””来完成。

A . 正确 B . 错误

10、在VB中，End If语句对单行If语句不需要。

A . 正确 B . 错误

三、填空题(本大题共20个空格，每个空格2分，共40分)（共12小题）

1、计算右边VB表达式的值：25+6*4/8=

2、在VB中，将A定义为长整数变量类型，其语句为：

3、用VB表达式表示“X+Y小于10且X-Y要大于0”：

4、语句If 3*4>10 Then a=1 Else a=2，执行后，a的值是

5、计算机上能直接运行的语言是 (机器语言／高级语言)

6、在VB中，用Boolean来表示的数据类型是

7、在VB语言中，用于求余的运算符是

8、下面的程序是用来计算矩形的面积和周长已知a，b表示矩形两条边的边长，s表示矩形的面积，c表示矩形的周长。

……

Dim a As Integer，b As Integer，s As Single，c As Single

a=18

b=9

C=2*( )

(1)计算该矩形的周长

(2)计算该矩形的面积

9、编制一个摄氏温度C和华氏温度F相互转换的程序。相关公式为：C= $\text{[math]}$ (F-32)，F= $\text{[math]}$ C+32。

界面如下：文本框从上到下对象名称分别是Text1，Text2，按钮从左到右名称依次是：Command1，Command2，Command3。

现在程序编写如下：

Private Sub Command1_Click()

Dim C As Sinzle，F As Sinzle

C= (Text1.Text) (VB中字符转数值函数)

F= (计算华氏温度)

Text2.Text= (F) (将华氏温度放在TEXT2中，注意要将数值转字符)

End Sub

10、程序填空，输入成绩(0—100)，输出该成绩对应的等级，90分及以上为“A”，80分及以上为“8”，70分及以上为“C”等，60分及以上为“Di”等，60分及以下为“E”等。(输入分数时不考虑0一100之外的任何数据)

Private Sub Command1_Click()

Dim x As Integer

x=Val(Text 1.Text)

Select Case

Case Is>=90

Text2.Text=“A”

Case Is>=80

Text2.Text=“B”

Case Is

Text2.Text=“C”

Case Is>=60

Text2. Text=“D”

Case Else

End Select

End Sub

11、程序填空：求S=

的和，并在窗体上输出来

Private Sub Command1_Click()

Dim i As Integer

Dim s As ‘(s变量存放总和，此处定义它为单精度变量类型)

For i=1 To

Next i

Print s

End Sub

12、程序填空，当单击窗体后，计算出1+2+3+……+N<500的最大值，并在文本框中显示出来

Private Sub Form-Click()

Dim S As Integer

Dim N As Integer

N=0

S=0 ‘S变量存放的是总和

Do While (条件)

N=N+1

S=S+N

Loop

Text1. Text=Str( )

End Sub