2011年春江苏计算机二级VB考试笔试真题.docVIP

第二部分 Visual Basic 程序设计 选择题（用答题卡答题，答案依次填在21～30答题号内） 21．以下说法正确的是 2 。 A. 属性是对象的特征，所有的对象都有相同的属性 B. 属性值只能在属性窗口中设置 C. 在程序中可以用赋值语句给对象的任何一个属性赋值 D. 对象的运行时属性不出现在对象属性窗口中 22．下面4个语句中，的是 。 A．N InputBox 输入N, , 5 B．InputBox 输入N, , 5 C．MsgBox 请回答 D．K MsgBox 请回答 23．设X 1，Y 2，则不能在窗体上显示出“A 3”的语句是 23 。 A．Print A X + Y B．Print A ; X + Y C．Print A + Str X + Y D．Print A X + Y 24．InStr 4, abcabca, c + Int 2.5 的值为 24 。 A. 7 B. 8 C. 5 D. 9 25． 26． 26 。 A． B． C． D． 27． 28. 设a 1，b 2，c 3，逻辑表达式a b Xor c a的值是 28 。 A. False B. -1 C. True D. 1 29．在窗体Form1中用“Public Sub Fun x As Integer, y As Single ”定义过程Fun，在窗体Form2的某事件过程中定义了变量I和J均为Integer，若要在过程中调用Form1中的Fun过程，则下列语句中正确的是 29 。 A．Call Fun I, J B．Call Form1.Fun I, J C．Fun I, J D．Form1.Fun I, J ．B．不能用Output、Append 方式打开一个不存在的顺序文件 C．在Input方式下，可以使用不同的文件号同时打开同一个文件 D．在不同的过程中，可以同时用同一个文件号打开不同的文件 填空题（请将答案填写在答题纸的相应答题号内，每个答案只占一行） 1．执行下列程序，单击按钮Command1，窗体上显示第一行内容是 ，第行内容是 （2） ，行内容是 。Option Explicit Private Sub Command1_Click Dim a As Integer, b As Integer a 4 b 3 Do Until a 10 b b / 2 Do Until b 10 a a + b \ 2 + b b b + 5 Print a, b Loop a a - 3 Loop End Sub 2．执行下面程序，当单击Cmd1时，在窗体上显示的第一行内容是 （4） ，第二行的内容是 （5） ，第四行的内容是 （6） 。Option Explicit Private Sub Cmd1_Click Dim a As Integer, b As Integer a 1 b 2 Print fun 2 * b, fun a, b Print a; b End Sub Private Function fun x As Integer, y As Integer As Integer x x + 2 y x - y + 3 fun x + y Print fun End Function 3．执行下面的程序，单击Cmd后 （7） ， （8） ，是 9） 。Option Explicit Option Base 1 Private Sub CmdRun_Click Dim A 3, 3 As Integer, i As Integer, j As Integer, k As Integer, n As Integer n 3 i 1 : j n A i, j 1 For k 2 To n * n If i + 1 n Then i n - j + 2 : j 1 ElseIf i + 1 n And j + 1 n Then j j – i : i 1 Else i i + 1 : j j + 1 End If A i, j k Next k For i 1 To n For j 1 To n Print A i, j ; Next j Print Next i End Sub 4．1001、0101和0110。单击“处理”按钮，在多行文本框Text2中第一行显示 （10） ，第二行显示 （11） ，第三行显示 （12） 。 Option Ex