ImageVerifierCode 换一换
格式:DOC , 页数:13 ,大小:144KB ,
资源ID:1329804      下载积分:5000 积分
快捷下载
登录下载
邮箱/手机:
温馨提示:
如需开发票,请勿充值!快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。
如填写123,账号就是123,密码也是123。
特别说明:
请自助下载,系统不会自动发送文件的哦; 如果您已付费,想二次下载,请登录后访问:我的下载记录
支付方式: 支付宝扫码支付 微信扫码支付   
注意:如需开发票,请勿充值!
验证码:   换一换

加入VIP,免费下载
 

温馨提示:由于个人手机设置不同,如果发现不能下载,请复制以下地址【http://www.mydoc123.com/d-1329804.html】到电脑端继续下载(重复下载不扣费)。

已注册用户请登录:
账号:
密码:
验证码:   换一换
  忘记密码?
三方登录: 微信登录  

下载须知

1: 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。
2: 试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。
3: 文件的所有权益归上传用户所有。
4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
5. 本站仅提供交流平台,并不能对任何下载内容负责。
6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

版权提示 | 免责声明

本文(【计算机类职业资格】全国计算机等级考试二级VISUAL+BASIC真题2010年9月及答案解析.doc)为本站会员(testyield361)主动上传,麦多课文库仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知麦多课文库(发送邮件至master@mydoc123.com或直接QQ联系客服),我们立即给予删除!

【计算机类职业资格】全国计算机等级考试二级VISUAL+BASIC真题2010年9月及答案解析.doc

1、全国计算机等级考试二级 VISUAL+BASIC 真题 2010 年 9 月及答案解析(总分:100.00,做题时间:120 分钟)一、选择题(每小题 2 分,共 70 分)(总题数:35,分数:70.00)1.下列叙述中正确的是 (分数:2.00)A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构D.上述三种说法都不对2.下列叙述中正确的是 (分数:2.00)A.在栈中,栈中元素随栈底指针与栈顶指针的变化而动态变化B.在栈中,栈顶指针不变,栈中元素随栈底指针

2、的变化而动态变化C.在栈中,栈底指针不变,栈中元素随栈顶指针的变化而动态变化D.上述三种说法都不对3.软件测试的目的是 (分数:2.00)A.评估软件可靠性B.发现并改正程序中的错误C.改正程序中的错误D.发现程序中的错误4.下面描述中,不属于软件危机表现的是 (分数:2.00)A.软件过程不规范B.软件开发生产率低C.软件质量难以控制D.软件成本不断提高5.软件生命周期是指 (分数:2.00)A.软件产品从提出、实现、使用维护到停止使用退役的过程B.软件从需求分析、设计、实现到测试完成的过程C.软件的开发过程D.软件的运行维护过程6.面向对象方法中,继承是指 (分数:2.00)A.一组对象所

3、具有的相似性质B.一个对象具有另一个对象的性质C.各对象之间的共同性质D.类之间共享属性和操作的机制7.层次型、网状型和关系型数据库划分原则是 (分数:2.00)A.记录长度B.文件的大小C.联系的复杂程度D.数据之间的联系方式8.一个工作人员可以使用多台计算机,而一台计算机可被多个人使用,则实体工作人员、与实体计算机之间的联系是 (分数:2.00)A.一对一B.一对多C.多对多D.多对一9.数据库设计中反映用户对数据要求的模式是 (分数:2.00)A.内模式B.概念模式C.外模式D.设计模式10.有三个关系 R、S 和 T 如下: (分数:2.00)A.自然连接B.交C.投影D.并11.在

4、Visual Basic 集成环境中,要添加一个窗体,可以单击工具栏上的一个按钮,这个按钮是(分数:2.00)A.B.C.D.12.在 Visual Basic 集成环境的设计模式下,用鼠标双击窗体上的某个控件打开的窗口是 (分数:2.00)A.工程资源管理器窗口B.属性窗口C.工具箱窗口D.代码窗口13.下列叙述中错误的是 (分数:2.00)A.列表框与组合框都有 List 属性B.列表框有 Selected 属性,而组合框没有C.列表框和组合框都有 Style 属性D.组合框有 Text 属性、而列表框没有14.设窗体上有一个命令按钮数组,能够区分数组中各个按钮的属性是 (分数:2.00)

5、A.NameB.IndexC.CaptionD.Left15.滚动条可以响应的事件是 (分数:2.00)A.LoadB.ScrollC.ClickD.MouseDown16.设 a=5, b=6, c=7, d=8,执行语句 X=Ilf(ab)And (cd), 10, 20)后,x 的值是 (分数:2.00)A.10B.20C.30D.20017.语句 Print Sgn(-62)+ Abs(-62)+Int(-62)的输出结果是 (分数:2.00)A.-36B.1C.-1D.-7218.在窗体上画一个图片框,在图片框中画一个命令按钮,位置如图所示。 (分数:2.00)A.200B.300C

6、.500D.70019.在窗体上画一个名称为 Command l 的命令按钮。单击命令按钮时执行如下事件过程: Private Sub Command 1_Click() a$=”software and hardware“ b$=Right(a$,8) c$=Mid(a$, 1,8) MsgBox a$,,b$,c$, 1 End Sub 则在弹出的信息框标题栏中显示的标题是 (分数:2.00)A.software and hardwareB.hardwareC.softwareD.120.在窗体上画一个文本框(名称为 Text 1)和一个标签(名称为 Label 1),程序运行后,如果在文

7、本框中输入文本,则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是 (分数:2.00)A.B.C.D.21.以下说法中错误的是 (分数:2.00)A.如果把一个命令按钮的 Default 属性设置为 True,则按回车键与单击该命令按钮的作用相同B.可以用多个命令按钮组成命令按钮数组C.命令按钮只能识别单击(Click)事件D.通过设置命令按钮的 Enabled 属性,可以使该命令按钮有效或禁用22.以下关于局部变量的叙述中错误的是 (分数:2.00)A.在过程中用 Dim 语句或 Static 语句声明的变量是局部变量B.局部变量的作用域是它所在的过程C.在过程中用 Static

8、语句声明的变量是静态局部变量D.过程执行完毕,该过程中用 Dim 或 Static 语句声明的变量即被释放23.)以下程序段的输出结果是 x=I y=4 Do Until y4 x=x*y Y=yI Loop Print x (分数:2.00)A.1B.4C.8D.2024.如果执行一个语句后弹出如图所示的窗口,则这个语句是 (分数:2.00)A.InputBox(“输入框”,”请输入 VB 数据”)B.x=InputBox(“输入框”,”请输入 VB 数据”)C.InputB ox(“请输入 VB 数据”,”输入框”)D.x=InputBox(“请输入 VB 数据”,”输入框”)25.有如下

9、事件过程: Private Sub Form Click() Dim n A s Integer x=0 n=InputBox(“请输入一个整数”) For i=1 Ton For j=1 To i x=xI Next j Next i Print x End Sub 程序运行后,单击窗体,女口果在输入对话框中输入:,则在窗体上显示的内容是 (分数:2.00)A.13B.14C.15D.1626.请阅读程序: Sub subP(b()As Integer) For i=1 To 4 b(i)=2i Next i End Sub Private Sub Command 1_Click() Dim

10、 a(l To 4)As Integer A(l)=5:a(2)=6:a(3)=7:a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序,单击命令按钮,则输出结果是 (分数:2.00)A.B.C.D.出错27.Fibonacci 数列的规律是:前 2 个数为 1,从第 3 个数开始,每个数是它前 2 个数之和,即:1,1,2, 3, 5, 8,13, 21,34, 55, 89,。某人编写了下面的函数,判断大于 1 的整数 x 是否是 Fibonacci 数列中的某个数,若是,则返回 True,否则返回 False。 Fu

11、nction Isfab(x As Integer)As Boolean Dim a As Integer, b As Integer, c As Integer, flag As Boolean flag=False a=1:b=I Do While xb c=ab a=b b=c If x=b Then flag=True Loop Isfab=flag End Function 测试时发现对于所有正整数 x,函数都返回 False,程序需要修改。下面的修改方案中正确的是 (分数:2.00)A.把 a= b 与 b=c 的位置互换B.把 c=a+b 移到 b=c 之后C.把 Do Whil

12、e xb 改为 Do While xbD.把 if x=b Then flag=True 改为 If x=a Then flag=True28.在窗体上画一个命令按钮,其名称为 Commandl,然后编写如下事件过程: Private Sub Command1_Click() Dim a$, b$,c$, k% a=“ABCD” b=”123456” c=“ k=1 Do While k= Len(a)Or k=Len(b) If k=Len(a)Then c=cMid(a, k, 1) End If If k=Len(b)Then c=cMid(b, k, 1) End If k=k1 Lo

13、op Print c End Sub 运行程序,单击命令按钮,输出结果是 (分数:2.00)A.123456ABCDB.ABCD123456C.D6C5B4A321D.AlB2C3D45629.请阅读程序: Private Sub Form_ Click() m=1 For i=4 To 1 Step-1 Print Str(m); m=m1 For j=1 To i Print”; Next j Print Next i End Sub 程序运行后,单击窗体,则输出结果是 (分数:2.00)A.B.C.D.30.在窗体上画一个命令按钮(其名称为 Commandl),然后编写如下代码: Pri

14、vate Sub Command l_Click() Dim a a=Array(1,2,3,4) I=3:j=1 Do While i=0 s=sa(i)*j i=i-1 j=j*10。 Loop Print s End Sub 运行上面的程序,单击命令按钮,则输出结果是 (分数:2.00)A.4321B.123C.234D.123431.下列可以打开随机文件的语句是 (分数:2.00)A.Open “file l .dat“ For lnput As1B.Open”file l .dat“ For Append As1C.Open”file1.dat“ For Output As1D.Op

15、en”file1.dat“ For Random As1 Len=2032.有弹出式菜单的结构如下表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是 (分数:2.00)A.B.C.D.33.请阅读程序: Option Base I Private Sub Form_ Click() Dim Arr(4, 4)As Integer For i=1 To 4 For j=I To 4 Arr(i, j)=(i - 1)*2j Next j Next i For i=3To4 For j=3 To 4 Print Arr(j, i); Next j Print N

16、ext i End Sub 程序运行后,单击窗体,则输出结果是 (分数:2.00)A.B.C.D.34.一下面函数的功能应该是:删除字符串 str 中所有与变量 ch 相同的字符,并返回删除后的结果。例如:若 str= “ABCDABCD“, ch= “B“,则函数的返回值为:“ACDACD“ Function delchar(str As String, ch As String)As String Dim k As Integer, temp As String, ret As String ret=“ For k=1 To Len(str) temp=Mid(str, k, 1) If

17、temp= ch Then ret=rettemp End If Next k delchar=ret End Function 但实际上函数有错误,需要修改。下面的修改方案中正确的是 (分数:2.00)A.把 ret=rettemp 改为 ret=tempB.把 If temp=ch Then 改为 If temp ch ThenC.把 delchar=ret 改为 delchar=tempD.把 ret =“改为 temp=“35.在窗体上画一个命令按钮和两个文本框,其名称分别为 Command1、Text I 和 Text2,在属性窗口中把窗体的 KeyPreview 属性设置为 Tru

18、e,然后编写如下程序: Dim S I As String, S2 As String Private Sub Form Load() Text 1 .Text=“ Text2.Text=“ Text 1Enabled=False Text2Enabled=False End Sub Private Sub Form_ KeyDown(KeyCode As Integer, Shift As Integer) S2=S2Chr(KeyCode) End Sub Private Sub Forin_ KeyPress(KeyAscii As Integer) S1=S1Chr(KeyAscii)

19、 End Sub Private Sub Command l Click Text l .Text=Sl Text2.Text=S2 S1=“ S2=“ End Sub 程序运行后,先后按“a”、“b”、“c”键,然后单击命令按钮,在文本框 Textl 和 Text2 中显示的内容分别为 (分数:2.00)A.abc 和 ABCB.空白C.ABC 和 abcD.出错二、填空题(每空 2 分,共 30 分)(总题数:9,分数:30.00)36.一个栈的初始状态为空。首先将元素 5,4,3,2,1 依次入栈,然后退栈一次,再将元素 A,B,C,D 依次入栈,之后将所有元素全部退栈,则所有元素退栈(

20、包括中间退栈的元素)的顺序为_【1】_。(分数:2.00)填空项 1:_37.在长度为 n 的线性表中,寻找最大项至少需要比较 1【2】 2 次。(分数:2.00)填空项 1:_38.一棵二叉树有 10 个度为 1 的结点,7 个度为 2 的结点,则该二叉树共有_【3】 1 个结点。(分数:2.00)填空项 1:_39.仅由顺序、选择(分支)和重复(循环)结构构成的程序是_【4】_程序。(分数:2.00)填空项 1:_40.数据库设计的四个阶段是:需求分析,概念设计,逻辑设计和_【5】_。(分数:2.00)填空项 1:_窗体上有一个名称为 Combo1 的组合框, 其初始内容为空,有一个名称为

21、 Command1、标题为“添加项目”的命令按钮。程序运行后,如果单击命令按钮,会将给定数组中的项目添加到组合框中,如图所示。请填空。 (分数:6.00)填空项 1:_填空项 1:_填空项 1:_窗体上有一个名称为 Text 1 的文本框和一个名称为 Command l、标题为“计算”的命令按钮,如图所示。函数 fun 及命令按钮的单击事件过程如下,请填空。 (分数:4.00)填空项 1:_填空项 1:_窗体上有一个名称为 List1 的列表框,一个名称为 Picture 1 的图片框。Form_ Load 事件过程的作用是,把 Datal.txt 文件中的物品名称添加到列表框中。运行程序,当

22、双击列表框中的物品名称时,可以把该物品对应的图片显示在图片框中如图所示。以下是类型定义及程序,请填空。 (分数:6.00)填空项 1:_填空项 1:_填空项 1:_窗体上有一个名称为 CD1 的通用对话框。通过菜单编辑器建立如图 1 所示的菜单。程序运行时,如果单击“打开”菜单项,则执行打开文件的操作,当选定了文件(例如: G:/VB/2010-9/in.txt)并打开后,该文件的文件名会被添加到菜单中,如图 2 所示。各菜单项的名称和标题等定义如下表。 (分数:4.00)填空项 1:_填空项 1:_全国计算机等级考试二级 VISUAL+BASIC 真题 2010 年 9 月答案解析(总分:1

23、00.00,做题时间:120 分钟)一、选择题(每小题 2 分,共 70 分)(总题数:35,分数:70.00)1.下列叙述中正确的是 (分数:2.00)A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构D.上述三种说法都不对解析:2.下列叙述中正确的是 (分数:2.00)A.在栈中,栈中元素随栈底指针与栈顶指针的变化而动态变化B.在栈中,栈顶指针不变,栈中元素随栈底指针的变化而动态变化C.在栈中,栈底指针不变,栈中元素随栈顶指针的变化而动态变化 D.上述三

24、种说法都不对解析:3.软件测试的目的是 (分数:2.00)A.评估软件可靠性B.发现并改正程序中的错误 C.改正程序中的错误D.发现程序中的错误解析:4.下面描述中,不属于软件危机表现的是 (分数:2.00)A.软件过程不规范 B.软件开发生产率低C.软件质量难以控制D.软件成本不断提高解析:5.软件生命周期是指 (分数:2.00)A.软件产品从提出、实现、使用维护到停止使用退役的过程 B.软件从需求分析、设计、实现到测试完成的过程C.软件的开发过程D.软件的运行维护过程解析:6.面向对象方法中,继承是指 (分数:2.00)A.一组对象所具有的相似性质B.一个对象具有另一个对象的性质C.各对象

25、之间的共同性质D.类之间共享属性和操作的机制 解析:7.层次型、网状型和关系型数据库划分原则是 (分数:2.00)A.记录长度B.文件的大小C.联系的复杂程度D.数据之间的联系方式 解析:8.一个工作人员可以使用多台计算机,而一台计算机可被多个人使用,则实体工作人员、与实体计算机之间的联系是 (分数:2.00)A.一对一B.一对多C.多对多 D.多对一解析:9.数据库设计中反映用户对数据要求的模式是 (分数:2.00)A.内模式B.概念模式C.外模式 D.设计模式解析:10.有三个关系 R、S 和 T 如下: (分数:2.00)A.自然连接 B.交C.投影D.并解析:11.在 Visual B

26、asic 集成环境中,要添加一个窗体,可以单击工具栏上的一个按钮,这个按钮是(分数:2.00)A. B.C.D.解析:12.在 Visual Basic 集成环境的设计模式下,用鼠标双击窗体上的某个控件打开的窗口是 (分数:2.00)A.工程资源管理器窗口B.属性窗口C.工具箱窗口D.代码窗口 解析:13.下列叙述中错误的是 (分数:2.00)A.列表框与组合框都有 List 属性B.列表框有 Selected 属性,而组合框没有 C.列表框和组合框都有 Style 属性D.组合框有 Text 属性、而列表框没有解析:14.设窗体上有一个命令按钮数组,能够区分数组中各个按钮的属性是 (分数:2

27、.00)A.NameB.Index C.CaptionD.Left解析:15.滚动条可以响应的事件是 (分数:2.00)A.LoadB.Scroll C.ClickD.MouseDown解析:16.设 a=5, b=6, c=7, d=8,执行语句 X=Ilf(ab)And (cd), 10, 20)后,x 的值是 (分数:2.00)A.10B.20 C.30D.200解析:17.语句 Print Sgn(-62)+ Abs(-62)+Int(-62)的输出结果是 (分数:2.00)A.-36B.1C.-1 D.-72解析:18.在窗体上画一个图片框,在图片框中画一个命令按钮,位置如图所示。

28、(分数:2.00)A.200 B.300C.500D.700解析:19.在窗体上画一个名称为 Command l 的命令按钮。单击命令按钮时执行如下事件过程: Private Sub Command 1_Click() a$=”software and hardware“ b$=Right(a$,8) c$=Mid(a$, 1,8) MsgBox a$,,b$,c$, 1 End Sub 则在弹出的信息框标题栏中显示的标题是 (分数:2.00)A.software and hardwareB.hardware C.softwareD.1解析:20.在窗体上画一个文本框(名称为 Text 1)和

29、一个标签(名称为 Label 1),程序运行后,如果在文本框中输入文本,则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是 (分数:2.00)A. B.C.D.解析:21.以下说法中错误的是 (分数:2.00)A.如果把一个命令按钮的 Default 属性设置为 True,则按回车键与单击该命令按钮的作用相同B.可以用多个命令按钮组成命令按钮数组C.命令按钮只能识别单击(Click)事件 D.通过设置命令按钮的 Enabled 属性,可以使该命令按钮有效或禁用解析:22.以下关于局部变量的叙述中错误的是 (分数:2.00)A.在过程中用 Dim 语句或 Static 语句声明的变量是

30、局部变量B.局部变量的作用域是它所在的过程C.在过程中用 Static 语句声明的变量是静态局部变量D.过程执行完毕,该过程中用 Dim 或 Static 语句声明的变量即被释放 解析:23.)以下程序段的输出结果是 x=I y=4 Do Until y4 x=x*y Y=yI Loop Print x (分数:2.00)A.1B.4 C.8D.20解析:24.如果执行一个语句后弹出如图所示的窗口,则这个语句是 (分数:2.00)A.InputBox(“输入框”,”请输入 VB 数据”)B.x=InputBox(“输入框”,”请输入 VB 数据”)C.InputB ox(“请输入 VB 数据”

31、,”输入框”)D.x=InputBox(“请输入 VB 数据”,”输入框”) 解析:25.有如下事件过程: Private Sub Form Click() Dim n A s Integer x=0 n=InputBox(“请输入一个整数”) For i=1 Ton For j=1 To i x=xI Next j Next i Print x End Sub 程序运行后,单击窗体,女口果在输入对话框中输入:,则在窗体上显示的内容是 (分数:2.00)A.13B.14C.15 D.16解析:26.请阅读程序: Sub subP(b()As Integer) For i=1 To 4 b(i)

32、=2i Next i End Sub Private Sub Command 1_Click() Dim a(l To 4)As Integer A(l)=5:a(2)=6:a(3)=7:a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序,单击命令按钮,则输出结果是 (分数:2.00)A. B.C.D.出错解析:27.Fibonacci 数列的规律是:前 2 个数为 1,从第 3 个数开始,每个数是它前 2 个数之和,即:1,1,2, 3, 5, 8,13, 21,34, 55, 89,。某人编写了下面的函数,判断大于

33、1 的整数 x 是否是 Fibonacci 数列中的某个数,若是,则返回 True,否则返回 False。 Function Isfab(x As Integer)As Boolean Dim a As Integer, b As Integer, c As Integer, flag As Boolean flag=False a=1:b=I Do While xb c=ab a=b b=c If x=b Then flag=True Loop Isfab=flag End Function 测试时发现对于所有正整数 x,函数都返回 False,程序需要修改。下面的修改方案中正确的是 (分数

34、:2.00)A.把 a= b 与 b=c 的位置互换B.把 c=a+b 移到 b=c 之后C.把 Do While xb 改为 Do While xb D.把 if x=b Then flag=True 改为 If x=a Then flag=True解析:28.在窗体上画一个命令按钮,其名称为 Commandl,然后编写如下事件过程: Private Sub Command1_Click() Dim a$, b$,c$, k% a=“ABCD” b=”123456” c=“ k=1 Do While k= Len(a)Or k=Len(b) If k=Len(a)Then c=cMid(a,

35、 k, 1) End If If k=Len(b)Then c=cMid(b, k, 1) End If k=k1 Loop Print c End Sub 运行程序,单击命令按钮,输出结果是 (分数:2.00)A.123456ABCDB.ABCD123456C.D6C5B4A321D.AlB2C3D456 解析:29.请阅读程序: Private Sub Form_ Click() m=1 For i=4 To 1 Step-1 Print Str(m); m=m1 For j=1 To i Print”; Next j Print Next i End Sub 程序运行后,单击窗体,则输出

36、结果是 (分数:2.00)A. B.C.D.解析:30.在窗体上画一个命令按钮(其名称为 Commandl),然后编写如下代码: Private Sub Command l_Click() Dim a a=Array(1,2,3,4) I=3:j=1 Do While i=0 s=sa(i)*j i=i-1 j=j*10。 Loop Print s End Sub 运行上面的程序,单击命令按钮,则输出结果是 (分数:2.00)A.4321B.123C.234D.1234 解析:31.下列可以打开随机文件的语句是 (分数:2.00)A.Open “file l .dat“ For lnput A

37、s1B.Open”file l .dat“ For Append As1C.Open”file1.dat“ For Output As1D.Open”file1.dat“ For Random As1 Len=20 解析:32.有弹出式菜单的结构如下表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是 (分数:2.00)A.B.C. D.解析:33.请阅读程序: Option Base I Private Sub Form_ Click() Dim Arr(4, 4)As Integer For i=1 To 4 For j=I To 4 Arr(i, j)=

38、(i - 1)*2j Next j Next i For i=3To4 For j=3 To 4 Print Arr(j, i); Next j Print Next i End Sub 程序运行后,单击窗体,则输出结果是 (分数:2.00)A.B.C. D.解析:34.一下面函数的功能应该是:删除字符串 str 中所有与变量 ch 相同的字符,并返回删除后的结果。例如:若 str= “ABCDABCD“, ch= “B“,则函数的返回值为:“ACDACD“ Function delchar(str As String, ch As String)As String Dim k As Inte

39、ger, temp As String, ret As String ret=“ For k=1 To Len(str) temp=Mid(str, k, 1) If temp= ch Then ret=rettemp End If Next k delchar=ret End Function 但实际上函数有错误,需要修改。下面的修改方案中正确的是 (分数:2.00)A.把 ret=rettemp 改为 ret=tempB.把 If temp=ch Then 改为 If temp ch Then C.把 delchar=ret 改为 delchar=tempD.把 ret =“改为 temp

40、=“解析:35.在窗体上画一个命令按钮和两个文本框,其名称分别为 Command1、Text I 和 Text2,在属性窗口中把窗体的 KeyPreview 属性设置为 True,然后编写如下程序: Dim S I As String, S2 As String Private Sub Form Load() Text 1 .Text=“ Text2.Text=“ Text 1Enabled=False Text2Enabled=False End Sub Private Sub Form_ KeyDown(KeyCode As Integer, Shift As Integer) S2=S2

41、Chr(KeyCode) End Sub Private Sub Forin_ KeyPress(KeyAscii As Integer) S1=S1Chr(KeyAscii) End Sub Private Sub Command l Click Text l .Text=Sl Text2.Text=S2 S1=“ S2=“ End Sub 程序运行后,先后按“a”、“b”、“c”键,然后单击命令按钮,在文本框 Textl 和 Text2 中显示的内容分别为 (分数:2.00)A.abc 和 ABC B.空白C.ABC 和 abcD.出错解析:二、填空题(每空 2 分,共 30 分)(总题数

42、:9,分数:30.00)36.一个栈的初始状态为空。首先将元素 5,4,3,2,1 依次入栈,然后退栈一次,再将元素 A,B,C,D 依次入栈,之后将所有元素全部退栈,则所有元素退栈(包括中间退栈的元素)的顺序为_【1】_。(分数:2.00)填空项 1:_ (正确答案:1DCAB2345)解析:37.在长度为 n 的线性表中,寻找最大项至少需要比较 1【2】 2 次。(分数:2.00)填空项 1:_ (正确答案:log2(n))解析:38.一棵二叉树有 10 个度为 1 的结点,7 个度为 2 的结点,则该二叉树共有_【3】 1 个结点。(分数:2.00)填空项 1:_ (正确答案:25)解析

43、:39.仅由顺序、选择(分支)和重复(循环)结构构成的程序是_【4】_程序。(分数:2.00)填空项 1:_ (正确答案:结构化)解析:40.数据库设计的四个阶段是:需求分析,概念设计,逻辑设计和_【5】_。(分数:2.00)填空项 1:_ (正确答案:物理设计)解析:窗体上有一个名称为 Combo1 的组合框, 其初始内容为空,有一个名称为 Command1、标题为“添加项目”的命令按钮。程序运行后,如果单击命令按钮,会将给定数组中的项目添加到组合框中,如图所示。请填空。 (分数:6.00)填空项 1:_ (正确答案:Array)解析:填空项 1:_ (正确答案:1)解析:填空项 1:_ (

44、正确答案:city(i))解析:窗体上有一个名称为 Text 1 的文本框和一个名称为 Command l、标题为“计算”的命令按钮,如图所示。函数 fun 及命令按钮的单击事件过程如下,请填空。 (分数:4.00)填空项 1:_ (正确答案:fun)解析:填空项 1:_ (正确答案:fun)解析:窗体上有一个名称为 List1 的列表框,一个名称为 Picture 1 的图片框。Form_ Load 事件过程的作用是,把 Datal.txt 文件中的物品名称添加到列表框中。运行程序,当双击列表框中的物品名称时,可以把该物品对应的图片显示在图片框中如图所示。以下是类型定义及程序,请填空。 (分数:6.00)填空项 1:_ (正确答案:Len)解析:填空项 1:_ (正确答案:Len)解析:填空项 1:_ (正确答案:Len)解析:窗体上有一个名称为 CD1 的通用对话框。通过菜单编辑器建立如图 1 所示的菜单。程序运行时,如果单击“打开”菜单项,则执行打开文件的操作,当选定了文件(例如: G:/VB/2010-9/in.txt)并打开后,该文件的文件名会被添加到菜单中,如图 2 所示。各菜单项的名称和标题等定义如下表。 (分数:4.00)填空项 1:_ (正确答案:Cd1.FileName)解析:填空项 1:_ (正确答案:Cd1.FileName)解析:

copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1