2018年第一学期期末考试题

一、单项选择题(共10小题，每题2分，共20分)

1、Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（）

A属性、控件和方法

B.属性、事件和方法

C.窗体、控件和过程

D.控件、过程和模块

2、下列语句在任何条件下都至少执行一次的循环体是（）

A.Do While<条件>

B. While<条件>

循环体循环体

Loop Wend

C. Do

D.Do Until<条件>

循环体循环体

LoopUntil<条件> Loop

3、下面控件中，没有caption属性的（）

A.框架

B.组合框

B.命令按钮 D.复选按钮

4、要使标签透明须将其（）属性改为0

A.Style

B. backcolor

C.visible

D.borderstyle

5、下列关于过程叙述不正确的是（）

A.过程的传值调用时将实参的具体值传递给形参

B.过程的传址调用是将实参在内存的地址传递给形参

C.过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的

D.无论过程传值调用还是传地址调用，参数传递都是双向的

6、设a=6, b=8, c=10 则函数lif(a

A.1O

B.6

C.8

D.12

7、下面程序的执行结果是（）

Dim S(10) AS Integer

For i=0 to 10

S(i)=2*i

Next i

Print S(S(3))

A.12

B.6

C.0

D.4

8、一下程序输出的结果是（）

Option Base1

Private Sub Command1_Click()

Dim a(10),p(3)As Integer

K=5

For i=1 to 10

A(i)=i

Next i

For i =1to 3

P(i)=a(i*i)

Next i

For i = 1 to 3

K=k+p(i)*2

Next i

Print k

End sub

A. 33

B.28

C.35

D.37

9、在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：

Private Sub Command1_Click()

For i=1 to 4

For j=0 to i

Print chr$(65+i);

Next j

Print

Next i

End Sub

程序运行后，如果单击命令按钮，则在窗体上现实的内容是（ ）

A. BB

CCC

DDDD

EEEEE

B. A

BB

CCC

DDDD

C. B

CC

DDD

EEEE

D. AA

BBB

CCCC

DDDDD

10、下列过程语句中，一定按传值方式进行数据传递的定义语句是（ ）

A. Sub pro2(a AS integer)

B. Sub pro2(ByRef a AS integer)

C. Sub pro2(ByVal a AS integer)

D.Sub pro2(arr( ) )

二、填空题（共5小题，每题2分，共10分。）

1.数学式222

23

3y y x b a ++⋅+对应的VB 表达式为___ __________ 2.已知a=2，b=3，c=4，d=5 .表达式Not a<=

c Xor 4*c=b^2 Or b<>a+c 的值

为_____ _________

3.设变量x是一个两位正整数，写出判断x的十位数是个奇数数字的VB逻辑

表达式: _

4.写出表达式Val("10abc.5")*Int(-2.7)的值

5.写出DateDiff(“m”,#8/30/1999#,#8/30/2000#)的值

三、判断题(本题15分，每小题1分)

1.标签控件是专门用来显示信息的，所以不能响应鼠标的单击事件。

2.窗体的Move方法不但可以移动窗体，而且可以改变窗体的大小，同时也会改变窗

体与大小和位置有关的属性值。

3.窗体的Enabled属性为False时，窗体上的按钮、文本框等控件都不会对用户的操作

作出反应。

4. 一条Visual Basic 话句如果不超过80个字符是不能续行的。

5. 在Visual Basic 程序中不可能同时出现tstA和tsta两个控件名。

6. If与EndIf关键字必须成对地使用，有个If就有个End if与之相对应。

7. Do和Loop关键字区须成对使用，有个Do就必须有个Loop与之对应。

8. For和Exit For须成对使用，有个For就必顿有个Exit For与之对应。

9. Select Case语句实现的是一种循环结构。

10. 一个Do循环只能使用一个Loop关键字，但可以使用彩个Exit Do语句。

11.如果过程的个形参使用了ByRef 修饰，且调用时相应的实参是个变量;则实参变量

的数据类型必须与形参相同。

12.因为函数过程有返回值，所以只能用在表达式中，不能使用Call班句调用。

13.事件过程只能在事件发生时由系统调用，不能在程序中使用代码直接调用。

14.使用Static关键字定义的通用过程中过程级变量都为静态变量。

15. 在窗体模块中，不能定义全局通用过程。

四、阅读程序（共4小题，每题5分，共20分）。

1.一下程序运行后，单击命令按钮，写出程序的运行结果。

Private Sub Command1_click()

Dim n%,b,t

t=1 :b=1 :n=2

Do While n<=4

if b>1 Then Exit Do

b=b*n : t=t+b : n=n+1

Loop

Print "t" & t

End Sub

2. 在窗体中添加一个命令技钮Command1, 并编写如下程序:

Private Sub Command1_Click()

X=InputBox(x)

if x^2<=9 Then y=1/x

if x^2>9 Then y= x^2+1

if (x^2)-7=9 Then y=x

Print "y=" & y

End Sub