[计算机类试卷]2009年3月国家二级(VisualBasic)笔试真题试卷及答案与解析.doc
《[计算机类试卷]2009年3月国家二级(VisualBasic)笔试真题试卷及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]2009年3月国家二级(VisualBasic)笔试真题试卷及答案与解析.doc(29页珍藏版)》请在麦多课文档分享上搜索。
1、2009年 3月国家二级( VisualBasic)笔试真题试卷及答案与解析 1 下列叙述中正确的是 _。 ( A)栈是 “先进先出 ”的线性表 ( B)队列是 “先进后出 ”的线性表 ( C)循环队列不是非线性结构 ( D)有序线性表既可以采用顺序存储结构,也可以采用链式存储结构 2 支持子程序调用的数据结构是 _。 ( A)栈 ( B)树 ( C)队列 ( D)二叉树 3 某二叉树有 5个度为 2的结点,则该二叉树中的叶子结点数是 _。 ( A) 10 ( B) 8 ( C) 6 ( D) 4 4 下列排序方法中,最坏情况下比较次数最少的是 _。 ( A)冒泡排序 ( B)简单选择排序 (
2、 C)直接插入排序 ( D)堆排序 5 软件按功能可以分为:应用软件、系统软件和支撑软件 (或工具软件 )。下面属于应用软件的是 _。 ( A)编译程序 ( B)操作系统 ( C)教务管理系统 ( D)汇编程序 6 下面叙述中错误的是 _。 ( A)软件测试的目的是发现错误并改正错误 ( B)对被调试的程序进行 “错误定位 ”是程序调试的必要步骤 ( C)程序调试通常也称为 Debug ( D)软件测试应严格执行测试计划,排除测试的随意性 7 耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是 _。 ( A)提高耦合性降低内聚性有利于提高模块的独立性 ( B)降低耦合性提高内聚性有
3、利于提高模块的独立性 ( C)耦合性是指一个模块内部各个元素间彼此结合的紧密程度 ( D)内聚性是指模块间互相连接的紧密程度 8 数据库应用系统中的核心问题是 _。 ( A)数据库设计 ( B)数据库系统设计 ( C)数据库维护 ( D)数据库管理员培训 9 有两个关 系 R, S如下: 由关系 R通过运算得到关系 S,则所使用的运算为 _。 ( A)选择 ( B)投影 ( C)插入 ( D)连接 10 将 E-R图转换为关系模式时,实体和联系都可以表示为 _。 ( A)属性 ( B)键 ( C)关系 ( D)域 11 执行语句 Dim X, Y As Integer后, _。 ( A) X和
4、 Y均被定义为整型变量 ( B) X和 Y均被定义为变体类型变量 ( C) X被定义为整型变量, Y被定义为变体类型变量 ( D) X被定义为变体类型变量, Y被定义为整型变量 12 以下关系表达式中,其值为 True的是 _。 ( A) XYZ “XYz“ ( B) VisualBasic “visualbasic“ ( C) the=“there“ ( D) Integer “Int“ 13 执行以下程序段 a =“Visual Basic Programming“ b =“C+“ c =UCase(Left (a, 7)& b & Right (a, 12) 后,变量 c的值为_。 (
5、A) Visual BASIC Proramming ( B) VISUAL C+ Programming ( C) Visual C+ Programming ( D) VISUAL BASIC Progrmming 14 下列叙述中正确的是 _。 ( A) MsgBox语句的返回值是 个整数 ( B)执行 MsgBox语句并出现信息框后,不用关闭信息框即可执行其他操作 ( C) MsgBox语句的第 个参数不能省略 ( D)如果省略 MsgBox语句的第三个参数 (Title),则信息框的标题为空 15 在窗体上画 个文本框 (名称为 Text1)和 个标签 (名称为 Label1),程序
6、运行后,在文本框中每输入 个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是 _。 ( A) Private Sub Text1_ Change() Label1.Caption =Str (Len(Text1.Text)End Sub ( B) Private Sub Text1_ Click() Label1.Caption=Str(Len(Text1.Text)End Sub ( C) Private Sub Text1_ Change() Labell.Caption =Text1.TextEnd Sub ( D) Private Sub Label1_
7、Change() Labell.Caption=Str(Len(Text 1. Text)End Sub 16 在窗体上画两个单选按钮 (名称分别为 Option1、 Option2,标题分别为 “宋体 ”和“黑体 ”)、 1个复选框 (名称为 Check1,标题为 “粗体 ”)和 1个文本框 (名称为 Text1,Text属性为 “改变文字字体 ”),窗体外观如图所示。程序运 行后,要求 “宋体 ”单选按钮和 “粗体 ”复选框被选中,则以下能够实现上述操作的语句序列是 _。( A) Option1. Value=Flase Check1.Value=True ( B) Option1.Val
8、ue=True Check1.Value=0 ( C) Option2.Value=Flase Check1.Value=2 ( D) Option1.Value=True Check1.Value=1 17 在窗体上画 个名称为 Command1的命令按钮,然后编写如下 事件过程:Private Sub Command1_ Click() c=1234 c1=Trim(str(c) For i=1 To 4 Print _ NextEnd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容: 1 12 123 1234则在横线外应填入的内容为 _。 ( A) Right (c1, i)
9、 ( B) Left(c1, i) ( C) Mid(c1, i, 1) ( D) Mid(c1, i, i) 18 假定有以下程序段 For i=1 To 3 For j=5 To 1 Srep-1 Print i*j Next jNext i则语句 Print i*j 的执行次数是 _。 ( A) 15 ( B) 16 ( C) 17 ( D) 18 19 在窗体上画两个文本框 (名称分别为 Text1和 Text2)和 个命令按钮 (名称为Cotranand1),然后编写如下事件过程: Private Sub Command1_Click() x=0 Do While x 50 x=(x
10、+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x)End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为 _。 ( A) 1和 0 ( B) 2和 72 ( C) 3和 50 ( D) 4和 168 20 阅读程序: Private Sub Form_ Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print aEnd Sub 程序运行后,单击窗体,输出结果是 _。 ( A) 105 ( B) 1 ( C) 120 ( D) 15 21 以下说法中正确的是 _。 ( A)当
11、焦点在某个控件上时,按下 个字母键,就会执行该控件的 KeyPress事件过程 ( B)因为窗体不接受焦点,所以窗体不存在自己的 KeyPress事件过程 ( C)若按下的键相同, KeyPress事件过程中的 KeyAscii参数与 KeyDown事件过程中的 KeyCode参数的值也相同 ( D)在 KeyPress事件过程中, KeyAscii参数可以省略 22 语句 Dim a(-3 To 4, 3 To 6)As Integer定义的数组的元素个数是 _。 ( A) 18 ( B) 28 ( C) 21 ( D) 32 23 在窗体上画 个命令按钮,其名称为 Command1,然后编
12、写如下代码: Option Base 1Private Sub Command1_ Click() Dim a a=Array(1,2,3,4) j=1 For i=,4 To 1 Step-1 s=s+ a(i)*j j=j*10 Next i Print sEnd Sub程序运行后,单击命令按钮,其输出结果是 _。 ( A) 4321 ( B) 1234 ( C) 34 ( D) 12 24 假定通过复制、粘贴操作建立了一个命令按钮数组 Command1,以下说法中错误的是 _。 ( A)数组中每个命令按钮的名称 (Name属性 )均为 Command1 ( B)若未作修改,数组中每个命令
13、按钮的大小都一样 ( C)数组中各个命令按钮使用一个 Click事件过程 ( D)数组中每 个命令的按钮的 Index属性值都相同 25 在窗体上画一个命令按钮,名称为 Command1,然后编写如下代码: Option Base()Private Sub Command1_ Click() Dim A1(4) As Integer, A2(4)As Integer For k= 0 To 2 A1(k+1)=InputBox(“请输入 个整数 ”) A2(3-k)=A1(k+1) Next k Print A2 (k)End Sub程序运行后,单击 命令按钮,在输入对话框中依次输入 2、 4
14、、6,则输出结果为 _。 ( A) 0 ( B) 1 ( C) 2 ( D) 3 26 以下关于函数过程的叙述中,正确的是 _。 ( A)函数过程形参的类型与函数返回值的类型没有关系 ( B)在函数过程中,过程的返回值可以有多个 ( C)当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递 ( D)如果不能指明函数过程参数的类型,则该参数没有数据类型 27 在窗体上画两个标签和 个命令按钮,其名称分别为 Label1、 Labd2和Command1,然后编写如下程序: Private Sub func (L As Label) L.Caption=“1234“End SubPri
15、vate Sub Form_ Load() Label1. Caption=“ABCDE“ Label2 Caplion=10End SubPrivate Sub Command1_ Click() a=Val(Label2. Caption) call func(Label1) Label2.Caption=aEnd Sub 程 序运行后,单击命令按钮,则在两个标签中显示的内容分别为 _。 ( A) ABCD和 10 ( B) 1234和 100 ( C) ABCD和 100 ( D) 1234和 10 28 在窗体上画 个命令按钮 (名称为 Command1),并编写如下代码: Funct
16、ion Fun1 (ByVala As Integer, b As Integer)As Integer Dim t As Integer t=a-b b=t+ a Fun 1=t+ bEnd FunctionPrivate Sub Command1_ Click() Dim x As Integer x=10 Print Fun1(Fun1 (x,(Fun1(x, x-1),x-1)End Sub程序运行后,单击命令按钮,输出结果是 _。 ( A) 10 ( B) 0 ( C) 11 ( D) 21 29 以下关于过程及过程参数的描述中,错误的是 _。 ( A)过程的参数可以是控件名称 (
17、B)调用过程时使用的实参的个数应与过程形参的个数相同 ( C)只有函数过程能够将过程中处理的信息返回到调用 程序中 ( D)窗体可以作为过程的参数 30 设有如下通用过程: Public Function Fun (xStr As String) As String Dim tStr As String, strL As Integer tStr=-“ “ strL=Len(xStr) i=strL/2 Do Whilei =strL tStr=tStr &id(xStr,i+1, 1) i=i+1 Loop Fun=tStr & tStrEnd Function 在窗体上画 个名称为 Tex
18、t1的文本框和 个名称为 Command1的命令按钮,然后编写如下的事件过程: Private Sub Command1_ Click() Dim S1 String S1=“ABCDEF“ Text1.Text=LCase(Fun(S1)End Sub 程序运行后,单击命令按钮,文本框中显示的是 _。 ( A) ABCDEF ( B) abcdef ( C) defdef ( D) defabc 31 在窗体上画一个命令按钮和 一个文本框 (名称分别为 Command1和 Text1),并把窗体的 KeyPreview属性设置为 True,然后编写如下代码: Dim SaveAll As S
19、tringPrivate Sub Form_ Load () Show Text1.Text=“ “ Text1.SetFocusEnd SubPrivate Sub Command1_ Click() Text1. Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form_ KeyPress (KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后,直接用键盘输入: VB,再单击命令按钮,则文本框中显示的内容为 _。 ( A) vbVB ( B)不显示任何信息 ( C) VB (
20、 D)出错 32 设有以下程序: Private Sub Form_ Click() x=50 For i=1 To 4 y=InputBox(“请输入 个整数 ”) y=Val(y) If y Mod 5=0 Then a=a+ y x=y Else a=a+ x End If Next i Print aEnd Sub 程序运行后,单击窗体,在输入对话框中依次输入 15、 24、 35、 46,输出结果为 _。 ( A) 100 ( B) 50 ( C) 120 ( D) 70 33 以下关于菜单的叙述中,错误的是 _。 ( A)当窗体为活动窗体时,用 Clrl+ E键可以打开菜单编辑器
21、( B)把菜单项的 Enabled 属性设置为 False,则可删除该菜单项 ( C)弹出式菜单在菜单编辑器中设计 ( D)程序运行时,利用控件数组可以实现菜单项的增加或减少 34 以下叙述中错误的是 _。 ( A)在程序运行时,通用对话框控件是不可见的 ( B)调用同 个通用对话框控件的不同方法 (如 ShowOpen或 ShowSave)可以打开不同的对话框窗口 ( C)调用通用对话框控件的 ShowOpen方法,能够直接打开在该通用对话框中指定的文件 ( D)调用通用对话框控 件的 ShowColor方法,可以打开颜色对话框窗口 35 设在工程文件中有 个标准模块,其中定义了如下记录类型
22、: Type Books Name As String *10 TelNum As String*20End Type在窗体上画 个名为Command1的命令按钮,要求当执行事件过程 Command1_Click时,在顺序文件Petson.txt中写入一条 Books类型的记录。下列能够完成该操作的事件过程是 _。 ( A) Private Sub Command1_ Click() Dim B As Books Open “Person.txt“ For Output As #1 B. Name=InputBox(“输入姓名 ”) B. TelNum=InputBox(“输入电话号码 ”)
23、Write #1, B. Name, B. TelNum Close #1End Sub ( B) Private Sub Command1_ Click() Dim B As Books Open “Person.txt“ For Input As #1 B. Name=InputBox(“输入姓名 ”) B.TelNum=InputBox(“输入电话号码 ”). Print #1, B. Name, B.TelNum Close #1End Sub ( C) Private Sub Command1_Click() Dim B As Books Open “Person.txt“ For
24、Output As #1 B.Name= InputBox(“输入姓名 ”) B.TelNum=InputBox(“输入电话号码 ”) Write #1, B Close #1End Sub ( D) Private Sub Command1_ Click() Open “Person. txt“ For Input As #1 Name=InputBox(“输入姓名 ”) TelNum=InputBox(“输入电话号码 ”) Print #1, Name, TelNum Close #1End Sub 36 假设用一个长度为 50的数组成 (数组元素的下标从 0到 49)作为栈的存储窨,栈底
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 2009 国家 二级 VISUALBASIC 笔试 答案 解析 DOC
