2009计算机基础(2)E卷.doc

姓名： 年级： 专业： 班别： 学号: 2009-2010学年第二学期计算机基础与应用（2）课程考试卷（E卷）专业： 层次：普通高等教育 年级： 2009 （试卷总分：100分，考试时间：90分钟，试题内容5页，空白纸0页）教研室主任审核签名： 周洪建 客观题主观题总分得分客观题部分一、 选择题（每题1分,20题，共20分。）1、优先级别最高的运算符是_算术字符关系逻辑_C_ A.逻辑运算符 B.关系运算符 C.算术运算符 D.以上都不正确2、为了使标签中的内容居中显示，应把alignment属性设置为_0-左对齐，1-右对齐，2居中_A_ A.2 B.1 C.0 D.33、要使标签中的文本靠右显示，应将其Alignment属性设置为_B_ A.0 B.1 C.2 D.34、下面程序段运行后的输出结果是_D_。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.cbc5、下列语句中正确的是_C_。 A.Text1=123 B.txt1.Text+txt2.Text=txt3.Text C.Command1.Name=cmdOK D.12Label.Caption=12346、在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程Private Sub Command1_Click()Dim x As Integerx = x+1for i=1 To 3For j=0 To iIf j Mod 2 = 0 thenPrint Chr$( 65 + i);ElsePrint Chr$(97+i);End ifNext jPrintNext iEnd Sub程序运行后，单击命令按钮，则在窗体上显示的内容是（A） A.BbCcCDdDd B. AaBbBcCc C. AbAbCAbCd D. bBcCcdDdD7、以下程序输出的结果是_B_。Dim aa=Array(1,2,3,4,5,6,7)For I=Lbound(a) to Ubound(a)a(i)=a(i)*a(i)next IPrint a(i) A.42 B.程序出错 C.49 D.不确定8、可以用_（94）_D_命令释放动态数组所占用的内存。 A.Option B.ReDim C.Preserve D.Erase9、执行下列代码的结果是_D_。Private Sub Command1_Click() Dim a(10) For i = 1 To 10 a(i) = i*10 Next i Print a(i)End Sub A.10 B.110 C.100 D.数组下标越界10、阅读程序 Option Base 1Private Sub Form_Click()Dim arr,SumSum = 0arr = Array(1,3,5,7,9,11,13,15,17,19)For i=1 To 10If arr(i)/3 = arr(i)3 ThenSum =Sum+arr(i)End IfNext iPrint SumEnd Sub程序运行后的结果是_C_。 A.13 B.14 C.27 D.1511、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click()Dim aa= Array(1,2,3,4,5)For i=1 To UBound(a)a(i) = a(i)+i-1NextPrint a(3)End Sub程序运行后，单击命令按钮，则在窗体上显示的内容是_B_ A.4 B.5 C.6 D.712、要想从子过程调用后返回两个参数的值，下面子过程语句符合目的的是_C_?_。 A.Sub f(a%,Byval b%) B.Sub f(Byval a%,b%) C.Sub f(ByVal a%,Byval b%) D.Sub f(a%,b%)13、对于Sub过程与Function过程，以下正确的是_A(110)?_。 A.Sub过程不能返回值，而Function过程能返回值 B.两种过程参数的传递方式不同 C.Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以 D.Function过程可以有形参，Sub过程不可以14、在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：Private Sub Command1_Click()n = Val(Text1.Text)If n 2 = n / 2 ThenF = f1(n)ElseF = f2(n)End IfPrint F; nEnd SubPublic Function f1(ByRef x)x = x *xf1 = x + xEnd FunctionPublic Function f2(ByVal x)x = x*xf2 = x + x + xEnd Function程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是_A_。 A.72 36 B.108 36 C.72 6 D.108 615、在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function f(m As Integer)If m Mod 2 = 0 Thenf = mElsef = 1End IfEnd FunctionPrivate Sub Command1_Click()Dim i As IntegerS = 0For i = 1 To 5S = S + f(i)NextPrint SEnd Sub程序运行后，单击命令按钮，在窗体上显示的是_C_。 A.11 B.10 C.9 D.816、假定有以下函数过程：Function Fun(S As String) As StringDim s1 As StringFor i = 1 To Len(S)s1 = UCase(Mid(S, i, 1) + s1Next iFun = s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim Str1 As String, Str2 As StringStr1 = InputBox(请输入一个字符串)Str2 = Fun(Str1)Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为_D_。 A.abcdefg B.ABCDEFG C.gfedcba D.GFEDCBA17、下列语句的输出结果是B_。 a=sqr(3.61) Print Format(a,000.000) A.1.9 B.001.900 C.1.900 D.001.918、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Static x As IntegerClsFor i=1 To 2 y=y+xx=x+2 Next Print x,y End Sub程序运行后，连续三次单击Command1按钮后，窗体上显示的是_B_ A.4 2 B.12 18 C.12 30 D.4 619、要设置计时器控件的间隔时间，需设置的属性是_B_。 A.Enabled B.Interval C.Text D.Value20、要使定时器控件每隔5秒钟产生一个Timer事件，应将其Interval属性值设置为_C_ A.50 B.5000 C.5 D.500主观题部分题号1234得分二、操作题：（每题20分，4题，共80分）1在自己学号2010test1文件夹中，打开p1.vbp，实现以下要求，然后保存。在窗体上画一个命令按钮，名称为Command1，标题为“确定”，再画一个文本框，名称为Text1。编写适当的事件过程，使得在运行时，如果单击命令按钮，则把按钮标题的内容显示在文本框中。2、在自己学号2010test2文件夹中，打开p2.vbp，编写代码实现以下要求，然后保存。（1）窗体的标题“密码检验”。（2）对文本框控件Text1的属性进行设置，使得在文本框控件中输入的字符显示为*，并且最多可以接受8个字符。（3）当在文本框中输入密码“1234567”，并按回车后，标签Label2显示为“欢迎光临！”；如果输入的密码与“1234567”不吻合，标签Label2显示为“密码不符，请重新输入！”，同时清空文本框的内容。3. 在自己学号2010test3文件夹中，打开p3.vbp，编写代码实现以下要求，然后保存。通过一个命令按钮打印7行的杨辉三角（杨辉三角为一个下三角矩阵，每一个行第一个元素和主对角线上的元素为1，其余每一个数正好等于他上