2021计算机二级取消vb考试

VB控制结构 一、 单选题

1. 下面的程序运行后，显示的结果是________。 Dim x%

If x Then Print x+1 Else Print x A） 1 B） 0

C） 显示错误信息 D） 2

2. 语句If x = 1 Then y = 1， 下面说法正确的是______。 A） x = 1 和 y = 1均为赋值语句 B） x = 1 和 y = 1均为关系表达式 C） x = 1 为赋值语句，y = 1 为关系表达式 D） x = 1 为关系表达式，y = 1 为赋值语句 3. 下面分段函数 ， 下面不正确的程序段是______。 A） If x 》= 1 then f=sqr（x+1） f=x*x+3

B） If x 》= 1 then f=sqr（x+1） If x 《 1 then f=x*x +3

C） If x 》= 1 then f=sqr（x+1） _ Else f = x*x +3

D） If x 《 1 then f=x*x +3 _

Else f=sqr（x+1）

4. 计算函数的值。 ， 下面程序段中正确的是______。 A）If x 《 0 then y = 0 If x 《 1 then

VB控制结构 一、 单选题

1. 下面的程序运行后，显示的结果是________。 Dim x%

If x Then Print x+1 Else Print x A） 1 B） 0

C） 显示错误信息 D） 2

2. 语句If x = 1 Then y = 1， 下面说法正确的是______。 A） x = 1 和 y = 1均为赋值语句 B） x = 1 和 y = 1均为关系表达式 C） x = 1 为赋值语句，y = 1 为关系表达式 D） x = 1 为关系表达式，y = 1 为赋值语句 3. 下面分段函数 ， 下面不正确的程序段是______。 A） If x 》= 1 then f=sqr（x+1） f=x*x+3

B） If x 》= 1 then f=sqr（x+1） If x 《 1 then f=x*x +3

C） If x 》= 1 then f=sqr（x+1） _ Else f = x*x +3

D） If x 《 1 then f=x*x +3 _

Else f=sqr（x+1）

4. 计算函数的值。 ， 下面程序段中正确的是______。 A）If x 《 0 then y = 0 If x 《 1 then

全国计算机二级VB考试大纲

考试说明

1. 每年开考2次：上半年4月份的第1个星期六上午——笔试，下半年9月份倒数第2个星期六上午—

—笔试，上机考试从笔试的当天下午开始（期限为5天）

2. 考生可以任选等级考试

3. 笔试、上机成绩均为优秀者，可取得优秀证书，否则均通过者可取得合格证书

4. 上次考试笔试和上机考试仅其中一项成绩合格的，下次考试可以免考合格项，只参加未通过项的考试，

但成绩仅保留一次

考试方式

1.笔试：90分钟。（35个选择、15个空）

答题要求：单选题的答案必须涂划在专用答题卡上（注意考试时，请带好铅笔用于涂黑）；填空题的答案必须写在专用答题纸上（填空时注意：每个空要按标号顺序填，一空占一行，不是一题一行，因为有的题目一题包含多个空）。

2.上机操作：90分钟。

参考用书

学校教材《新编Visual Basic程序设计实用教程》（含学习指导书）

全国参考用书

《全国计算机等级考试二级教程——Visual Basic语言程序设计》（修订版）教育部考试中心 高等教育出版社

《全国计算机等级考试二级考试参考书——Visual Basic语言程序设计》教育部考试中心 高等教育出版社 《全国计算机等级考试二级教程——公共基础知识（2004版）教育部考试中心 高等

1、能够获得一个文本框中被选取文本的内容的属性是______。

A：SelStart

B：SelLength

C：SelText

D：Text

参考答案：C

2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。

A：Text1.Enabled = False

B：Text1.Hide

C：Text1.Clear

D：Text1.Visible = False

参考答案：D

3、对于语句If x=1 Then y=1, 下列说法正确的是____。

A：x=1和y=1 均为赋值语句

B：x=1和y=1 均为关系表达式

C：x=1为赋值语句，y=1为关系表达式

D：x=1为关系表达式，y=1 为赋值语句

参考答案：D

4、以下变量名中，______是不符合Visual Basic的命名规范的。

A：_mnu_Open_234

B：Abc901

C：price_

D：K

参考答案：A

5、MsgBox 函数返回值的类型是__________。

A：数值或字符串

B：字符串

C：变体

D：整型数值

参考答案：D

6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。

A：进入中断模式

B：进入运行模式

C：进入设计模式

D：不用进入任何模式

参考答

1、能够获得一个文本框中被选取文本的内容的属性是______。

A：SelStart

B：SelLength

C：SelText

D：Text

参考答案：C

2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。

A：Text1.Enabled = False

B：Text1.Hide

C：Text1.Clear

D：Text1.Visible = False

参考答案：D

3、对于语句If x=1 Then y=1, 下列说法正确的是____。

A：x=1和y=1 均为赋值语句

B：x=1和y=1 均为关系表达式

C：x=1为赋值语句，y=1为关系表达式

D：x=1为关系表达式，y=1 为赋值语句

参考答案：D

4、以下变量名中，______是不符合Visual Basic的命名规范的。

A：_mnu_Open_234

B：Abc901

C：price_

D：K

参考答案：A

5、MsgBox 函数返回值的类型是__________。

A：数值或字符串

B：字符串

C：变体

D：整型数值

参考答案：D

6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。

A：进入中断模式

B：进入运行模式

C：进入设计模式

D：不用进入任何模式

参考答

2010年全国计算机等级考试二级VB模拟试题

笔试部分

一、选择题

1.如果指定参照完整性的删除规则为\级联\，则当删除父表中的记录时( )

A.系统自动备份父表中被删除记录到新表中

B.若子表中有相关记录，则禁止删除父表记录

C.会自动删除子表中所有相关记录

D.不作参照完整性检查，删除父表记录与子表无关

【参考答案】 C

2.以下关于关系的说法正确的是( )

A.列的次序非常重要 B.当需要索引时列的次序非常重要

C.列的次序无关紧要 D.关键字必须指定为第一列

【参考答案】 C

3.为了在报表中打印当前时间，这时应该插入一个( )

A.表达式控件 B.域控件 C.标签控件 D.文本控件

【参考答案】 B

4.在Visual FoxPro 中释放和关闭表单的方法是( ) A.RELEASE B.CLOSE C.DELETE D.DROP

【参考答案】 A

5.为了从用户菜单返回到系统菜单应该使用命令( ) A.SET DEFAULT SYSTEM

B.SET MENU TO DEFAULT

C.SET SYSTEM TO DEFAULT D.SET S

1、能够获得一个文本框中被选取文本的内容的属性是______。

A：SelStart

B：SelLength

C：SelText

D：Text

参考答案：C

2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。

A：Text1.Enabled = False

B：Text1.Hide

C：Text1.Clear

D：Text1.Visible = False

参考答案：D

3、对于语句If x=1 Then y=1, 下列说法正确的是____。

A：x=1和y=1 均为赋值语句

B：x=1和y=1 均为关系表达式

C：x=1为赋值语句，y=1为关系表达式

D：x=1为关系表达式，y=1 为赋值语句

参考答案：D

4、以下变量名中，______是不符合Visual Basic的命名规范的。

A：_mnu_Open_234

B：Abc901

C：price_

D：K

参考答案：A

5、MsgBox 函数返回值的类型是__________。

A：数值或字符串

B：字符串

C：变体

D：整型数值

参考答案：D

6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。

A：进入中断模式

B：进入运行模式

C：进入设计模式

D：不用进入任何模式

参考答

计算机二级VB数组练习题

数组练习题

'〖第1题〗(事件)双击窗体。

' (响应)求1+2+3+5+8+13+……前20项的和，并将结

' 果在窗体上输出。将结果存入变量SUM中。

'答案 Dim i As Integer

Dim j(1 To 20) As Integer

For i = 1 To 20

If i < 3 Then

j(i) = i

Else

j(i) = j(i - 1) + j(i - 2)

End If

sum = sum + j(i)

Next

Print sum

〖第2题〗题目：(事件)单击窗体。

' (响应)生成一个一维数组(10个数组元素依此为：

' 15、23、72、43、96、23、3、65、88、17)，

' 写程序求出这个数组中的最大值、最小值和平

' 均值，并输出在窗体上。

' 将最大值，最小值，平均值分别存入变量

' Max,Min,Aver中

'答案：Dim a(9) As Integer

Dim i, s As Integer

a(0) = 15

a(1) = 23

a(2) = 72

a(3)

〖第1题〗『程序填空』(1分)(题号:532)

【程序填空】''题目：输入n个数，n由用户输入。 ' 程序的功能是将输入的n个数反向输出? 请在【】处填入正确的 Private Sub Form_Load() Dim n As Integer Dim k As Integer Dim m As Integer Dim h As Integer Dim t As Integer Show

Dim a(100) As Single

n = Val(InputBox(\输入个数n\ Print \处理前数据 :\

'**********SPACE********** For k = 1 To 【?】

a(k) = Val(InputBox(\请输入第\& \个数\

Print a(k); Next k Print

'**********SPACE********** m = Int(【?】) For k = 1 To m h = n - k + 1

填空题

第1题 表达式 1 and 0的值______________________ 答案： False

第2题 把\程序设计\添加到列表框lstBooks____________________________ 答案： lstBooks.AddItem \程序设计\第3题 For k=35 to 0 step 3

next k 语句的循环次数是_______________________答案：0

第4题 Val(\的值是多少_____________________________ 答案：123.55

第5题 每隔定时器控件的Interval属性值时间间隔,单位为毫秒,定时器会触发一次________________________事件 答案：Timer

第6题 表达式(-3) And 8 的值为_______________________. 答案：True

第7题 Print \的结果为________________________. 答案： x=False

第8题 要使同一类型控件组成一个控件数组,必须要求___________________