【计算机类职业资格】VB笔试-试卷1及答案解析.doc

1、VB 笔试-试卷 1 及答案解析(总分：90.00，做题时间：90 分钟)一、选择题(总题数：36，分数：72.00)1.选择题（）下列各题 A、B、C、D 四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上。（分数：2.00）_2.算法的主要运算如下，其中 i 的初值为 0，s 初值为 0，“=”为赋值号。 While in do s=0； While sn do s=s+1； i=i+1； 该算法的时间复杂度为()（分数：2.00）A.O(2n)B.O(n+log2n)C.O(nlog2n)D.O(n2)3.一个采用顺序存储结构的栈，其中 top 为栈顶指针，若以地址高端

2、作栈顶，地址低端作栈底，那么进行进栈操作时，对 top 的操作为( )。（分数：2.00）A.top=top-1B.top=top+1C.top=0D.top 不做任何修改4.在包含 1000 个元素的线性表中实现如下各运算，所需的执行时间最长的是( )。（分数：2.00）A.线性表按顺序方式存储，在线性表的第 10 个结点后面插入一个新结点B.线性表按链接方式存储，在线性表的第 10 个结点后面插入一个新结点C.线性表按顺序方式存储，删除线性表的第 990 个结点D.线性表按链接方式存储，删除指针 P 所指向的结点5.现在软件工程界提倡的( )是一种有效提高程序设计效率的方法。（分数：2.0

3、0）A.标准化程序设计B.模块化程序设计C.多道程序设计D.结构化程序设计6.软件生命周期的第一个阶段是( )。（分数：2.00）A.软件定义阶段B.软件开发阶段C.软件运行阶段D.软件维护阶段7.软件详细设计工具中，( )可以很容易地表示基本结构的嵌套关系。（分数：2.00）A.程序流程图B.N-S 图C.问题分析图D.PDL8.下列不属于白盒测试的基本原则的是( )。（分数：2.00）A.保证所测模块中每一独立路径至少执行一次B.保证所测模块所判断的每一分支至少执行一次C.保证所测模块每一循环都在边界条件和一般条件下至少各执行一次D.验证部分内部数据结构的有效性9.关系模型有三类完整性约束

4、：实体完整性、参照完整性和用户定义的完整性。定义外键实现完整性是( )。（分数：2.00）A.实体完整性B.参照完整性C.用户定义的完整性D.实体完整性、参照完整性和用户定义的完整性10.下述不属于概念模型应具备的性质的是( )。（分数：2.00）A.有丰富的语义表达能力B.易于交流和理解C.易于变动D.在计算机中实现的效率高11.若 D1=a1,a2,a3，D2=b1,b2,b3，则集合 D1D2 中共有元组( )个。（分数：2.00）A.6B.8C.9D.1212.关于 VB，下列说法不正确的是( )。（分数：2.00）A.一行可以写多条语句，一条语句也可以写在多行上B.书写时大小写严格区

5、分C.要在 VB 程序中加注释，可使用 REM 和单引号D.系统自动把保留字的第一个字母改为大写13.窗体加载时，最先发生的事件是( )。（分数：2.00）A.Form_InitializeB.Form LoadC.Form_ResizeD.Form Paint14.Double 双精度数占( )个字节。（分数：2.00）A.2B.4C.8D.1015.函数 Mid(“abcdefghijk“，5，3)的值是( )。（分数：2.00）A.efgB.fghC.efghijkD.fghijk16.表示条件“X+Y 大于 10 小于 100，且 X-Y 要小于 0”的逻辑表达式为( )。（分数：2.

6、00）A.10X+Y100 And X-Y0B.X+Y10 And X+Y100 And X-Y0C.X+Y10 And X+Y100 Or X-YOD.X+Y10 Or X+Y100 Or X-Y017.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下程序： Private Sub Command1_Click() Static A As Integer Static B As Integer B=B+3 A=3+A Print A,B End Sub 程序运行时，三次单击命令按钮 Command1 后，在窗体上显示的第三行是( )。（分数：2.00）A.3 6B.6 6C.

7、9 9D.3 318.设有语句： Temp=MsgBox(“继续执行吗“,vbYesNo,“退出提示框“) 程序运行时，在对话框的标题栏将显示( )。（分数：2.00）A.继续执行吗B.vbYesNoC.退出提示框D.Temp19.在窗体上画一个名称为 List1 的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为_。（分数：2.00）A.For i=0 To List1ListCount-1 NextB.For i=0 To List1Count-1 NextC.For i=1 To List1ListCount NextD.For i=1 To List1Count-1 N

8、ext20.在窗体上有两个文本框控件和一个命令按钮，名称分别为 Text1、Text2 和 Command1，以下程序实现的功能是当单击 Command1 按钮时，将把 Text2 控件中的文本全部选中，并把焦点设置在该文本框中。程序运行时的界面如图 20-4 所示，以下两空应填( )。 （分数：2.00）A.SelLength SetFocusB.SelText SetFocusC.SelLength GetFocusD.SelText GetFocus21.窗体上有一个名为 List1 的列表框，程序执行时在窗体上单击，输出的结果是( )。 Priate Sub Form_Click()

9、For i=0 To List1ListCount-1 If i Mod 2=0 Then Print List1List(i)； End If Next i End Sub Private Sub Form_Load() List1AddItem“中国“ List1AddItem“日本“ List1AddItem“韩国“ List1AddItem“新加坡“ List1AddItem“香港“ End Sub（分数：2.00）A.中国韩国B.日本新加坡C.中国韩国香港D.中国日本韩国新加坡香港22.程序段： S=0 For I=1 to 5 step 2 S=s+I Next I Print I

10、 语句 S=S+1 执行的次数和最后 I 的值分别为( )。（分数：2.00）A.3，7B.2，5C.3，5D.2，723.代数式|e3a+1gy13+siny2|对应的 Visual Bask 表达式是( )。（分数：2.00）A.Abs(e3*a+1g(y13)+1/sin(y2)B.Abs(Exp(3)*a+Log(y13)/Log(10)+sin(y2)C.Abs(Exp(3)*a+Log(y13)+sin(y2)D.Abs(Exp(3)*a+Log(y13)+1/sin(y2)24.当发生窗体的单击事件时，输出的第二行为( )。 Private Sub Form_click() Di

11、m N1 As Integer,N2 As Integer,N3 As Integer N1=1:N2=1 Print N1;N2 Do N3=N1+N2 Print N3； N1=N2:N2=N3 Loop Until N3=5 End Sub（分数：2.00）A.1 1 1B.2 3 5C.2 5 7D.2 3 425.当发生 Form_Click 事件时，窗体上显示的第三行是( )。 Option Base 1 Private Sub Form_Click() Dim i As Integer，j As Integer，k As Integer Dim a(5，5)As Integer

12、For i=1 To 5 k=1 For i=1 To 5 If(i=j)Then a(i,j)=k k=k+2 Else a(i,j)=k+1 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j)； Next j Print Next i End Sub（分数：2.00）A.1 3 5 7 9B.2 1 3 5 7C.2 2 2 1 3D.2 2 1 3 526.用下面语句定义的数组元素个数是( )。 Dim Arr2(-2 To 6，1 To 5)As Integer（分数：2.00）A.45B.40C.36D.3227.关

13、于 VB 中的过程，下列说法正确的是( )。（分数：2.00）A.不能嵌套定义，也不能嵌套调用B.可嵌套定义，但不能嵌套调用C.不能嵌套定义，但可嵌套调用D.既能嵌套定义，也能嵌套调用28.在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为，( )。 Private Sub fun(ByVal x As Integer,ByVal y As Integer,Byval z As Integer) z=x3*y3 End Sub Private Sub Command1_Click() Dim m As Integer Call fun(2，3，m) Print m End Sub

14、（分数：2.00）A.216B.0C.35D.程序不能运行29.当发生 Form_Click 事件时，下列程序的输出结果是( )。 Private m As Integer,n As Integer Private Sub Form_Click() Dim k As Integer，p As Integer k=6：p=60 Call sub1(k,p) Print m,n,m,k,p Call sub1(k,p) Print m,n,k,p End Sub Private Sub Form_Load() m=7 n=70 End Sub Public Sub sub1(x As Intege

15、r,ByVal y As Integer) Dim m As Integer n=n+5 m=n+x+y x=x+y y=x+y End Sub（分数：2.00）A.7 75 66 60 7 80 126 60B.7 75 66 60 7 75 126 60C.7 75 66 60 7 80 66 60D.7 75 66 60 7 75 66 6030.如果想要在名为 MenuItem1 的菜单项前加“”，则应执行( )语句。（分数：2.00）A.Menultem1Caption=“B.MenuItem1Checked=TrueC.MenuItem1Enabled=TrueD.MenuItem

16、1Visible=True31.已知通用对话框名为 Cd1g，则执行下列的( )语句，将弹出“打印机”对话框。（分数：2.00）A.Cd1gAction=6B.Cd1gAction=5C.Cd1gAction=4D.Cd1gAction=332.可通过“打开”对话框的( )属性设置对话框中所显示文件的类型。（分数：2.00）A.FileNameB.FilterC.FilterIndexD.InitDir33.要在窗体 Form1 中定义一个可以在窗体 Form2 中使用的整型变量 X，可在 Form1 窗体的通用部分输入语句( )。（分数：2.00）A.Dim X As IntegerB.St

17、atic X As IntegerC.Private X As IntegerD.Public X As Integer34.可通过( )方法把一个窗体隐藏起来，但不从内存中卸载。（分数：2.00）A.UnloadB.HideC.LoadD.Close35.在文本框中按下了一个键(A)，以下正确的说法是( )。（分数：2.00）A.将会发生 KeyDow、KeyPress、Change 和 KeyUp 事件B.将会发生 KeyDow、KeyPress、KeyUp 事件但不会发生 Change 事件C.将会发生 KeyDow、Change、KeyUp 事件但不会发生 KeyPress 事件D.只

18、会发生 KeyPress 和 Change 事件36.在文件列表框中，要使它只显示具有归档属性和只读属性的文件，应使它的( )属性为 True。（分数：2.00）A.ArchiveB.Norma1C.HiddenD.ReadOnly二、填空题(总题数：9，分数：18.00)37.填空题（每空）请将每一个空的正确答案写在答题卡上。注意：以命令关键字填空的必须拼写完整。（分数：2.00）_38.某二叉树中度为 2 的结点有 18 个，则该二叉树中有 1 个叶子结点。（分数：2.00）填空项 1:_39.在面向对象方法中，类的实例称为 1】。（分数：2.00）填空项 1:_40.诊断和改正程序中错误

19、的工作通常称为 1（分数：2.00）填空项 1:_41.在关系数据库中，把数据表示成二维表，每一个二维表称为 1。（分数：2.00）填空项 1:_42.问题处理方案的正确而完整的描述称为 1。（分数：2.00）填空项 1:_43.表达式“12+34”的值是 1，表达式“12”N2 Do N3=N1+N2 Print N3； N1=N2:N2=N3 Loop Until N3=5 End Sub（分数：2.00）A.1 1 1B.2 3 5 C.2 5 7D.2 3 4解析：解析：此处需注意的是，DOLoop Until 循环的结束条件是 Until 后面的表达式值是 True。当发生窗体的单击

20、事件时，首先给变量 N1 和 N2 赋值为 1，然后输出为 1 2 并换行。执行循环，N3 的值为 2，输出 2 不换行，进行赋值后 N1 的值为 1，N2 的值为 2，判断条件“2=5”为 False，重新执行循环：第二次执行循环输出 N3 的值为 3，循环结束条件依旧为 False；第三次执行循环输出 N3 的值为 5，循环结束条件为 True，循环退出。所以输出的第二行为“2 3 5”。25.当发生 Form_Click 事件时，窗体上显示的第三行是( )。 Option Base 1 Private Sub Form_Click() Dim i As Integer，j As Inte

21、ger，k As Integer Dim a(5，5)As Integer For i=1 To 5 k=1 For i=1 To 5 If(i=j)Then a(i,j)=k k=k+2 Else a(i,j)=k+1 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j)； Next j Print Next i End Sub（分数：2.00）A.1 3 5 7 9B.2 1 3 5 7C.2 2 2 1 3D.2 2 1 3 5 解析：解析：本题首先通过一个两层循环给 5 行 5 列的二维数组 a 的各个元素赋值，通过计算

22、，不难得出二维数组各行的值。第一行的值为：1 3 5 7 9：第二行的值为：2 1 3 5 7；第三行的值为：2 2 1 3 5；第四行的值为：2 2 2 1 3；第五行的值为：2 2 2 2 1。然后再通过一个双层循环按行输出该数组，所以输出的第三行为：2 2 1 3 5。26.用下面语句定义的数组元素个数是( )。 Dim Arr2(-2 To 6，1 To 5)As Integer（分数：2.00）A.45 B.40C.36D.32解析：解析：二维数组的元素个数可由各维的下标个数相乘得到，每一维的下标个数可表示为：Up-Down+1。Up 为下标上界，Down 为下标下界，故该数组第一维

23、的长度为 9，第二维的长度为 5，数组元素个数为 45。27.关于 VB 中的过程，下列说法正确的是( )。（分数：2.00）A.不能嵌套定义，也不能嵌套调用B.可嵌套定义，但不能嵌套调用C.不能嵌套定义，但可嵌套调用 D.既能嵌套定义，也能嵌套调用解析：解析：VB 中的过程都是并行的，不可嵌套定义，但 VB 中的过程可以相互调用，并可嵌套调用和递归调用。28.在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为，( )。 Private Sub fun(ByVal x As Integer,ByVal y As Integer,Byval z As Integer) z=x3*y

24、3 End Sub Private Sub Command1_Click() Dim m As Integer Call fun(2，3，m) Print m End Sub（分数：2.00）A.216B.0 C.35D.程序不能运行解析：解析：当发生了 Command1的单击事件时，调用 fun 过程，把常量 2、3 和变量 m 按值传给形参x、y 和 z，在过程 fun 中把表达式“x3*y3”的值赋给 z，z 的值为 316。过程调用返回后，由于 m 是值传递，所以对 z 的修改并没有改变它的值，m 依旧保留原来的值是 0。29.当发生 Form_Click 事件时，下列程序的输出结果是

25、( )。 Private m As Integer,n As Integer Private Sub Form_Click() Dim k As Integer，p As Integer k=6：p=60 Call sub1(k,p) Print m,n,m,k,p Call sub1(k,p) Print m,n,k,p End Sub Private Sub Form_Load() m=7 n=70 End Sub Public Sub sub1(x As Integer,ByVal y As Integer) Dim m As Integer n=n+5 m=n+x+y x=x+y y=

26、x+y End Sub（分数：2.00）A.7 75 66 60 7 80 126 60 B.7 75 66 60 7 75 126 60C.7 75 66 60 7 80 66 60D.7 75 66 60 7 75 66 60解析：解析：本题定义了两个窗体级变量 m 和 n，并在窗体的 Load 事件中给窗体级变量 m 和 n 分别赋值7 和 70。当发生 Form_Click 事件时，首先进行第一次 sub1 过程的调用，把 k 的值 6 按地址传递给形参x，把 p 的值 60 按值传递给形参 y。在 sub1 中定义了一个局部变量 m，因此在该函数中使用的 m 是局部变量而非窗体级变量

27、。执行下面的 4 条赋值语句后，窗体级变量 n 的值为 75，局部变量 m 的值为 142，形参x 的值为 66，形参 y 的值为 126。函数调用返回后，由于 p 是按值传递，所以它的值没有变化，k 是按地址传递，所以它的值变为邱，输出 m、n、k 和 p 的值分别是 7、75、66 和 60。同理，分析第二次 sub1 过程调用，可知过程调用返回后，变量 m、n、k 和 p 的值分别是 7、80、126、60。30.如果想要在名为 MenuItem1 的菜单项前加“”，则应执行( )语句。（分数：2.00）A.Menultem1Caption=“B.MenuItem1Checked=Tru

28、e C.MenuItem1Enabled=TrueD.MenuItem1Visible=True解析：解析：可通过菜单项的一些属性来改变菜单项的特征。菜单项的 Caption 属性用来设置菜单项显示的标题；Checked 属性用来设置菜单项的选中标记，如果它的值为 True 时，将在菜单项名前加一个“”；Enabled 属性用来决定菜单项是否起作用，当它的值为 True 时将起作用，为 False 时将以变灰的方式显示；Visible 属性用来决定菜单项是否可见，当它的值为 True 时，菜单项可见，否则菜单项不可见。31.已知通用对话框名为 Cd1g，则执行下列的( )语句，将弹出“打印机”

29、对话框。（分数：2.00）A.Cd1gAction=6B.Cd1gAction=5 C.Cd1gAction=4D.Cd1gAction=3解析：解析：为了弹出某个对话框，除使用通用对话框的方法外，还可以通过给通用对话框的 Action 属性赋值来实现，给 Action 属性赋不同的值将弹出不同的对话框。若给 Action 属性赋值为 5，运行时将弹出“打印机”对话框。32.可通过“打开”对话框的( )属性设置对话框中所显示文件的类型。（分数：2.00）A.FileNameB.Filter C.FilterIndexD.InitDir解析：解析：“打开”对话框的 FileName 属性用于返回

30、在“文件名称”文本框中显示的文件名，在程序中可用该属性值设置或返回用户所选定的文件名(包括路径)：Filter 属性用于确定文件列表框中所显示文件的类型，该属性值可以由一组元素或“尸符号分开的分别表示不同类型文件的多组元素组成；FilterIndex 表示用户在文件类型列表框中选定了第几组文件类型：InitDir 用来指定打开对话框中的初始目录，若要显示当前目录，则该属性不需要设置。33.要在窗体 Form1 中定义一个可以在窗体 Form2 中使用的整型变量 X，可在 Form1 窗体的通用部分输入语句( )。（分数：2.00）A.Dim X As IntegerB.Static X As

31、IntegerC.Private X As IntegerD.Public X As Integer 解析：解析：在窗体的通用部分用“Dim”、“Private”和“Static”定义的变量是窗体级变量，只能被本窗体中的过程使用。为了能使变量能够被其他窗体使用，必须把它定义成全局变量，即用“Public”定义。34.可通过( )方法把一个窗体隐藏起来，但不从内存中卸载。（分数：2.00）A.UnloadB.Hide C.LoadD.Close解析：解析：Unload 和 Load 是语句而不是方法，Unload 语句用来把指定的窗体从内存卸载，Load 语句用来把指定的窗体加载到内存。Hide

32、 是窗体的方法，用来把指定的窗体隐藏起来但并不从内存中卸载。窗体无 Close 方法。35.在文本框中按下了一个键(A)，以下正确的说法是( )。（分数：2.00）A.将会发生 KeyDow、KeyPress、Change 和 KeyUp 事件 B.将会发生 KeyDow、KeyPress、KeyUp 事件但不会发生 Change 事件C.将会发生 KeyDow、Change、KeyUp 事件但不会发生 KeyPress 事件D.只会发生 KeyPress 和 Change 事件解析：解析：在文本框中按下了一个键，将会依次发生以下事件：KeyDown、KeyPress、Change 和KeyU

33、p。如果没有改变文本框的值，Change 事件不发生，但其他事件将会发生，按下A键显然改变了文本框的内容，故四个事件都会发生。36.在文件列表框中，要使它只显示具有归档属性和只读属性的文件，应使它的( )属性为 True。（分数：2.00）A.ArchiveB.Norma1 C.HiddenD.ReadOnly解析：解析：文件列表框有一些属性用来控制在文件列表框中显示的文件类型。Archive 属性设置为 True时，将在其中显示具有归档属性的文件；Hidden 属性设置为 True 时，将在其中显示具有隐藏属性的文件：System 属性设置为 True 时，将在其中显示具有系统属性的文件；N

34、ormal 属性设置为 True 时，将在其中显示具有归档属性和只读属性的文件。二、填空题(总题数：9，分数：18.00)37.填空题（每空）请将每一个空的正确答案写在答题卡上。注意：以命令关键字填空的必须拼写完整。（分数：2.00）_解析：38.某二叉树中度为 2 的结点有 18 个，则该二叉树中有 1 个叶子结点。（分数：2.00）填空项 1:_ （正确答案：正确答案：19）解析：解析：在任意一棵二叉树中，度为 0 的结点(即叶子结点)总是比度为 2 的结点多一个。39.在面向对象方法中，类的实例称为 1】。（分数：2.00）填空项 1:_ （正确答案：正确答案：对象）解析：解析：类是具有

35、共同属性、共同方法的对象的集合，它描述了属于该对象类型的所有对象的性质，而一个对象则是其对应类的一个实例。40.诊断和改正程序中错误的工作通常称为 1（分数：2.00）填空项 1:_ （正确答案：正确答案：程序调试）解析：解析：程序调试是指在发生程序错误的情况下，确定出错的位置并纠正错误，其中关键是要确定出错的位置。程序调试主要在开发阶段。41.在关系数据库中，把数据表示成二维表，每一个二维表称为 1。（分数：2.00）填空项 1:_ （正确答案：正确答案：关系）解析：解析：在关系数据库中，一个关系的逻辑结构就是一张二维表。这种用二维表的形式表示实体和实体间联系的数据模型称为关系数据模型。42

36、.问题处理方案的正确而完整的描述称为 1。（分数：2.00）填空项 1:_ （正确答案：正确答案：算法）解析：解析：算法是指解题方案的准确而完整的描述。43.表达式“12+34”的值是 1，表达式“12”&“34”的值是 2。（分数：2.00）填空项 1:_ （正确答案：正确答案：“1234“ , “1234“）解析：解析：Visual Basic 字符串的连接使用“&”或“+”。为了使程序代码具有可读性，在一般情况下使用“+”，本题两处的答案是一致的，为：1234。44.假定建立了一个工程，该工程包括两个窗体，其名称分别为 Form1 和 Fom2，启动窗体为 Form1。在Form1 上面

37、画一个命令按钮 Command1，程序运行后，要求当单击该命令按钮时，Form1 窗体消失，显示Form2，请在 1 和 2 处将程序补充完整。 Private Sub Command1_Click( ) 3 form2 4 End Sub（分数：2.00）填空项 1:_ （正确答案：正确答案：Unload Form1 或 Unload Me ,show）解析：解析：当单击控制按钮时，Form1 窗体消失，表示该窗体被卸载，故应填：Unload Form1，也可以写成 Unload Me。45.下面的程序用于根据文本框 Text 中输入的内容进行以下处理： 若 Text 为 4，6，则打印“T

38、ext 的值为 4，6”；若 Text 为 1，3，5，7，则打印“Text 的值为 1，3，5，7”；若 Text 为 8， 9，则打印“Text 的值为 8，9”；否则打印“Text 的值不在范围内”。请填空。 Private Sub Command1_Click( ) Select Case Val(Text.Text) Case 1 Print“Text 的值为 4，6” Case 2 Print“Text 的值为1，3，5，7” Case 3 Print“Text 的值为 8，9” Case 4 Print“Text 的值不在范围内” End Select End Sub（分数：2.00）填空项 1:_ （正确答案：正确答案：4,6 , 1,3,5,7 , 8,9）解析：解析：Select Case 语句根据一个表达式的值，在一组相互独立的可选语句序列中挑选要执行的语句序列。Case 后面接的值域有多种表达方式，可以是诸如“Case 2，4，6，8”的形式，也可以是“Case1 to 5”这种形式。根据题意，应该选择前种方式，故6处填：4， 6；7处填：1，3，5，7；8处填：8，9；9处表示在其他情况下，所以填 Else。