[计算机类试卷]VB笔试模拟试卷39及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷39及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷39及答案与解析.doc(24页珍藏版)》请在麦多课文档分享上搜索。
1、VB笔试模拟试卷 39及答案与解析 1 在下列选项中,不是算法一般应该具有的基本特征的是 ( A)确定性 ( B)可行性 ( C)无穷性 ( D)拥有足够的情报 2 下列描述中不是链表优点的是 ( A)逻辑上相邻的结点物理上不必相邻 ( B)插入、删除运算操作方便,不必移动结点 ( C)所需存储空间比线性表节省 ( D)无需事先估计存储空间的大小 3 在一棵二叉树上第 8层的结点数最多是 ( A) 8 ( B) 16 ( C) 128 ( D) 256 4 对采用二分查找法进行查找运算的查找表,要求按 _ 方式进行存储。 ( A)顺序存储 ( B)链式存储 ( C)顺序存储且结点按关键字有序
2、( D)链式存储且结点按关键字有序 5 在排序方法中,将整个无序序列分割成若干小的子序列并分别进行排序的方法,称为 ( A)希尔排序 ( B)冒泡排序 ( C)插入排序 ( D)选择排序 6 结构化程序设计的 3种基本控制结构是 ( A)过程、子程序和分程序 ( B)顺序、选择和重复 ( C)递归、堆栈和队列 ( D)调用、返回和转移 7 为了避免流程图在描述程序逻辑时的灵活性,提出了用方框图宋代 替传统的程序流程图,通常也将这种图称为 ( A) PAD图 ( B) N-S图 ( C)结构图 ( D)数据流图 8 软件测试中根据测试用例设计方法的不同可分为黑盒测试和白盒测试,它们 ( A)前者
3、属于静态测试,后者属于动态测试 ( B)前者属于动态测试,后者属于静态测试 ( C)都属于静态测试 ( D)都属于动态测试 9 数据库中对全部数据的整体逻辑结构的描述,作为数据库的 ( A)内模式 ( B)外模式 ( C)概念模式 ( D)子模式 10 设关系 R是 4元关系,关系 S是一个 5元关系,关系 T是 R与 S的笛卡儿积,即 T=RS,则关系 T是 _ 元关系。 ( A) 9 ( B) 11 ( C) 20 ( D) 40 11 窗体文件的扩展名是 ( A) .frm ( B) .vbp ( C) .bas ( D) .frx 12 Visual Basic程序中分隔各语句的字符是
4、 ( A) ( B): ( C) ( D) _ 13 为了保存一个 Visual Basic应用程序,下列说法中正确的是 ( A)只保存窗体模块文件 (.frm) ( B)只保存工程文件 (.vbp) ( C)分别保存工程文件和标准 模块文件 (.bas) ( D)分别保存工程文件、窗体文件和标准模块文件 14 执行语句 s=Len(Mid(“study hard“, 1, 5)后, s的值是 ( A) study ( B) hard ( C) 5 ( D) 10 15 以下关系表达式中,其值为 False的是 ( A) Base “Basic“ ( B) List1 “Command1“ (
5、 C) CASE=Ucase(“case“) ( D) Integer “Int“ 16 运行下列程序: Private Sub Command1_Click() x = 0 Do While x 10 x=x * x + 1 y=y+x Loop MsgBox y End Sub 单击 Command1命令按钮后,弹出的消息对话框中会显示 ( A) 5 ( B) 8 ( C) 26 ( D) 34 17 下列程序是将两个文本框 (text1和 text2)的内容进行组合,组合后的结果在图片框 (Pic1)显示出来。 Private Sub Command1_Click() Dim sl As
6、 String, s2 As String S1=Text1.Text S2=TextText For i=Len(s1)To 1 Step-1 s3=s3+Mid(s1, i, 1)+Mid(s2, i, 1) Next i Pic1.Print s3 End Sub 程序运行后,在 Text1文本框中输入 “ABCDE”,在 Text2文本框中输入 “12345”,单击命令按钮,则在 Pic1图片框中显示的内容是 ( A) E5D4C3B2A1 ( B) ABCDE12345 ( C) 12345ABCDE ( D) A1B2C3D4E5 18 编写如下两个事件过程: Private Su
7、b Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下 (即不按住 Shift键和锁定大写键 ),运行程序,如果按 “A”键,则程序的输出是 ( A) A A ( B) a A ( C) A a ( D) a a 19 在窗体上画一个命令按钮,然后编写如下代码: Private Sub Command1_Click() aSpc(5
8、);b; Spc(7); c Print a; Space(8); b; Space(5); c Print c; Spc(1); “+“;Spc(1); d; Print Spc(1); “=“; Spc(1); c+d End Sub 运行上面的程序,单击窗体后,第三行输出的结果是 ( A) 20+25=45 ( B) 20+25=45 ( C) 10 15 20 ( D) 20 25 45 21 为了取消窗体的最小化功能,需要将它的一个属性设置为 False,这个属性是 ( A) ControlBox ( B) MinButton ( C) Enabled ( D) MaxButton
9、22 以下叙述正确的是 ( A) SelectCase语句中的测试表达式可以是任何形式的表达式 ( B) SelectCase语句中的测试表达式只能是数值表达式或字符串表达式 ( C)在执行 SelectCase语句时,所有 Case子句均按出现的次序被顺序执行 ( D)如下 SelectCase语句中的 Case表达式是错误的 Select Case x Case 1 to 10 . End Select 23 当拖动滚动条中的滚动块时,将触发的滚动条事件是 ( A) Move ( B) Change ( C) Scroll ( D) SetFocus 24 在设计阶段,当双击窗体上的某一个
10、文本框控件时,系统将在代码窗口中显示该文本框控件的事件过程模板是 ( A) Click ( B) DblClick ( C) Change ( D) GotFocus 25 在窗体上画一个命令按钮和一个标签,其名称分别为 Command1和 Labell,然后编写如下事件过程: Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=8 To 1 Step-2 Counter=Counter+1 Next i Next i Labell.Caption=Str(Counter) End Sub 程序运行后,单击命令按钮,标签中显示的内
11、容是 ( A) 11 ( B) 12 ( C) 16 ( D) 20 26 下列程序运行后会出现错误的提示为 Private Sub Command1_Click() Dim i AS Integer Dim x x=Array(2, 3, 4, 5, 6, 7) For Each i In x Print i; Next i End Sub ( A)数组的下标超界 ( B) For Each数组的控制变量必须为变体变量 ( C)关键字 Each的位子不对 ( D) x应该定义成数组 27 如果 Tab函数的参数小于 1,则打印位置所在的列是 ( A) 0 ( B) 1 ( C) 2 ( D)
12、 3 28 当利用 Line方法添加图形时,以下说法正确的是 ( A)有 7种不同 的线型,而且不管线宽多少都可以绘制虚线、点划线、点线 ( B)使用 Line(100,100)-(1000,1200)和 Line(100,100)-Step(900,1100)将绘制两条相同位置的直线 ( C)可利用 Line方法添加矩形,如 Line(300,300)-(2000,2000), BF ( D)可利用 Line方法添加矩形,如 Line(300,300)-(2300,2300), B+F 29 以下关于多重窗体程序的叙述中,错误的是 ( A)用 Hide方法不但可以隐藏窗体,而且能清除内存中的
13、窗体 ( B)在多重窗体程序中,各窗体的菜单是彼此独立的 ( C)在多重窗体程序中,可以根据需要指定启动窗体 ( D)对于多重窗体程序,需要单独保存每个窗体 30 使用 Redim Preserve可以改变数组的 ( A)最后一维的大小 ( B)第一维的大小 ( C)所有维的大小 ( D)改变维数和所有维的大小 31 在窗体上画一个名称为 Command1命令按钮,然后编写如下事件过程: Private Function fun1(n As Integer)As Integer Dim k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n -
14、 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1 (x) Print m End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ( A) 4 ( B) 6 ( C) 9 ( D) 15 32 窗体上没有任何控件,编写下列程序: Option Base 1 Private Sub Form_KeyPress(KeyAscii As Integer) a = Array(5, 2, 7, 6, 9) x = a(1)
15、 y = 1 If KeyAscii = 13 Then For i = 2 To 5 If a(i) m1 Then x = a (i) y= i End If Next i End If Print x; y End Sub 执行程序后,按下回车键后输出的结果为 ( A) 5 1 ( B) 9 5 ( C) 2 2 ( D) 7 3 33 在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y *
16、y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2,A)Print a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ( A) 8 ( B) 2 ( C) 5 ( D) 11 34 编写如下通用过程: Sub Proc(x As Single, y As Single) t = x x = t/y y = t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click () Dim a As Single
17、Dim b As Single a = 5 b = 4 Proc a, b Print a, b End Sub 程序运行后,如果单击命令按钮,则输出结果为 ( A) 5 4 ( B) 1.25 1 ( C) 4 5 ( D) 1.25 5 35 在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k +
18、1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ( A) 5 ( B) 6 ( C) 8 ( D) 11 36 在一个容量为 15的循环队列中,若头指针 front=6,尾指针 rear=9,则该循环队列中共有【 】个元素。 37 具有 80个结点的完全二叉树的深度为【 】。 38 使用已经存在的类作为基础 建立新类的定义,这种技术叫做类的【 】。 39 数据流图的类型有【
19、】和事务型。 40 在关系模型中,表 A中的某属性集是某表 B的键,则称该属性集为 A的【 】。 41 为了在运行时将窗体 Form1的标题 (Caption属性 )设置为 “Test Program”,应使用的语句为【 】。 42 假定有以下当循环: While Not条件 循环体 Loop 则执行循环体的 “条件 ”是【 】。 43 为了使标签能自动调整大小以显示全部文本内容,应将标签的【 】 属性设置为True。 44 有时候需要暂时关闭计时器,这可以通过【 】属性来实现。 45 下列过程的功能是用来计算并输出 S=1+1/2+1/3+1/100 的值,请完善程序。 Function S
20、umF(n As Integer)As Single s = 0 For i=1 To n s=【 】 Next i SumF=s End Function Private Sub Form_Click() Sum1=SumF(100) Print Print“sum1=“; sum1 End Sub 46 在属性窗口中,属性列表可以按两种顺序排列,这两种顺序是【 】和【 】。 47 以下程序的功能是,产生 10个 0 1000的随机整数,放入数组 Arr中,然后输出其中的最大值。请完善下列程序。 Option Base 1 Private Sub Form_Click() Dim Arr(1
21、0)As Integer Dim Max As Integer Randomize For i = 1 To 10 Arr(i)= Int(Rnd * 1000) Next i Max =【 】 For i = 2 To 10 If【 】 Then Max = Arr(i) End If Next i Print Max End Sub 48 在窗体上画一个列表框 、一个命令按钮和一个标签。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数。 下面是实现上述功能的程序,请填空。 Private Sub Form_Load() List
22、1.AddItem “AAAAA“ List1.AddItem “BBBBB“ List1.AddItem “CCCCC“ List1.AddItem “DDDDD“ End Sub Private Sub Command1_Click() Dim L1 As Integer L1=【 】 If L1 =0 Then List1.RemoveItem【 】 Labell.Caption=【 】 Else MsgBox(“请选择要删除的项目 “) End If End Sub VB笔试模拟试卷 39答案与解析 1 【正确答案】 C 【试题解析】 作为一个算法,一般应具有以下几个基本特征 :可行性
23、、确定性、有穷性、拥有足够的情报。 2 【正确答案】 C 【试题解析】 线性表的链式存储是用一组任意的存储空间来存放数据元素,链表结点空间是动态生成的,无需事先估计存储空间的大小。链表逻辑上相邻的元素在物理位置上不一定相邻,因此需要另外开辟空间来保存元素之间的关系,花费的存储空间较顺序存储多。在链表中插入或删除结点,只需修改指针,不需要移动元素。 3 【正确答案】 C 【试题解析】 根据二叉树的性质 1:二叉树第 k(k 1)层上,最多有 2k-1个结点。于是第 8层的结点数最多是 27=128。 4 【正确答案】 C 【试题解析】 二分法查找也称折半查找,它适合于按键值排序的存储结构。在二分
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 39 答案 解析 DOC
