2009-2010年VB试卷.docVIP

2009-2010学年第二学期 《计算机基础与应用》（2）课程考试卷（E卷） 专业： 层次：普通高等教育 　年级： 2009 （试卷总分：100分，考试时间：90分钟，试题内容5页，空白纸0页） 教研室主任审核签名： 周洪建　　 客观题 主观题 总分 得分 客观题部分(F卷) 选择题（每题1分,20题，共20分。） 1、优先级别最高的运算符是______ A.逻辑运算符 关系运算符 算术运算符 以上都不正确 为了使标签中的内容居中显示，应把alignment属性设置为________ A.2 B.1 C.0 D.3 3、要使标签中的文本靠右显示，应将其Alignment属性设置为______ A.0 B.1 C.2 D.3 4、下面程序段运行后的输出结果是________。x$=a y$=bz$=c For i=1 to 2 　　x$=y$:y$=z$:z$=x$Next iPrint x$+y$+z$ A.cab B.bca C.bcb D.cbc 5、下列语句中正确的是________。 A.Text1=123 B.txt1.Text+txt2.Text=txt3.Text C.Command1.Name=cmdOK D.12Label.Caption=1234 6、在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程Private Sub Command1_Click()　　Dim x As Integer　　x = x+1　　for i=1 To 3　　　　For j=0 To i　　　　　　If j Mod 2 = 0 then　　　　　　　　Print Chr$( 65 + i);　　　　　　Else　　　　　　　　Print Chr$(97+i);　　　　　　End if　　　　Next j　　　　Print　　Next iEnd Sub程序运行后，单击命令按钮，则在窗体上显示的内容是（） BbCcCDdDd B. AaBbBcCc C. AbAbCAbCd D. bBcCcdDdDB 7、以下程序输出的结果是________b__。　　Dim a　　a=Array(1,2,3,4,5,6,7)　　For I=Lbound(a) to Ubound(a)　　　　a(i)=a(i)a(i)　　next I　　Print a(i) A.42 B.程序出错 49 D.不确定 可以用_________命令释放动态数组所占用的内存。 A.Option B.ReDim C.Preserve D.Erase 9、执行下列代码的结果是________。Private Sub Command1_Click() 　　Dim a(10) 　　For i = 1 To 10 　　　　a(i) = i10 　　Next i 　　Print a(i)End Sub A.10 B.110 C.100 D.数组下标越界 阅读程序 Option Base 1Private Sub Form_Click()　　Dim arr,Sum　　Sum = 0　　arr = Array(1,3,5,7,9,11,13,15,17,19)　　For i=1 To 10　　　　If arr(i)/3 = arr(i)\3 Then　　　　　　Sum =Sum+arr(i)　　　　End If　　Next iPrint SumEnd Sub程序运行后的结果是_______________。 A.13 B.14 C.27 D.15 11、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click()　　Dim a　　a= Array(1,2,3,4,5)　　For i=1 To UBound(a)　　　　a(i) = a(i)+i-1　　Next　　Print a(3)End Sub程序运行后，单击命令按钮，则在窗体上显示的内容是________ A.4 B.5 C.6 D.7C 12、要想从子过程调用后返回两个参数的值，下面子过程语句符合目的的是_________。 A.Sub f(a%,Byval b%) B.Sub f(Byval a%,b%) C.Sub f(ByVal a