【计算机类职业资格】二级VISUAL+BASIC笔试-213及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试-213及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-213及答案解析.doc(25页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试-213 及答案解析(总分:100.00,做题时间:90 分钟)一、选择题(总题数:35,分数:70.00)1.在以下描述中正确的是( )。(分数:2.00)A.标准模块中的任何过程都可以在整个工程范围内被调用B.在一个窗体模块中可以调用在其他窗体中被定义为 Public 的通用过程C.如果工程中包含 Sub Main 过程,则程序将首先执行该过程D.如果工程中不包含 Sub Main 过程,则程序一定首先执行第一个建立的窗体2.在窗体上画一个文本框,其名称为 Text1,然后编写如下事件过程:Private Sub Text1_KeyPress(KeyAs
2、cii As Integer)Dim strAs String,n As IntegerStr=UCase(Chr(KeyAscii)n=Len(str)Text1=String(n,str)End Sub程序运行后,如果在键盘上输入单字母“k”,则在文本框 Text1 中显示的内容为( )。(分数:2.00)A.kkB.kKC.KKD.Kk3.在数据库设计中,将 E-R 图转换成关系数据模型的过程属于( )。(分数:2.00)A.需求分析阶段B.逻辑设计阶段C.概念设计阶段D.物理设计阶段4.关于货币型数据的说明,正确的是( )。(分数:2.00)A.货币型数据有时可以表示成整型数据B.货币
3、型数据与浮点型数据完全一样C.货币型数据是由数字和小数点组成的字符串D.货币型数据是小数点位置固定的实型数5.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Command1_Crick()Dim I As Integer,n As IntegerFor j=0 To 50i=i+3n=n+1If i10 Then Exit ForNextText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是( )。(分数:2.00)A.2B.3C.4D.56.Detetime 是 Da
4、ta 类型的变量,以下赋值语句中错误的是( )。(分数:2.00)A.Datetime=#4/14/97#B.Datetime=#September 1,1997#C.Datetime=#12:15:00 AM#D.Datetime=#8/8/997.执行以下程序段后,变量 C$的值为( )。A$=“Visual Basic Programing“B$=“Quick“C$=B$ End Sub程序运行后,如果在文本框中输入字母“a”,然后单击窗体,则在窗本上显示的内容是( )。(分数:2.00)A.Visual BasicB.程序设计C.Visual Basic 程序设计D.a 程序设计9.下
5、列叙述中正确的是( )。(分数:2.00)A.标签控件不能接收焦点事件B.如果将文本框的 TabStop 属性值设为 False,则该文本框将不能接收焦点事件C.窗体控件能接收焦点事件D.不能通过程序代码设置焦点属性10.假定有如下事件过程:Privte Sub Form_Click0Dim x As Integer,n As Integerx=1n=0Do While x28x=x*3n=n+1LoopPrint x,nEnd Sub程序运行后,单击窗体,输出结果是( )。(分数:2.00)A.81 4B.56 3C.28 1D.243 511.当窗体大小改变时,要使其中的控件也按比例发生变
6、化,应使用窗体的( )。(分数:2.00)A.AutoSize 属性B.Resize 事件C.AutoRedraw 属性D.Stretch 方法12.下列程序运行时输出的结果是( )。Option Base 1Private Sub Form_Click()Const a=6Dim x (a) As IntegerFor I=1 to ax(i)=12Next IPrint x(i)End Sub(分数:2.00)A.36B.25C.1D.出错信息13.下列程序的输出结果为( )。Private Sub Command1_Click()Dim a(20)For j=1 To 20 Step2a
7、(j)=jNext iPrint a(1)+a(2)+a(3)End Sub(分数:2.00)A.4B.5C.6D.714.在窗体上绘制一个名称为 Label1 的标签,然后编写如下事件过程:Private Sub Form_Click()Dim arr(10,10)As IntegerDim i As Integer,j As IntegerFor i =2 To 4For j =2 To 4arr(i,j)=i*jNext jNext iLabel1.Caption=Str(arr(2,2)+arr(3,3)End Sub程序运行后,单击窗体,在标签中显示的内容是( )。(分数:2.00)
8、A.12B.13C.14D.1515.下面程序运行结果是( )。Private Sub Form_Click()Dim x As Single,y As Singlex=InputBox(“请输入数据 25“):y=InputBox(“请输入数据 10“)Print x+y;InputBox(“请输入数据 25“)+InputBox(“请输入数据 10“)End Sub(分数:2.00)A._35_2510B.25102510C._35_35_D.2510_35_16.编写如下事件过程:Private Sub Form_KeyDown(KeyCode As Integer,Shift As I
9、nteger)If(Button And 3)=3 ThenPrint“AAAA”End IfEnd Sub程序运行后,为了在窗体上输出“AAAA”,应按下的鼠标键为( )。(分数:2.00)A.左B.右C.同时按下左、右D.按什么键都不显示17.以下 VB6.0 控件中,有 Caption 属性的是( )。(分数:2.00)A.组合框B.列表框C.计时器D.单选按钮18.引用列表框的最后一项应使用( )。(分数:2.00)A.List1.List(List1.ListCount-1)B.List1.List(List1.ListCount)C.List1.List(ListCount)D.L
10、ist1.List(List Count-1)19.设在工程中有一个标准模块,其中定义了如下类型:Type stutypeino As Integerstrname As String*20strsex As String*1smark As SingleEnd Type在窗体上画一个名为 Connnand1 的命令按钮,要求当执行事件过程 Command1_Click 时,在 c:/的随机文件 studentdat 写入一条记录。下列能够完成该操作的事件过程是( )。(分数:2.00)A.Sub Command1_C1ick()Dim student As studtypeDim recor
11、d_no As Integerrecord_no=1With student.ino=12.strname=“smith“.strsex=“男“.smark=89End WithOpen“ c:/student.dat“ For input As # 1 len=len(student)Put # 1,record_no,studentClose #1End SubB.Sub Command1_Click( )Dim student As studtypeDim record_no As Integerrecord_no=1With student.ino=12.strname=“smith“
12、.strsex=“男“.smark=89End WithOpen“c:/student.dat“ For random As #1 len=len(student)Put #1,record_no,studentClose #1End SubC.Sub Command1_Click()Dim student As studtypeDim record_no As integerrecord_no=1With student.ino=12.stmame=“smith“.strsex=“男“.smark=89End WithOpen“c:/student.dat“ For random As #1
13、 len=len(student)Write #1,record_no,studentClose #1End SubD.Sub Command1_Click()Dim Student As studtypeDim Record_no As Integerrecord_no=1With student.ino=12.strname=“smith“.strsex=“男“.smark=89End WithOpen“c:/student.dat“For output As #1 len=len(student)Put #1,record_no,studentClose #1End #120.用标准工具
14、栏中的工具按钮不能执行的操作是( )。(分数:2.00)A.添加工程B.打印源程序C.运行程序D.打开程序21.使图像(Image)控件中的图像自动适应控件的大小应( )。(分数:2.00)A.将控件的 AutoSize 属性设为 TrueB.将控件的 AutoSize 属性设为 FalseC.将控件 Stretch 属性设为 TrueD.将控件的 Stretch 属性设为 False22.如果模块定义为:DefStr C-F则以下语句运行后输出结果是( )。d$=“321“f=“654“print d+f$(分数:2.00)A.321654B.975C.654321D.显示出错信息23.将任
15、意一个正的两位数 N 的个位数与十位数对换的表达式为( )。(分数:2.00)A.(N-Int(N/10)*10)*10+Int(N/10)B.N-Int(N)/10*10+Int(N)/10C.Int(N/10)+(N-Int(N/10)D.(N-Int(N/10)*10+Int(N/10)24.下列程序的执行结果是( )。Privaae Sub Form_ActivateDim score(3)As Integer,total As IntegerDim aa_score As Variantscore(1)=50:score(2)=14:score(3)=36total=0:i=0For
16、 Each aa_score In scorei=i+1total=total+aa_scorePrint i,aa_score,totalNextEnd Sub(分数:2.00)A.1 0 02 50 503 14 644 36 100B.1 50 502 14 643 36 100C.0 50 501 14 642 36 1003 36 100D.0 0 01 50 502 14 6425.下列程序的执行结果为( )。n=0j=1Do Until n2n=n+1j=j+n*(n+1)LoopPrint n;j(分数:2.00)A.0 1B.3 7C.3 21D.3 1326.在窗体上画一个
17、命令按钮,然后编写如下事件过程:Option Base 1Private Sub Command1_Click()Dim aa=Array(1,3,5,7,9)j=1Fori=5 To 1 Step-1s=s+a(i)*jj=j*10Next iPrint sEnd Sub运行上面的程序,单击命令按钮,其输出结果是( )。(分数:2.00)A.97531B.135C.975D.1357927.若要清除列表框的所有内容,则实现的方法是( )。(分数:2.00)A.RemoveitemB.ClsC.ClearD.以上均不可以28.下列不一定是传值的虚实结合方式的选项是( )。(分数:2.00)A.
18、调用过程时实参为表达式B.调用过程时实参为常量C.调用过程时实参为变量名D.调用过程时实参将变量名用括号括起来29.如果在一新建的工程中使用其他工程已设计好的窗体,可以采用( )步骤将其添加到当前工程中。(分数:2.00)A.使用“工程”菜单中的“添加窗体”命令打开“添加窗体”对话框,从“现存”选项卡中选择所需的窗体文件B.使用“工程”菜单中的“添加模块”命令打开“添加模块”对话框,从“现存”选项卡中选择所需的窗体文件C.在 Windows 资源管理器中直接双击所需的窗体文件D.不可以将已建立好的窗体文件添加到当前工程中30.在以下程序中,变量 S 为( )。DefDbl A-H O-ZDef
19、Int I-NS=1For I=1 To 20S=S*INext IPrintf“S=“,S(分数:2.00)A.字符串变量B.长整型变量C.单精度实型变量D.双精度实型变量31.声明一个变量为局部变量应该刚( )。(分数:2.00)A.GlobalB.PrivateC.StaticD.Public32.一个工程中含有窗体 Form1、Form2 和标准模块 Model1,如果在 Form1 中有语句 Public X As Integer,在 Model1 中有语句 Public Y As Integer,则以下叙述中正确的是( )。(分数:2.00)A.变量 X、Y 的作用域相同B.Y 的
20、作用域是 Model1C.在 Form1 中可以直接使用 XD.在 Form2 中可以直接使用 X 和 Y33.设有如下的记录类型:TypeStudentnumber As Stringname AS Stringage As IntegerEnd Type则正确引用该记录类型变量的代码是( )。(分数:2.00)A.Student.name=“张红“B.Dim s As Students.name=“张红“C.Dim s As Type Students.name=“张红“D.Dim s As Types.name=“张红“34.对下列二叉树(分数:2.00)A.B.C.D.35.从工程管理
21、角度,软件设计一般分为两步完成,它们是( )。(分数:2.00)A.概要设计与详细设计B.数据设计与接口设计C.软件结构设计与数据设计D.过程设计与数据设计二、填空题(总题数:10,分数:30.00)36.A=7,B=3,C=4,则表达式 A MOD 3+B3/C/5 的值为 1。(分数:2.00)填空项 1:_37.属性窗口的显示方式分为两种,即按 1 顺序和按分类顺序,分别通过单击相应的按钮来实现。(分数:2.00)填空项 1:_38.一个关系表的行称为_。(分数:2.00)填空项 1:_39.按“先进后出”原则组织数据的数据结构是_。(分数:2.00)填空项 1:_40.在打开一个自定义
22、对话框时,可以使用 1 方法来决定对话框窗体的显示模式。(分数:2.00)填空项 1:_编程实现加法运算,在两个文本框中输入加数,用标签表示结果,单击按钮进行计算,完成下列计算过程。Private Sub Command1_Click()Dim AAs Integer,B As IntegerA= (6) B=Val(Text2.Text)(7) =A+BEnd Sub(分数:4.00)填空项 1:_填空项 1:_在窗体上画一个命令按钮和一个文本框,其名称分别为 Command1 和 Text1,然后编写如下事件过程:Private Sub Command1_Click()Dim inData
23、 As StringText1.Text=“Open“d:/myfile.txt“Fo (8) As#1Do While (9) Input #1,inDataText1.Text=Text1.Text+inDataLoopClose #1End Sub程序的功能是,打开 D 盘根目录下的文本文件 myfile.txt,读取它的全部内容并显示在文本框中。请填空。(分数:4.00)填空项 1:_填空项 1:_设计两 CheckBox,一个显示粗体,一个显示斜体,通过对 CheckBox 的选择,在一个文本框中显示相应效果的文本,完成下列程序。Private Sub Form_Load()Chec
24、k1.Caption=“显示粗体“Check2.Caption=“显示斜体“Text1.Text=“Visual Basic6.0“End SubPrivate Sub Check1_Click()If (10) =1 ThenText1.FontBold=TrueElseText1.FontBold=FalseEnd IfEnd SubPrivate Sub Check2_Click()If Check2.Value=1 ThenText1. (11) =TrueElseText1. (12) =FalseEnd Sub(分数:6.00)填空项 1:_填空项 1:_填空项 1:_41.在窗体
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 213 答案 解析 DOC
