2012年9月份考试可视化程序设计(VB)第一次作业.doc

一、单项选择题（本大题共100分，共 25 小题，每小题 4 分）

1. 下面的数写成普通的形式是1.21576654590569E+019 ( )

A. 12157665459056900

B. 121576654590569000

C. 1215766545905690000

D. 12157665459056900000

2. 下列赋值语句合法的是（ ）

A. A=A+B

B. A+B=A

C. –A=A

D. A=2B

3. 下列选择项中（ ）不能获得焦点。

A. 使用Tab键

B. 用鼠标选择对象

C. 设置GetFocus的值为True

D. 使用SetFocus方法

4. 设a=2，b=3，c=4，d=5，下列表达式的值是（ ）。not　a<=c or 4*c=b^2 and b<>a+c

A. －1

B. 1

C. true

D. false

5. 若将命令按钮设置为默认命令按钮，可以通过（ ）属性来实现。

A. Value

B. Cancel

C. Default

D. Enabled

6. 通用过程可以通过执行“工具”菜单中的（ ）命令来建立。

A. 添加过程

B. 通用过程

C. 添加窗体

D. 添加模块

7. 假设A=3，B=7，C=2，则表达式 NOT ( B>A) 的值是 ( )

A. True

B.  False

C. 表达式错误

D. 不确定

8. 以下说法正确的是（ ）

A. 通用过程可以出现在窗体模块和标准模块中

B. 不同模块中的通用过程可以重名

C. 同一标准模块中的通过过程可以同名

D. 不同标准模块中的通用过程不能同名

9. 在表达式 y = InputBox ( a, b, c ) 中，b 为输入函数对话框的（ ）。

A. 标题

B. 提示

C. 预设值

D. 帮助文件名

10. 如果要退出Do…Loop循环，可使用语句（ ）。

A. Exit

B. Exit Do

C. Exit For

D. Exit For

11. 为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为( )

A. 1

B. 2

C. 3

D. 4

12. 若有数组说明语句：Dim t(1 To 10) As Variant，则t被定义为（ ）。

A. 数值数组

B. 可调数组

C. 字符串数组

D. 可变类型数组

13. Function过程要由函数名返回一个值。如果不使用As数据类型选项来指定函数的类型，函数类型默认为（ ）类型。

A. Integer

B. Variant

C. Long

D. Siring

14. 不论何对象，都具有（ ）属性。

A. Text

B. Name

C. ForeColor

D. Caption

15. 下列语句正确的是（ ）。

A. For i=1 To m

For j=1 To n 

Next i 

 Next j 

B. For i=1 To m 

For j=1 To n

Next i,j 

C. For i=1 To m 

For j=1 To n 

Next j,i 

D. For i=1 To m 

While x>0

Next i 

end

16. 下列过程调用合法的是（ ）

A. Call Prog a,b

B. Prog(a,b)

C. Call Prog(a,b)

D. 以上都不对

17. 以下语句的输出结果是（ ）。 print　format$（32548.5，"000，000.00"）

A. 2548.5

B. 32，548.5

C. 032，548.50

D. 32548.50

18. 数学式子Sin25°写成VB表达式是（ ）。

A. Sin25

B. Sin（25°）

C. Sin（25）

D. Sin（25*3.14/180）

19. 以下程序段中循环语句（ ）。

 x%=0 

While Not x 

x=x+1 

Print x 

Wend

A. 有语法错误

B. 溢出

C. 循环体执行一次

D. 循环体一次也不执行

20. 下列过程说明合法的是（ ）

A. Sub S1(ByVal n!())

B. Sub S1(n!) as Integer

C. Function S1%(S1%)

D. Function S1(ByVal n!)

21. 用下面的语句所定义的数组的元素个数是( ) Dim arr(3 To 6, -2 To 2)

A. 12

B. 16

C. 18

D. 20

22. 下面语句书写正确的是（ ）。

A. If a>max Then

max=a 

Else 

max=b 

End If

B. If a>max Then

max=a 

 Else 

max=b

 End If

C.  If a>max Then 

max=a

 Else

max=6

D. If a>max Then

max=a 

Else 

max=b 

End If

23. 下列一维数组说明语句错误的是（ ）。

A. Dim b(100) AS Double

B. Dim b(-5 To 0) AS Byte

C. Dim b(-10To –20) AS Integer

D. Dim b(5 To 5) AS String

24. 设已定义函数过程f，它有三个整型数值参数，再设a,b和c为实型变量，则调用该函数过程使用的语句为（ ）。

A. f

B. f( a+b, b+c )

C. f ( a+b, b+c ,c+a )

D. f a+b, b+c, c+a

25. 执行下面程序段时，内循环的循环次数是（　）。

 For m=1 To 3

n=0 

While n<=m-1

Print m,n 

n=n+1 

Wend 

Next m

A. 3

B. 4

C. 5

D. 6

答案：

一、单项选择题（100分，共 25 题，每小题 4 分）

1. D 2. A 3. C 4. D 5. C 6. A 7. B 8. D 9. A 10. B 11. B 12. D 13. B 14. B 15. C 16. C 17. C 18. D 19. B 20. D 21. D 22. D 23. C 24. D 25. D