【计算机类职业资格】二级VISUAL+BASIC笔试-32及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试-32及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-32及答案解析.doc(23页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试-32 及答案解析(总分:92.00,做题时间:90 分钟)一、选择题(总题数:31,分数:62.00)1.设有如下程序:Private Sub Command1_Click()Dim Sum As Double, x As Doublesum=0n = 0For i= 1 To 5x = n / in = n + 1sum=sum+xNextEnd Sub该程序通过 For 循环计算一个表达式的值,这个表达式是(分数:2.00)A.1+1/2+2/3+3/4+4/5B.1+1/2+2/3+3/4C.1/2+2/3+3/4+4/5D.1+1/2+1/3+1/
2、4+1/52.数据库设计的根本目标是要解决(分数:2.00)A.数据共享问题B.数据安全问题C.大量数据存储问题D.简化数据维护3.在窗体上画两个单选按钮,名称分别为 Option1、Option2,标题分别为“宋体”和“黑体”:一个复选框,名称为 Checkl,标题为“粗体”;一个文本框,名称为 Text1,Text 属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中(窗体外观如下图),则能够实现上述要求的语句序列是(分数:2.00)A.B.C.D.4.以下叙述中错误的是(分数:2.00)A.打开一个工程文件时,系统自动装入与该工程有关的窗体、标准模块等文件B.保
3、存 Visual Basic 程序时,应分别保存窗体文件及工程文件C.VisualBasic 应用程序只能以解释方式执行D.事件可以由用户引发,也可以由系统引发5.以下能够正确计算 1+2+3+10 的程序是(分数:2.00)A.Private Sub Command1_Click()Sum=0ForI=1 To 10Sum=Sum+INext IPrint SumEnd SubB.Private Sub Command1_Click()Sum=0,I=1Do While I=10Sum=Sum+II=I+1Print SumEnd SubC.Private Sub Command1_Clic
4、k()Sum=0: I=1DoSum=Sum+II=I+1Loop While I10Print SumEnd SubD.Private Sub Command1_Click()Sum=0: I=1DoSum=Sum+II=I+1Loop Until I10Print SumEnd Sub6.以下叙述中错误的是(分数:2.00)A.如果过程被定义为 Static 类型,则该过程中的局部变量都是 Static 类型B.Sub 过程中不能嵌套定义 Sub 过程C.Sub 过程中可以嵌套调用 Sub 过程D.事件过程可以像通用过程一样由用户定义过程名7.在窗体上画一个名称为 Command1 的命令
5、按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim num As Integernum=1Do Until num6Print num;num=num+2.4LoopEnd Sub程序运行后,单击命令按钮,则窗体上显示的内容是(分数:2.00)A.1 3.4 5.8B.1 3 5C.1 4 7D.无数据输出8.在窗体中添加一个通用对话框 Commondialog1 和一个命令按钮 Command1,当单击按钮时,打开颜色对话框,能实现此功能的程序段是(分数:2.00)A.Private Sub Command1_Click()Commondialogl.
6、ShowOpenEnd SubB.Private Sub Command1_Click()Commondialog1.ShowColorEnd SubC.PrivateSubCommand1_Click()Commondialog1.ShowOpenCommondialog1.ShowFontEnd SubD.Private Sub Command1_Click()Commondialog1.ShowColorCommondialog1.ShowHelpEnd Sub9.为了使模块尽可能独立,要求(分数:2.00)A.模块的内聚程序要尽量高,且各模块间的耦合程度要尽量强B.模块的内聚程度要尽量
7、高,且各模块间的耦合程度要尽量弱C.模块的内聚程度要尽量低,且各模块间的耦合程度要尽量弱D.模块的内聚程度要尽量低,且各模块间的耦合程度要尽量强10.以下叙述中错误的是(分数:2.00)A.事件过程是响应特定事件的一段程序B.不同的对象可以具有相同的名称的方法C.对象的方法是执行指定操作的过程D.对象事件的名称可以由编程者指定11.执行以下 Command1 的 Click 事件过程在窗体上显示Option Base 1Private Sub Command1_Click()Dim aa=Array(“a“,“b“,“c“,“d“,“e“,“f“,“g“)Print a(1); a(3); a
8、(5)End Sub(分数:2.00)A.abcB.bdfC.aceD.出错12.设有如下程序段:x=2For i=1 To 10 Step 2x= x+iNext运行以下程序后,x 的值是(分数:2.00)A.26B.27C.38D.5713.以下叙述中正确的是(分数:2.00)A.一个记录中所包含的各个元素的数据类型必须相同B.随机文件中每个记录的长度是固定的C.Open 命令的作用是打开一个已经存在的文件D.使用 Input#语句可以从随机文件中读取数据14.通用对话框 CommonDialog 中的方法为(分数:2.00)A.ShowOpenShowSaveShowColorShowF
9、ontShowPrinterShowHelpB.ShowOpenShowCloseShowColorShowFontShowPrinterShowHelpC.ShowOpenShowSaveShowFontShowPrinterShdwHelpD.ShowOpenShowCloseShowFontShowPrinterShowHelp15.下列语句错误的是(分数:2.00)A.If a=3 And b=2 Thenc=3End IfB.If a=1 Thenc=2Else If a=2End IfC.If a=3 And b=2 Thenc=2Else If a=2 Thenc=3End If
10、D.If a=1 Then c=216.在窗体上画一个名称为 Text1 的文本框,要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是(分数:2.00)A.Private Sub Text1_KeyPress(KeyAscii As Integer)If Key Ascii65 Or KeyAscii90 ThenMsgBox“请输入大写字母”KeyAscii=0End IfEnd SubB.Pfivate Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)If KeyCode65 Or KeyCode90 ThenMsgB
11、ox“请输入大写字母”KeyCode=0End IfEnd SubC.Private Sub Text1_MouseDown(Button As Integer,Shift As Integer,X As Single, Y As Single)If Asc(Text1.Text)65 Or Asc(Text1.Text)90 ThenMsgBox“请输入大写字母”End IfEnd SubD.Private Sub Text1_Change()If Asc(Text1.Text)64 And Asc(Text1.Text)91 ThenMsgBox“请输入大写字母”End IfEnd Sub
12、17.在 Visual Basic 工程中,可以作为“启动对象”的程序是(分数:2.00)A.任何窗体或标准模块B.任何窗体或过程C.Sub Main 过程或其他任何模块D.Sub Main 过程或任何窗体18.用于获得字符串 S 从第 3 个字符开始的 3 个字符的函数是(分数:2.00)A.Mid$(S,2,3)B.Middle$(S,2,3)C.Right$(S,2,3)D.Left$(S,2,3)19.在以下描述中正确的是(分数:2.00)A.标准模块中的任何过程都可以在整个工程范围内被调用B.在一个窗体模块中可以调用在其他窗体中被定义为 Public 的通用过程C.如果工程中包含 S
13、ubMain 过程,则程序将首先执行该过程D.如果工程中不包含 SUbMain 过程,则程序一定首先执行第一个建立的窗体20.算法执行过程中所需要的存储空间称为算法的(分数:2.00)A.时间复杂度B.计算工作量C.空间复杂度D.工作空间21.阅读程序:Option Base 1Private Sub Form Click()Dim arr,SumSum= 0arr=Array(1,3,5,7,9,11,13,15,17,19)For i=1 To 10 If arr(i)/3=arr(i)/3 ThenSum=Sum+arr(i)End IfNext iPrint SumEnd Sub程序运
14、行后,单击窗体,输出结果为(分数:2.00)A.13B.14C.27D.1522.源程序中应包含一些内部文档,以帮助阅读和理解程序,源程序的内部文档包括选择合适的标识符、注释和(分数:2.00)A.程序的视觉组织B.尽量不用或少用 GOTO 语句C.检查输入数据的有效性D.设计良好的输出报表23.表达式 5Mod3+3/5*2 的值是(分数:2.00)A.0B.2C.4D.624.在窗体上画一个名称为 Drivel 的驱动器列表框,一个名称为 Dirl 的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是(分数:2.00)A.D
15、rivel changeB.Drive1_ClickC.Dirl_ClickD.Dirl_Change25.用黑盒技术测试用例的方法之一为(分数:2.00)A.因果图B.逻辑覆盖C.循环覆盖D.基本路径测试26.在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(5)As StringFor i=1 To 5a(i)=Chr(Asc(“A“)+(i-1)Next iFor Each b In aPrint b;NextEnd Sub程序运行后,单击命令按钮,输出结果是(分数:2.00)A.ABCDEB.1 2 3 4 5C.abcd
16、eD.出错信息27.从键盘上输入两个字符串,分别保存在变量 str1、str2 中。确定第二个字符串在第一个字符串中起始位置的函数是(分数:2.00)A.LeftB.MidC.StringD.Instr28.设有下列二叉树:(分数:2.00)A.B.C.D.29.在窗体上画一个名称为 Listl 的列表框,一个名称为 Label1 的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是(分数:2.00)A.Private Sub List1_Click()Label1.Caption=List1.ListIndexEnd S
17、ubB.Private Sub List1-Click()Label1.Name=List1.ListIndexEnd SubC.Private Sub List1_Click()Label1.Name=List1.TextEnd SubD.Private Sub List1_Click()Label1.Caption=List1.TextEnd Sub30.以下能在窗体 Form1 的标题栏中显示“Visual Basic 窗体”的语句是(分数:2.00)A.Form1.Name=“Visual Basic 窗体”B.Form1.Title=“VisualBasic 窗体”C.Form1.C
18、aption=“VisualBasic 窗体”D.Form1.Text=“VisualBasic 窗体”31.在窗体中画一个命令按钮,然后编写以下事件过程:Private Sub Command1_Click()For j=1 To 3Print Tab(3(j);11(2(j-1);Next jPrintEnd Sub程序的执行结果为(分数:2.00)A.11B.33C.11 33D.11 33 55二、填空题(总题数:10,分数:30.00)32.执行下面的程序段后,i 的值为_,s 的值为 _。s=2For i=3.2 To 4.9 Step 0.8s=s +1Next i(分数:3.0
19、0)填空项 1:_33.若按功能划分,软件测试的方法通常分为白盒测试方法和 1 测试方法。(分数:3.00)填空项 1:_34.一棵二叉树第六层(根结点为第一层)的结点数最多为 1 个。(分数:3.00)填空项 1:_35.问题处理方案的正确而完整的描述称为 1。(分数:3.00)填空项 1:_36.与数学表达式 (分数:3.00)填空项 1:_37.在菜单编辑器中建立了一个菜单,名为 pmenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。Forml._pmenu(分数:3.00)填空项 1:_38.假定建立了一个工程,该工程包括两个窗体,其名称分别为 Form1 和 Form2,启动窗
20、体为 Form1。在Form1 上画一个命令按钮 Command1,程序运行后,要求当单击该命令按钮时,Form1 窗体消失,显示Form2,请在空白处将程序补充完整。Private Sub Command1_Click()_form2_End Sub(分数:3.00)填空项 1:_39.设有如下程序:Private Sub Form_Click()Dim a As Integer, s As Integern=8s=0Dos=s+nn=n-1Loop While n0Print sEnd Sub以上程序的功能是_。程序运行后,单击窗体,输出结果为_。(分数:3.00)填空项 1:_40.程序
21、是一个窗体双击事件代码,窗体的名称是 Mywindow。窗体上有一个名为 text1 的文本框,用来显示文本。程序段首先在文本框中显示“窗体能够触发双击事件”然后将该文本清除;重复上述过程 5 次。Option ExplicitPrivate _Dim k As IntegerFor k=1 To 100If k Mod 20 Then_ElseText1.Text=“ “End IfPrint“程序运行完毕,可再双击窗体”End Sub(分数:3.00)填空项 1:_41.如图所示,在列表框 List1 中已经有若干人的简单信息,运行时在 Text1 文本框(即“查找对象”右边的文本框)输入
22、一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在 Text2 文本框中。若有多个匹配的列表项,则只显示第 1 个匹配项;若未找到,则在 Text2 中显示“查无此人”。请填空。Private Sub Command1_Click()Dim k As Integer, n As Integer, found As Booleanfound=Falsen= Len(_)k = 0While kList1.ListCount And Not foundIf Text1=Lefts(List1.List(k),n)ThenText2 _foundTrueEnd Ifk
23、 k + 1WendIf Not found ThenText2“查无此人”End IfEnd Sub(分数:3.00)填空项 1:_二级 VISUAL+BASIC 笔试-32 答案解析(总分:92.00,做题时间:90 分钟)一、选择题(总题数:31,分数:62.00)1.设有如下程序:Private Sub Command1_Click()Dim Sum As Double, x As Doublesum=0n = 0For i= 1 To 5x = n / in = n + 1sum=sum+xNextEnd Sub该程序通过 For 循环计算一个表达式的值,这个表达式是(分数:2.00
24、)A.1+1/2+2/3+3/4+4/5B.1+1/2+2/3+3/4C.1/2+2/3+3/4+4/5 D.1+1/2+1/3+1/4+1/5解析:解析 本题考查 For 循环控制语句。sam 的初始值为 0,n 的初始值为 0,每执行一次 For i 循环,先令 x 值等于 n 浮点除以 i,然后再把这一 x 值加到 sum 上,很显然,sum 的最终结果为:0/1+1/2+2/3+3/4+4/5,故正确答案为 C。2.数据库设计的根本目标是要解决(分数:2.00)A.数据共享问题 B.数据安全问题C.大量数据存储问题D.简化数据维护解析:解析 本题考核数据库技术的根本目标,很简单,记忆性
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 32 答案 解析 DOC
