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

成都医学院2013学年第2学期课终考试 本科《计算机应用基础》试卷 （适用于全校所有本专科等专业） 试卷代码： B 卷 题号 一 二 三 四 总分 复核人 题分 10 45 30 15 100 得分 试卷说明：本试卷满分为 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=34 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里输入5，并单击“Comman