1、二级 VISUAL+BASIC 笔试-295 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.要使文本框获得输入焦点，则应采用文本框控件的( )方法。（分数：2.00）A.GotFocusB.LostFocusC.KeyPressD.SetFocus2.设组合框 Combo1 中有 3 个项目，则下列语句中能删除最后一项的语句是( )。（分数：2.00）A.Combo1.RemoveItem TextB.Combo1.RemoveItem 2C.Combo1.RemoveItem 3D.Combo1.RemoveItem Combo1.Li
2、steount3.线性表进行二分法检索，其前提条件是( )。（分数：2.00）A.线性表以顺序方式存储，并按关键码值排好序B.线性表以顺序方式存储，并按关键码的检索频率排好序C.线性表以链式方式存储，并按关键码值排好序D.线性表以链式方式存储，并按关键码的检索频率排好序4.下列对于软件测试的描述中正确的是( )。（分数：2.00）A.软件测试的目的是证明程序是否正确B.软件测试的目的是使程序运行结果正确C.软件测试的目的是尽可能地多发现程序中的错误D.软件测试的目的是使程序符合结构化原则5.下列关于多重窗体程序的叙述中，错误的是( )。（分数：2.00）A.用 Hide 方法不但可以隐藏窗体，
3、而且能清除内存中的窗体B.在多重窗体程序中，各窗体的菜单是彼此独立的C.在多重窗体程序中，可以根据需要指定启动窗体D.对于多重窗体程序，需要单独保存每个窗体6.下列叙述中不正确的是( )。（分数：2.00）A.若使用 Write#语句将数据输出到文件，则各数据项之间自动插入逗号，并且将字符串加上双引号B.若使用 Print#语句将数据输出到文件，则各数据项之间没有逗号分隔，且字符串不加双引号C.Write#语句和 Print#语句建立的顺序文件格式完全一样D.Write#语句和 Print#语句均实现向文件写入数据7.假定有以下两个过程：Private Sub PPP(a As Single,
4、 b As Single)a=a+bPrint a, bb=a+bPrint a, bEnd SubPrivate Sub Form_Activate0x=18Call PPP(x), (x)Print xEnd Sub则下列说法中不正确的是( )。（分数：2.00）A.形参是 a 和 b，两个实参(x)和(x)允许重名B.形参是 a 和 b，实参(x)表示传值调用C.形参是 a 和 b，实参(x)表示是非传址调用D.形参是 a 和 b，两个实参(x)和(x)不允许重名8.在 C 盘当前文件夹下有一个已建立好的顺序文件 Alph.txt，文件内容为只含有字母的一个字符串(有双引号界定符)。单击
5、窗体，打开 Alph.txt 文件，读取字符串并显示在文本框 Text1 中，然后调用 StrSort过程将此字符串按 ASCII 码的顺序重新排列并显示在文本框 Text2，最后将重新排列的字符串存入AlpO.txt 文件中(无双引号界定符)。请选择横线处合适的语句( )。Private Sub Form_Load()Dim StrIn As String, StrOut As StringOpen “C:/Alph.txt“ For Input As #1_CloseText1.Text = StrIn_Text2.Text = StrOutOpen “C:/AlpO.txt“ For O
6、utput As #2_CloseEnd SubPrivate Function StrSort(s As String) As StringDim sArr() As String * 1, i As Integer, j As Integer, n As IntegerDim t As String * 1n = Len(s)ReDim sArr(n)For i= 1 To nsArr(i) = Mid(s, i, 1)Next iFor i= 1 To n-1For j =i+1 To nIf sArr(i)sArr(j) Thent = sArr(i): sArr(i) = sArr(
7、j): sArr(j) = tEnd IfNext j, iFor i= 1 To nStrSort = StrSort CurrentX, CurrentYD.Picture1.Stretch=True26.对话框在关闭之前，不能继续执行应用程序的其他部分，这种对话框属于( )。（分数：2.00）A.输入对话框B.输出对话框C.模式(模态)对话框D.无模式对话框27.过程语句中，使用的参数表可以是下列哪种( )。（分数：2.00）A.常量或变量名B.表达式或变量名C.数组元素或变量名D.变量名或数组名28.在窗体上有一个命令按钮 Command1，编写如下程序：Private Sub Com
8、mand1_Click()Print pp1(3, 7)End SubPublic Function pp1(x As Single, n As Integer) As SingleIf n = 0 Thenpp1= 1ElseIf n Mod 2 = 1 Thenpp1 =x*x+nElsepp1 =x*x-nEnd IfEnd IfEnd Function程序运行后，单击该命令按钮，屏幕上显示的是( )。（分数：2.00）A.2B.1C.0D.1629.设 x=4，y=8，z=7，表达式 xz Or zX 的值是( )。（分数：2.00）A.1B.-1C.TreeD.False30.如果在
9、 C 盘当前文件夹下已经存在名称为 Sdat.dat 的顺序文件，那么执行语句 Open “c:/Sdat.dat“For Append As #1 之后，将( )。（分数：2.00）A.删除文件中的原有内容B.保留文件中原有内容，并在文件尾添加新内容C.保留文件中原有内容，并在文件头添加新内容D.以上均不对31.Function 过程与 Sub 过程的最主要区别是( )。（分数：2.00）A.Function 过程一定要有形参，而 Sub 过程可以没有形参B.Function 过程的终端语句是 End Function，而 Sub 过程的终端语句是 End SubC.Function 过程是
10、用于计算函数值的。而 Sub 过程是用于改变属性值的D.Function 过程要返回函数值，而 Sub 过程没有返回值32.下列选项中不属于结构化程序设计方法的是( )。（分数：2.00）A.自顶向下B.逐步求精C.模块化D.可复用33.设已打开 5 个文件，文件号为 1、2、3、4、5。要关闭所有文件，则下列语句中正确的是( )。（分数：2.00）A.Close #1,2,3,4,5B.Close #1,#2,#3,04,#5C.Close #1-#5D.Close #1,#2,#3,#4,#534.在文本框中输入密码时，要求在文本框中只显示(*)号，则应当设置此文本框的 ( )属性。（分数
11、：2.00）A.TextB.CaptionC.passwordD.PasswordChar35.设置复选框或单选钮的标题对齐方式的属性是( )。（分数：2.00）A.AlighB.StyleC.AlignmentD.Sorted二、填空题(总题数：13，分数：30.00)36.数据库系统的主要特点为数据集成性、数据的高 1 和低冗余性、数据独立性和数据统一管理和控制。（分数：2.00）填空项 1:_37.数据库的逻辑模型设计阶段的任务是将 1 转换成关系模式。（分数：2.00）填空项 1:_38.在面向对象方法中， 1 描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_39
12、.最简单的交换排序方法是 1。（分数：2.00）填空项 1:_40.在链表的运算过程中，能够使空表与非空表的运算统一的结构是 1。（分数：2.00）填空项 1:_41.鼠标移动经过控件时，将触发控件的 1 事件。（分数：2.00）填空项 1:_42.已知变量 boo1 Var 是一个布尔型的变量，如果要给其赋值为 True，则正确的赋值语句就是 1。（分数：2.00）填空项 1:_43.下面这个 Sub 过程的功能是统计字符串中“a”的个数，请在空白处填上合适的代码完成程序。Private Sub numCount()Dim hum As Integers = “software And ha
13、rdware“num = Len(s$)For i = 1 To humb$=_If b$ = “a“ Then x = x+1Next iPrint “x=“; xEnd Sub（分数：2.00）填空项 1:_44.下列程序的输出结果为_。Sub Prin()Dim B As StringA=1B=A MinEnd Sub（分数：2.00）填空项 1:_47.下列事件过程的功能是：建立一个名为 Data1 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 1，2，3，90。请在空白处填入适当的内容，将程序补充完整。Private Type AngK As IntegerSin
14、x As SingleCosx As SingleEnd Type_定义 Ang 类型的变量 KscPrivate Sub Form_Click()Dim Y As SingleOpen “C:/Datal.txt“ For Random As #1 Len = 10Put #1, 1, KscY = 3.14159 / 180For i = 1 To 90Ksc. K=i_= Sin(i*Y)给变量 Ksc 的正弦函数值赋值Ksc.Cosx = Cos(i*Y)Next iClose #1End Sub（分数：4.00）填空项 1:_48.在窗体上建立一个单选钮组 Option1 和一个图片
15、框 Picture1，如下图所示。当选择不同的单选钮时，图片框中填充不同的图案，请填写程序的空白处，使程序完整。（分数：4.00）填空项 1:_二级 VISUAL+BASIC 笔试-295 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.要使文本框获得输入焦点，则应采用文本框控件的( )方法。（分数：2.00）A.GotFocusB.LostFocusC.KeyPressD.SetFocus 解析：解析 GotFocus 是当对象获得焦点时触发的事件；LostFocus 事件是在对象失去焦点时触发的事件；SetFocus 方法是将焦点移至指定
16、的控件或窗体；KeyPress 事件是当用户按下和松开一个键时触发的事件。2.设组合框 Combo1 中有 3 个项目，则下列语句中能删除最后一项的语句是( )。（分数：2.00）A.Combo1.RemoveItem TextB.Combo1.RemoveItem 2 C.Combo1.RemoveItem 3D.Combo1.RemoveItem Combo1.Listeount解析：解析 RemoveItem 方法用以从组合框中删除一项，其参数为该项所在的位置，索引从 0 开始，要删除题中的最后一项，可以用 Combo1.RemoveItem 2 或 Combo1.RemoveItem
17、Combo1.Listcount-1。3.线性表进行二分法检索，其前提条件是( )。（分数：2.00）A.线性表以顺序方式存储，并按关键码值排好序 B.线性表以顺序方式存储，并按关键码的检索频率排好序C.线性表以链式方式存储，并按关键码值排好序D.线性表以链式方式存储，并按关键码的检索频率排好序解析：解析 对线性表进行二分法检索，要求线性表是按顺序方式存储的，并按关键码值的大小排好序，而不是按关键码的检索频率排序。4.下列对于软件测试的描述中正确的是( )。（分数：2.00）A.软件测试的目的是证明程序是否正确B.软件测试的目的是使程序运行结果正确C.软件测试的目的是尽可能地多发现程序中的错误
18、 D.软件测试的目的是使程序符合结构化原则解析：解析 软件测试是为了尽可能多地发现程序中的错误，尤其是发现至今尚未发现的错误。5.下列关于多重窗体程序的叙述中，错误的是( )。（分数：2.00）A.用 Hide 方法不但可以隐藏窗体，而且能清除内存中的窗体 B.在多重窗体程序中，各窗体的菜单是彼此独立的C.在多重窗体程序中，可以根据需要指定启动窗体D.对于多重窗体程序，需要单独保存每个窗体解析：解析 Hide 方法只是使窗体隐藏，但仍在内存中，因此选项 A 错误。6.下列叙述中不正确的是( )。（分数：2.00）A.若使用 Write#语句将数据输出到文件，则各数据项之间自动插入逗号，并且将字
19、符串加上双引号B.若使用 Print#语句将数据输出到文件，则各数据项之间没有逗号分隔，且字符串不加双引号C.Write#语句和 Print#语句建立的顺序文件格式完全一样 D.Write#语句和 Print#语句均实现向文件写入数据解析：解析 Write#语句和 Print#语句都可以把数据写入顺序文件中，两者的不同主要有两点：当用Write#语句向文件写入数据时，数据在磁盘上以紧凑格式存放，能自动在数据项之间插入逗号，并给字符串加上双引号，使用 Print#语句则没有这些功能；用 Write#语句写入的数据前面没有空格。7.假定有以下两个过程：Private Sub PPP(a As Si
20、ngle, b As Single)a=a+bPrint a, bb=a+bPrint a, bEnd SubPrivate Sub Form_Activate0x=18Call PPP(x), (x)Print xEnd Sub则下列说法中不正确的是( )。（分数：2.00）A.形参是 a 和 b，两个实参(x)和(x)允许重名B.形参是 a 和 b，实参(x)表示传值调用C.形参是 a 和 b，实参(x)表示是非传址调用D.形参是 a 和 b，两个实参(x)和(x)不允许重名 解析：解析 过程调用时，实参的变量名用括号括起来，表示传值调用。实参传递时，参数允许重名，只要与形参在类型和个数上
21、一一对应就可以了，因此 D)选项错误。8.在 C 盘当前文件夹下有一个已建立好的顺序文件 Alph.txt，文件内容为只含有字母的一个字符串(有双引号界定符)。单击窗体，打开 Alph.txt 文件，读取字符串并显示在文本框 Text1 中，然后调用 StrSort过程将此字符串按 ASCII 码的顺序重新排列并显示在文本框 Text2，最后将重新排列的字符串存入AlpO.txt 文件中(无双引号界定符)。请选择横线处合适的语句( )。Private Sub Form_Load()Dim StrIn As String, StrOut As StringOpen “C:/Alph.txt“ F
22、or Input As #1_CloseText1.Text = StrIn_Text2.Text = StrOutOpen “C:/AlpO.txt“ For Output As #2_CloseEnd SubPrivate Function StrSort(s As String) As StringDim sArr() As String * 1, i As Integer, j As Integer, n As IntegerDim t As String * 1n = Len(s)ReDim sArr(n)For i= 1 To nsArr(i) = Mid(s, i, 1)Next
23、 iFor i= 1 To n-1For j =i+1 To nIf sArr(i)sArr(j) Thent = sArr(i): sArr(i) = sArr(j): sArr(j) = tEnd IfNext j, iFor i= 1 To nStrSort = StrSort CurrentX, CurrentYD.Picture1.Stretch=True 解析：解析 A)选项中的语句是将图片框 2 的图片显示在图片 1 中；B)选项中的语句是在运行时载入图片；C)选项是使用图片框的 Print 方法在图片框中输出文本；图片框没有 Stretch 属性。26.对话框在关闭之前，不能继
24、续执行应用程序的其他部分，这种对话框属于( )。（分数：2.00）A.输入对话框B.输出对话框C.模式(模态)对话框 D.无模式对话框解析：解析 无模式窗体显示时，随后遇到的代码都要执行；模式窗体(modal form)显示时，则随后的代码直到该窗体被隐藏或卸载时才能执行。窗体的模式通过设置 show 方法的参数实现。27.过程语句中，使用的参数表可以是下列哪种( )。（分数：2.00）A.常量或变量名B.表达式或变量名C.数组元素或变量名D.变量名或数组名 解析：解析 参数表含有在调用时传送给过程的简单变量或数组名，如果是数组，则要在数组名后加上一对括号。参数过程中不允许有常量、表达式和数组
25、元素出现。28.在窗体上有一个命令按钮 Command1，编写如下程序：Private Sub Command1_Click()Print pp1(3, 7)End SubPublic Function pp1(x As Single, n As Integer) As SingleIf n = 0 Thenpp1= 1ElseIf n Mod 2 = 1 Thenpp1 =x*x+nElsepp1 =x*x-nEnd IfEnd IfEnd Function程序运行后，单击该命令按钮，屏幕上显示的是( )。（分数：2.00）A.2B.1C.0D.16 解析：解析 本题比较简单，只要根据程序的
26、执行条件和顺序就可以运算出该程序的最后输出结果。程序运算过程如下；If n=0 Thenelse if n Mod 2=1 Then pp1=x*x+n=16。29.设 x=4，y=8，z=7，表达式 xz Or zX 的值是( )。（分数：2.00）A.1B.-1C.TreeD.False 解析：解析 关系和逻辑混合运算时，先进行关系运算然后进行逻辑运算。表达式 Xz Or zX 的运算过程为：xz Or zXFalse or FalseFalse。30.如果在 C 盘当前文件夹下已经存在名称为 Sdat.dat 的顺序文件，那么执行语句 Open “c:/Sdat.dat“For Appe
27、nd As #1 之后，将( )。（分数：2.00）A.删除文件中的原有内容B.保留文件中原有内容，并在文件尾添加新内容 C.保留文件中原有内容，并在文件头添加新内容D.以上均不对解析：解析 本题考查考生对读取顺序文件的掌握情况。Append 语句能向文件中继续追加新的内容。31.Function 过程与 Sub 过程的最主要区别是( )。（分数：2.00）A.Function 过程一定要有形参，而 Sub 过程可以没有形参B.Function 过程的终端语句是 End Function，而 Sub 过程的终端语句是 End SubC.Function 过程是用于计算函数值的。而 Sub 过程
28、是用于改变属性值的D.Function 过程要返回函数值，而 Sub 过程没有返回值 解析：解析 无论是 Sub 过程还是 Function 过程的形式参数可以有或无，可以是一个或多个，所以 A)选项是错误的；而且两者都可以通过传址参数来改变实参的值，所以 C)选项也是错误的；两者最本质的区别是，Function 过程有返回值，而 Sub 过程没有返回值。32.下列选项中不属于结构化程序设计方法的是( )。（分数：2.00）A.自顶向下B.逐步求精C.模块化D.可复用 解析：解析 结构化程序设计的原则概括为自顶向下，逐步求精，限制使用 GOTO 语句。33.设已打开 5 个文件，文件号为 1、
29、2、3、4、5。要关闭所有文件，则下列语句中正确的是( )。（分数：2.00）A.Close #1,2,3,4,5B.Close #1,#2,#3,04,#5 C.Close #1-#5D.Close #1,#2,#3,#4,#5解析：解析 文件的读写操作结束后，应将文件关闭，可以使用 Close 语句来实现。其格式为：Close #文件号,#文件号其中，“文件号”是可选的，如果指定了文件号，则关闭指定的文件：若省略文件号，则将关闭 Open 语句打开的所有活动文件。34.在文本框中输入密码时，要求在文本框中只显示(*)号，则应当设置此文本框的 ( )属性。（分数：2.00）A.TextB.C
30、aptionC.passwordD.PasswordChar 解析：解析 Text 属性用来显示文本框中输入的文本；文本框没有 Caption 属性和 password 属性；PasswordChar 属性中键入的字符或占位符可以替代在文本框中输入的字符显示出来，从而达到隐藏实际输入字符的功能，该属性一般用于密码设置。35.设置复选框或单选钮的标题对齐方式的属性是( )。（分数：2.00）A.AlighB.StyleC.Alignment D.Sorted解析：解析 Alignment 属性用于设置控件中文本的对齐方式，文本左对齐，控件右对齐。缺省值为0(vbLeftJustify)，单选钮或
31、复选框在左边；值为 1(vbRightJustify)时，单选钮或复选框在右边。二、填空题(总题数：13，分数：30.00)36.数据库系统的主要特点为数据集成性、数据的高 1 和低冗余性、数据独立性和数据统一管理和控制。（分数：2.00）填空项 1:_ （正确答案：共享性）解析：解析 数据库系统中的数据能被不同的应用程序使用，实现了数据的高度共享，从而降低了数据的冗余，这也是数据库的主要目的。37.数据库的逻辑模型设计阶段的任务是将 1 转换成关系模式。（分数：2.00）填空项 1:_ （正确答案：E-R 图）解析：解析 数据库逻辑设计的任务是将概念模型进一步转化成相应的数据模型。而 E-R
32、 图是主要的概念模型，因此数据库的逻辑设计的主要工作是将 E-R 图转换成关系模式。38.在面向对象方法中， 1 描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_ （正确答案：类）解析：解析 在面向对象方法中，把具有相同属性和方法的对象称为类，类是对象的抽象，对象是类的实例。39.最简单的交换排序方法是 1。（分数：2.00）填空项 1:_ （正确答案：冒泡排序）解析：解析 交换排序是指借助数据元素之间的互相交换进行排序的一种方法，冒泡排序是一种最简单的交换排序方法，它是通过相邻元素之间的相互交换逐步将线性表变得有序。40.在链表的运算过程中，能够使空表与非空表的运算统一
33、的结构是 1。（分数：2.00）填空项 1:_ （正确答案：循环链表）解析：解析 在循环链表中，由于设置了一个头结点，因此在任何情况下，循环链表中至少有一个结点存在，从而使空表与非空表的运算统一。41.鼠标移动经过控件时，将触发控件的 1 事件。（分数：2.00）填空项 1:_ （正确答案：MouseMove）解析：解析 MouseDown 事件是在控件上按下任意鼠标按钮时发生的事件是：MouseUp 事件是释放任意鼠标按钮时发生的事件；MouseMove 事件是当鼠标指针在控件上移动时发生的事件。42.已知变量 boo1 Var 是一个布尔型的变量，如果要给其赋值为 True，则正确的赋值语
34、句就是 1。（分数：2.00）填空项 1:_ （正确答案：boo1 Var=Ture）解析：解析 赋值运算符号为“=”，功能是将右侧的值赋值给左侧的变量，并要求两侧的数据类型匹配，布尔类型的值有两个 True 或 False，所以正确的赋值形式为：布尔型变量名=True (或 False)。43.下面这个 Sub 过程的功能是统计字符串中“a”的个数，请在空白处填上合适的代码完成程序。Private Sub numCount()Dim hum As Integers = “software And hardware“num = Len(s$)For i = 1 To humb$=_If b$
35、= “a“ Then x = x+1Next iPrint “x=“; xEnd Sub（分数：2.00）填空项 1:_ （正确答案：Mid(s$,i,1)）解析：解析 分析题目和程序段可知，空白处的作用是取出字符串 s 中的第 i 个字符。这里可以使用Mid 函数来取出第 i 个字符，然后对比该字符是否是字符 a。如果是，则变量 x 加 1；如果不是，则跳过if 后面的语句继续循环，最后输出 x。44.下列程序的输出结果为_。Sub Prin()Dim B As StringA=1B=A MinEnd Sub（分数：2.00）填空项 1:_ （正确答案：Min=arr1(i)）解析：解析 题
36、目要求输出数组中的最小值，分析程序可知，本程序求数组最小值的算法是：假设最小值是第一个数组元素，并把它存在 Min 变量中，然后从数组的第二个元素开始逐个与 Min 变量对比，如果有比 Min 更小的数，则赋值给 Min，这样对比到数组最后一个元素时，就能找到最小的元素；且它存储在Min 变量中，因此最后只要输出 Min 变量值即可。47.下列事件过程的功能是：建立一个名为 Data1 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 1，2，3，90。请在空白处填入适当的内容，将程序补充完整。Private Type AngK As IntegerSinx As Single
37、Cosx As SingleEnd Type_定义 Ang 类型的变量 KscPrivate Sub Form_Click()Dim Y As SingleOpen “C:/Datal.txt“ For Random As #1 Len = 10Put #1, 1, KscY = 3.14159 / 180For i = 1 To 90Ksc. K=i_= Sin(i*Y)给变量 Ksc 的正弦函数值赋值Ksc.Cosx = Cos(i*Y)Next iClose #1End Sub（分数：4.00）填空项 1:_ （正确答案：Dim Ksc As Ang Ksc.Sinx）解析：解析 声明用
38、户定义类型的变量格式为：Dim 变量名 as 用户定义类型名定义了记录类型后，给该类型变量赋值时用“变量名.元素=要赋的值”的格式进行赋值。48.在窗体上建立一个单选钮组 Option1 和一个图片框 Picture1，如下图所示。当选择不同的单选钮时，图片框中填充不同的图案，请填写程序的空白处，使程序完整。（分数：4.00）填空项 1:_ （正确答案：Index As Integer Index）解析：解析 控件数组中的元素同享一个事件过程，过程有一个下标参数 Index，用来区别数组中的不同控件，题目中单选钮是控件数组。因此，它的 Click 事件过程带有参数 Index 的定义(Index As Integer)。题目中要求根据选择不同的单选钮，来设置图片框的填充图案，图片框中的图案样式可以修改FillStyle 属性值来实现，FillStyle 的取值范围为 07，题目中用了 7 个单选钮来表示每种图片框绘图的样式，因此第 2 个空应填写 Index 参数。
