成都医学院计算机题库,成都医学院2013级计算机基础期末B卷.doc

成都医学院2013级计算机基础期末B卷

成都医学院2013学年第2学期课终考试

本科《计算机应用基础》试卷

(适用于全校所有本专科等专业)

试卷代码： B 卷

题号一二三四总分复核人题分10453015100得分试卷说明：本试卷满分为 100 分，考试时间为 120 分钟。

得分评阅教师一、单项选择题(1分/小题，共10分)

1、标签的(A)属性设置为True时,标签控件的大小随标题文字自动调整.

(A)AutoSize(B)Caption(C)Alignment(D)BackStyle

2、CLS可清除窗体或图形框中的内容是(C )

(A)Picture属性设置的背景图案 (B)在设计时放置的控件

(C)程序运行时产生的图形和文字 (D)以上A~C全部

3、RGB 函数通过红.绿.蓝三基色混合产生某种颜色,某语法为RGB(红.绿.蓝),括号中红、绿、蓝三基色的成分使用0~255之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置(A )属性.

(A)Max和Min (B)Smallchange和 LargeChange

(C)Scroll和Change (B)Value

4、要定义一个变量为全局变量,应使用(B )关键字.

(A)Static(B)Public(C)Private(D)Sub

5、下列程序段的运行结果(A )

Private Sub Form_Click()

Dim Msg

Hide

Msg="选择'确定'按钮"

MsgBox Msg

Show

End Sub

(A)隐藏窗体,按'确定'按钮使窗体重现

(B)隐藏窗体

(C)显示窗体,按'确定'按钮使窗体隐藏

(D)显示窗体

6、在窗体上添加一个命令按钮，编写如下代码：

Private Sub Command1_Click

Dim Arr1(10) as Integer ,Arr2(10) As Integer

N=3

For i=1 to 5

Arr1(i)=i

Arr2(n)=2*n+i

Next i

Print Arr2(n), Arr1(n)

End Sub

程序运行后，单击命令按钮，输出结果是( A )

(A)11 3(B)3 11(C)13 3 (D)3 13

7、假设变量BOOLVAR是一个布尔型变量,则下面正确的赋值语句是(D ).

(A)BOOLVAR='TRUE' (B)BOOLVAR=.TRUE.

(C)BOOLVAR=#TRUE# (D)BOOLVAR=3<4

8、执行下面程序段后,变量a的值为( C).

For I=1 To 3

For j=1 To I

For k=j To 3

a=a+1

Next k

Next j

Next I

(A)3(B)9(C)14(D)21

9、下面选项中( D )是算术运算符.

(A)%(B)And(C)&&(D)Mod

10、以下正确的描述是:在Visual Basic 应用程序中(B )

(A)过程的定义可以嵌套,但过程的调用不能嵌套

(B)过程的定义不可以嵌套,但过程的调用能嵌套

(C)过程的定义过程的调用均可以嵌套

(D)过程的定义过程的调用均不可以嵌套

得分评阅教师二、程序阅读(3分/题，共45分)

1、阅读下面程序，如有以下程序代码：

Private Sub Command1_Click()

Dim n As Integer, s As Long

n = Val(Text1.Text)

s = 0

For i = 1 To n

s = s + fac(n)

Next i

Label1.Caption = Str(s)

End Sub

Function fac(ByVal n As Integer) As Long

Dim f As Long, i As Integer

f = 1

For i = 1 To n

f = f * i

Next i

fac = f

End Function

(1)运行程序后，在Text1里输