1、全国计算机等级考试二级Visual Basic笔试2005年4月全国计算机等级考试二级Visual Basic笔试(含参考答案) 一、选择题(1)(35)每小题2分,共70分) 下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。 (1)数据的存储结构是指_。 A)存储在外存中的数据 B)数据所占的存储空间量 C)数据在计算机中的顺序存储方式 D)数据的逻辑结构在计算机中的表示 (2)下列关于栈的描述中错误的是_。 A) 栈是先进后出的线性表 B) 栈只能顺序存储 C) 栈具有记忆作用 D)对栈的插入与删除操作中,不需要改变栈底
2、指针 (3)对于长度为n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是_。 A)冒泡排序为n/2 B)冒泡排序为n C)快速排序为n D)快速排序为n(n-1)/2 (4)对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为_。 A)log2n B)n/2 C)n D)n+1 (5)下列对于线性链表的描述中正确的是_。 A) 存储空间不一定是连续,且各元素的存储顺序是任意的 B) 存储空间不一定是连续,且前件元素一定存储在后件元素的前面 C) 存储空间必须连续,且前件元素一定存储在后件元素的前面 D) 存储空间必须连续,且各元素的存储顺序是任意的 (6)下列对于软件测
3、试的描述中正确的是_。 A) 软件测试的目的是证明程序是否正确 B) 软件测试的目的是使程序运行结果正确 C) 软件测试的目的是尽可能多地发现程序中的错误 D) 软件测试的目的是使程序符合结构化原则 (7)为了使模块尽可能独立,要求_。 A) 模块的内聚程度要尽量高,且各模块间的耦合程度要尽量强 B) 模块的内聚程度要尽量高,且各模块间的耦合程度要尽量弱 C) 模块的内聚程度要尽量低,且各模块间的耦合程度要尽量弱 D) 模块的内聚程度要尽量低,且各模块间的耦合程度要尽量强 (8)下列描述中正确的是_。 A)程序就是软件 B)软件开发不受计算机系统的限制 C)软件既是逻辑实体,又是物理实体 D)
4、软件是程序、数据与相关文档的集合 (9)数据独立性是数据库技术的重要特点之一。所谓数据独立性是指_。 A) 数据与程序独立存放 B)不同的数据被存放在不同的文件中 C)不同的数据只能被对应的应用程序所使用 D)以上三种说法都不对 (10)用树形结构表示实体之间联系的模型是_。 A)关系模型 B)网状模型 C)层次模型 D)以上三个都是 (11)在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是_。 A) Priv
5、ate Sub Text1_Change() Command1.Caption = 计算机等级考试 End Sub B) Private Sub Command1_ Click () Caption = 计算机等级考试 End Sub C) Private Sub Form1_ Click () Text1.Caption = 计算机等级考试 End Sub D) Private Sub Command1_ Click () Text1.Text = 计算机等级考试 End Sub (12)设a=5,b=4,c=3,d=2下列表达式的值是_。 3 2 * b Or a = c And b c
6、Or c d A)1 B)True C) False D)2 (13)设a = MicrosoftVisualBasic ,则以下使变量b的值为“VisualBasic”的语句是_。 A) b = Left(a, 10) B) b = Mid(a, 10) C) b = Right(a, 10) D) b = Mid(a, 11, 10) (14)假定有如下的窗体事件过程: PrivateSubForm_Click() a$=MicrosoftVisualBasic b$=Right(a$,5) c$=Mid(a$,1,9) MsgBoxa$,34,b$,c$,5 EndSub 程序运行后,单
7、击窗体,则在弹出的信息框的标题栏中显示的信息是_。 A) Microsoft Visual B) Microsoft C) Basic D)5 (15)设a = a,b = b,c = c,d = d,执行语句x=IIf(ad), A,B)后,x的值为 _。 A) a B) b C) B D) A (16)为了使命令按钮(名称为Command1)右移200,应使用的语句是_。 A) Command1.Move -200 B) Command1.Move 200 C) Command1.Left = Command1.Left + 200 D) Command1.Left = Command1.
8、Left - 200 (17)在窗体上画一个文本框,然后编写如下事件过程: Private Sub Form_Click() x = InputBox(请输入一个整数) Print x + Text1.Text End Sub 程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为_。 A) 123 B)456 C) 479 D) 123456 (18)在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False。程序运行后,如果
9、单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序: Private Sub Command1_Click() Timer1._ End Sub Private Sub Timer1_Timer() Text1.Text = Time End Sub 在下划线处应填入的内容是_。 A) Enabled = True B) Enabled = False C) Visible = True D) Visible = False (19)假定在图片框Picture1中装入了一个图形,为了清除该图形(不删除图片框),应采用的正确方法是_。 A)选择图片框,然后按Del键
10、 B)执行语句Picture1.Picture = LoadPicture () C)执行语句Picture1.Picture = D)选择图片框,在属性窗口中选择Picture属性条,然后按回车键 (20)在窗体上画一个名称为List1的列表框,一个名称为Label1的标签,列表框中显示若干个项目。当单击列表框中的某个项目时,在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是:_。 A)Private Sub List1_Click() Label1.Caption = List1.ListIndex End Sub B)Private Sub List1_Click() Labe
11、l1.Name=List1.ListIndex End Sub C) Private Sub List1_Click() Label1.Name=List1.Text End Sub D) Private Sub List1_Click() Label1.Caption =List1.Text End Sub (21)在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer, x As Integer For i = 1 To 6 If i = 1 Then x = i If i 0 A
12、nd a 10 And a 20 And a c Then d = d + x(i) c = x(i) Else d = d - c End If Next Print dEnd Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为_。 A) 10 B) 16 C) 12 D) 20 (32)设有如下程序: Private Sub Command1_Click() Dim c As Integer, d As Integer c = 4 d = InputBox(请输入一个整数) Do While d 0 If d c Then c = c + 1 End If d = InputBo
13、x(请输入一个整数) Loop Print c + dEnd Sub 程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0,则输出结果是_。 A)12 B)11 C)10 D)9 (33)在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:Microsoft Visual Basic Programming 然后编写如下事件过程: Private Sub Command1_Click()Open d:tempoutf.txt For Output As #1 For i = 1 To Len(Text1.
14、Text) c = Mid(Text1.Text, i, 1) If c = A And c = Z Then Print #1, LCase(c) End If Next i CloseEnd Sub 程序运行后,单击命令按钮,文件outf.txt中的内容是_。 A)MVBP B)mvbp C)M D)m V v B b P p (34)在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Dim SW As BooleanFunction func(X As Integer) As Integer If X 20 Then Y = X Else Y = 20 + X End
15、If func = YEnd FunctionPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) SW = FalseEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SW = TrueEnd SubPrivate Sub Command1_Click() Dim intNum As Integer intNum = InputB
16、ox() If SW Then Print func(intNum) End IfEnd Sub 程序运行后,单击命令按钮,将显示一个输入对话框,如果在输入对话框中输入25,则程序的执行结果为_。 A)输出0 B)输出25 C)输出45 D)无任何输出 (35)设有如下通用过程: Public Sub Fun(a() As Integer, x As Integer) For i = 1 To 5 x = x + a(i) NextEnd Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_C
17、lick() Dim arr(5) As Integer, n As Integer For i = 1 To 5 arr(i) = i + i Next Fun arr, n Text1.Text = Str(n)End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是_。 A)30 B)25 C)20 D)15 二、填空题(每空2分,共30分) 请将每空的正确答案写在答题卡【1】【15】序号的横线上,答在试卷上不得分。 (1)某二叉树中度为2的结点有18个,则该二叉树中有 【1】 个叶子结点。 (2)在面向对象方法中,类的实例称为 【2】 。 (3)诊断和改正程序中错误的工作通常
18、称为 【3】 。 (4)在关系数据库中,把数据表示成二维表,每一个二维表称为 【4】 。 (5)问题处理方案的正确而完整的描述称为 【5】 。 (6)以下语句输出结果是 【6】 。 Print Int(12345.6789 * 100 + 0.5) / 100 (7)在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程: Private Sub Form_Click() Text1.Text = VB程序设计 End Sub Private Sub Text1_Change() Picture1.Print VB Programming End Sub 程序运行后,单击窗体,则在文本框中
19、显示的内容是 【7】 ,而在图片框中显示的内容是 【8】 。 (8)阅读下面的程序: Private Sub Form_Click() Dim Check As Boolean, Counter As Integer Check = True Counter = 5 Do Do While Counter 0 Print sEnd Sub 以上程序的功能是 【10】 。程序运行后,单击窗体,输出结果为 【11】 。 (10)设有如下程序: Option Base 1Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As In
20、teger arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43) Min = 【12】 For i = 2 To 8 If arr1(i) Min Then 【13】 Next Print 最小值是:; MinEnd Sub 以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的最小值。请填空。 (11)在名称为Form1的窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: PrivateSubForm_Click()Opend:testsmtext1.txtForInputAs#1 DoWhileNot【14】 LineInput#1,as
copyright@ 2008-2023 冰点文库 网站版权所有
经营许可证编号:鄂ICP备19020893号-2