2013年3月全国计算机二级VB考试真题及答案.doc

发布时间：2022-09-27 发布人：admin 分类：说明书资料大小：0.05M 资料格式：doc 举报版权申诉

第1页 / 共11页

第2页 / 共11页

第3页 / 共11页

第4页 / 共11页

第5页 / 共11页

第6页 / 共11页

第7页 / 共11页

第8页 / 共11页

文本预览

2013 年 3 月全国计算机二级 VB 考试真题及答案一、单选题。 (1)下列数据结构中，属于非线性结构的是 (2)在下列链表中，能够从任意一个结点出发直接访问到所有结点的是 (3)下列与栈结构有关联的是 (4)下面对软件特点描述不正确的是 (5)下面属于黑盒测试方法的是 (6)下面不属于软件设计阶段任务的是 (7)数据库管理系统是 (8)在 E-R 图中，表示实体的图元是 (9)有两个关系 R 和 T 如下 R T A B C A C a 1 2 a 2 b 4 4 b 4 c 2 3 c 3 d 3 2 d 2 则由关系 R 得到关系 T 的操作是 (10)对图书进行编目时，图书有如下属性：ISBN 书号，书名，作者，出版社，出版日期。能作为关键字的是 (11)下列关于 Visual Basic 标准模块的描述中，错误的是 (12)下列变量名中合法的是 (13)表达式 66 \ 8 mod 5 & "avg" 的值是 (14)下列能正确计算 s=1+2+…… +100 的程序段是

(15)设有如下程序： Private Sub Form_Click() a = 10: b = 20 x = a = b Print x End Sub 程序运行后，单击窗体，输出结果为 (16)在面向对象的程序设计中，对象可以执行的操作和可被对象识别的动作分别被称为 (17)下列说法中，错误的是 (18)设有如下程序： Private Sub Command1_Click() Dim i As Integer, j As Integer For i = 1 To 10 i = i + j j = j + 1 Next i End Sub 程序运行后，单击命令按钮 Command1，循环执行的次数为 (19)设有如下程序： Private Sub Command1_Click() Dim m As Integer, n As Integer m = 1 For n = 1 To 5 m = m * n

If m > 15 Then Exit For Else n = n + 1 End If Next n Print m; n End Sub 程序运行后，单击命令按钮 Command1，输出结果为 (20)设有如下程序： Private Sub Form_Click() Dim a, k As Integer Dim n As Integer, s As Integer a = Array(1, 1, 1, 2, 2, 2) For k = LBound(a) To UBound(a) n = n + k s = s + a(k) Next Print n; s End Sub 程序运行后，如果单击窗体，则在窗体上输出的内容为： (21)窗体上有一个文本框，用于接收正整数。为保证输入数据的合法性 (即正整数)，可以在该数据输入结束后准备继续其他操作时进行数据的合法性检查。为实现上述目的，应选用的事件是 (22)设有如下程序：

Private Sub Command1_Click() Dim a(10) As Integer Dim i As Integer, n As Integer n = 6 For i = 1 To n a(i) = i * i Next i For i = 1 To n / 2 temp = a(i) a(i) = a(n - i) a(n - i) = temp Next i For i = 1 To n Print a(i); Next End Sub 程序运行后，单击命令按钮 Command1，输出结果为 (23)工程中包含 Form1、Form2 两个窗体，Form1 是启动窗体，两个窗体上都有名称为 Label1 的标签和名称为 Command1 的命令按钮，窗体外观分别如图 1、图 2 所示： Form1 的事件过程如下： Private Sub Command1_Click() Form2.Show End Sub Form2 中的事件过程如下：

Private Sub Command1_Click() Label1.Caption = Form1.Label1.Caption End Sub 关于以下程序，下面叙述中错误的是 (24)窗体上有一个名称为 Dir1 的目录列表框，一个名称为 File1 的文件列表框。当改变目录列表框的内容时，文件列表框的内容应该与之同步改变。为实现两控件同步操作，应该使用的事件过程是 (25)列表框 List1 中没有数据项，现编制如下程序： Private Sub Command1_Click() For i = 1 To 6 List1.AddItem i Next i For i = 5 To 3 Step -1 List1.RemoveItem i Next i End Sub 程序运行后，单击命令按钮 Command1，则列表框 List1 中的数据项为 (26)一个工程文件中含有窗体 Form1、Form2 和标准模块 Model1。如果 Form1 的声明部分有语句 Private x As Integer，且 Model1 中有语句 Public y As Integer，则下列说法中，正确的是 (27)下列关于文件及其操作的描述中，正确的是 (28)下列操作说明中，错误的是 (29)在窗体上画一个名称为 CD1 的通用对话框，并编写如下程序： Private Sub Command1_Click() CD1.Filter = "所有文件(*.*)|*.*|文本文件(*.txt)|*.txt|Word 文档 (*.doc)|*.doc"

CD1.FilterIndex = 2 CD1.Action = 2 End Sub 运行程序，并单击命令按钮 Command1，下面描述中正确的是 (30)下列关于 Visual Basic 菜单的叙述中，错误的是 (31)下列关于 Sub Main 过程的描述中，错误的是 (32)设有如下程序： Private Sub Command1_Click() Dim i As Integer str1 = InputBox("输入一个字符串") str2 = "" i = 0 Do While i < Len(str1) / 2 str2 = str2 + Mid(str1, i + 1, 1) str2 = str2 + Mid(str1, Len(str1) - i, 1) i = i + 1 Loop Print str2 End Sub 程序运行后，单击命令按钮 Command1，在弹出的输入对话框中输入“abcdef”，则输出结果为 (33)命令按钮 Command1 的单击事件过程如下： Private Sub Command1_Click() Dim x As String

Dim y As String x = InputBox("输入字母", "输入") y = IIf((ucase9x) <> "A", "表达式 1", "表达式 2") Print y End Sub 运行程序，单击命令按钮，在弹出的输入对话框中输入“ a”，则以下描述中正确的是 (34)设有如下程序： Sub proc(x() As Integer) Static i As Integer Do x(i) = x(i) + x(i + 1) i = i + 1 Loop While i < 2 End Sub Private Sub Command1_Click() Dim a(5) As Integer, i As Integer For i = 0 To 4 a(i) = i + 1 Next i Call proc(a) Call proc(a) For i = 0 To 4 Print a(i); Next i

End Sub 程序运行后，单击命令按钮 Command1，输出结果为 (35)以下程序将随机产生 n 个两位整数，并使用冒泡法将它们按递增顺序排序后输出。 Option Base 1 Private Sub Command1_Click() Dim a() As Integer Dim i As Integer, j As Integer Randomize n = InputBox("输入数据个数") ReDim a(n) For i = 1 To n a(i) = Int(Rnd * 90) + 10 Next i For i = 1 To n - 1 For j = 1 To n - i If a(j) < a(j - 1) Then temp = a(j): a(j) = a(j - 1): a(j - 1) = temp End If Next j Next i For i = 1 To n Print a(i); Next i End Sub

分享到：

赞收藏

资料库

2013年3月全国计算机二级VB考试真题及答案.doc

相关推荐

计算机等级考试

热门标签

最新资料