【计算机类职业资格】计算机二级(VB)62及答案解析.doc
《【计算机类职业资格】计算机二级(VB)62及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】计算机二级(VB)62及答案解析.doc(25页珍藏版)》请在麦多课文档分享上搜索。
1、计算机二级(VB)62 及答案解析(总分:4230.00,做题时间:90 分钟)一、选择题(每小题 2 分,共 70 分) 下列各(总题数:60,分数:4200.00)1.新建一个窗体,其 Borderstyle 属性设置为 Fixed Single,但运行时却没有最大化和最小化按钮,可能的原因是 ( )。(分数:70.00)A.BorderStyle 的值设为 FixedSingle,此项设置值的作用即禁止最大化和最小化按钮B.窗体的 MaxButton 和 MinButton 值设为 FalseC.正常情况下新建的窗体都没有最大化和最小化按钮D.该窗体可用鼠标拖动边框的方法改变窗体的大小2
2、.以下合法的 Visual Basic 标识符是( )。 (分数:70.00)A.ForLoopB.ConstC.9abcD.a # x3.下面选项中不属于面向对象程序设计特征的是【 】(分数:70.00)A.继承性B.多态性C.类比性D.封装性4.设有下面的循环: i=0 While i=1 i=i + 3 Print i Wend 则运行后的输出结果是( )。 (分数:70.00)A.abB.abcC.abdD.abcd5.假定有如下的窗体事件过程: Private Sub Form_Click() a$ = “Microsoft Visual Basic“ b$ = Right(a$,
3、5) c$ = Mid(a$, 1, 9) MsgBox a$, 34, b$, c$, 5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是_。 (分数:70.00)A.Microsoft VisualB.MicrosoftC.BasicD.56.如下事件过程: Function Feed(x) If x 10 Then Feed=X Else Feed=10+x End If End Function Private Sub Command1_Click( ) x=Val(Input Box(“ “,0) pay=Feed(x) Print pay End Su
4、b 运行时在输入框内输入变量x 的值为 15,输出结果为( )。 (分数:70.00)A.1234B.foo barC.virtualD.34var7.下列程序段的执行结果为( )。 a=1 b=5 Do a=a+b b=b+l Loop While aA.LEFT(“VFP“,3)与 SUBSTR(“VFP“,2,3)B.YEAR(DATE()与 SUBSTR(DTOC(DATE(),7,2)sC.VARTYPE(“40-4*5“)与 VARTYPE(40-4*5)D.假定 A=“visual“,B=“foxpro“,则 A-B 与 A+B8.下列叙述中,正确的是( )。(分数:70.00)
5、A.任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器B.只有当代码窗口为当前活动窗口时,才能打开菜单编辑器C.只有当某个窗体为当前活动窗体时,才能打开菜单编辑器D.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令,打开菜单编辑器9.当复选框被选中时,复选框的 Value 属性的值为( )。(分数:70.00)A.0B.1C.2D.510.在用菜单编辑器设计菜单时,不可缺少的项目是( )。(分数:70.00)A.12B.15C.20D.6011.编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode AS Integer,Shift As In
6、teger) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住 Shift 键和锁定大写键时)运行程序,如果按“A“键,则程序输出的结果是( )。 (分数:70.00)A.PanelB.FrameC.AppletD.Dialog12.设有如下程序: Private Sub Command1_Click() Dim c As Integer, d As Integer c = 4 d = InputBox(“请输入一个整
7、数“) Do While d 0 If d c Then c = c + 1 End If d = InputBox(“请输入一个整数“) Loop Print c + d End Sub 程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、 9、0,则输出结果是_。 (分数:70.00)A.12B.11C.10D.913.Visual Basic 程序设计采用的编程机制是( )。(分数:70.00)A.方法是对象的一部分B.方法的调用格式和对象的属性的使用格式相同C.方法是一种特殊的过程和函数D.在调用方法时,对象名是不可缺少的14.在修改列表框内容时,Add
8、Item 方法的作用是( )。(分数:70.00)A.在列表框内插入一行文本B.在列表框中插入多行文本C.删除列表框中指定的项目D.清除列表框内的全部内容15.标签控件能够显示文本信息,决定其文本内容的属性是( )。(分数:70.00)A.AlignmentB.CaptionC.VisibleD.BorderStyle16.单击命令按钮时,下列程序的运行结果为( )。 Private Sub Command1_Click() Print MyFund(20,18) End Sub Public Function MyFund(m As Integer,n As Integer)As Integ
9、er Do While mn Do While mn:m=m-n:Loop Do While mn:n=n-m:Loop Loop MyFund=m End Function (分数:70.00)A.0B.2C.4D.617.假定一个 Visual Basic 应用程序由一个窗体模块和一个标准模块构成。为了保存该应 用程序,以下正确的操作是_。 (分数:70.00)A.只保存窗体模块文件B.分别保存窗体模块、标准模块和工程文件C.只保存窗体模块和标准模块文件D.只保存工程文件18.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程: Pr
10、ivate Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 1=1+3 n=n+1 If i10 Then Exit For Next Textl.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是【 】 (分数:70.00)A.5B.4C.3D.219.用来设置文本框有无滚动条的属性是( )。(分数:70.00)A.ScrollBarsB.MultiLineC.SelTextD.SelLength20.在窗体上画一个命令按钮,名称为 Command1,然后编写如下代码: Op
11、tion Base 0 Private Sub Commandl_Click() Dim A(4)As integer,B(4)As Integer For k=0 To 2 A(k+1)=InputBox(“请输入一个整数“) B(3-k)=A(k+1) Next k Print B(k) End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入 2、4、6,输出结果为【 】 (分数:70.00)A.0B.2C.3D.421.要设置窗体为固定对话框,并包含控制莱单栏和标题栏,但没有最大化和最小化控钮,设置的操作是( )。(分数:70.00)A.设置 BoderStyle 的值为 Fi
12、xed ToolWindowB.设置 BoderStyle 的值为 Sizable ToolWindowC.设置 BnderStyle 的值为 FixedDialogD.设置 BoderStyle 的佰为 Sizable22.Visual Basic 60 分为 3 种版本,不属于这 3 种版本的是( )。(分数:70.00)A.学习版B.专业版C.企业版D.业余版23.下列说法错误的是( )。(分数:70.00)A.方法是对象的一部分B.方法的调用格式和对象的属性的使用格式相同C.方法是一种特殊的过程和函数D.在调用方法时,对象名是不可缺少的24.对窗体编写如下事件过程: Option Ba
13、se 1 Private Sub Form_KeyPress (KeyAScii AS Integer) arr=Array(12,15,18,20,24) m1=arr(1) m2=1 If fKeyAscii=12 Then For i=2 To 5 If arr(i)m1 Then m1=arr(i) m2=i End If Next i End If Print m1 Print m2 End Sub 程序运行之后按回车键,输出结果为( )。 (分数:70.00)A.12 1B.20 2C.18 5D.24 1225.下面程序段执行结果为( )。 x=Iht(Rnd()+4) Sele
14、ct Case x Case 5 Print“excellent“ Case 4 Print“good“ Case 3 Print“paSS“ Case Else Print “fail“ End Select (分数:70.00)A.excellentB.goodC.passD.fail26.在以下事件过程中,可以在用户按下鼠标右键时,显示一个上边框,以鼠标当前位置为心的弹出式菜单,而且这个弹出式菜单还可以识别右键对菜单命令的选择,相应的选项是( )。 (分数:70.00)A.x=List1ListCountB.x=ListCountC.x=List1ListIndexD.x=ListInd
15、ex27.在窗体上画一个命令按钮和一个文本框,其名称分别为 Command1 和 Text1,把文本框 的 Text 属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() a = InputBox(“Enter an integer“) b = InputBox(“Enter an integer“) Text1.Text = b + a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入 8 和 10,则文本框中显示 的内容是_。 (分数:70.00)A.108B.18C.810D.出错28.在窗体上画一个通用对话框,其名称为 C
16、ommonDialog1,然后画一个命令按钮,并编写如下事件过程: Private Sub Commandl_Click() CommonDialog1.Filter=“All Files(*.*)|*.*| Text Files“ End Sub 程序运行后,如果在文本框中输入字母“a”,然后单击窗体,则在窗体上显示的内 容是_。 (分数:70.00)A.Visual BasicB.程序设计C.Visual Basic 程序设计D.a 程序设计44.要在 D 盘当前文件夹下建立一个名为 InfoBasedat 的顺序文件,应使用的语句是( )。(分数:70.00)A.Open“InfoBas
17、edat“For Output As #2B.Open“d:/InfoBasedat“For Output As #2C.Open“d:/InfoBasedat“For Input As #2D.Open“InfoBasedat“,For Input As #245.窗体上有 1 个名称为 List1 的列表框,其中已经输入了若干个项目(如图所示);还有 2 个文本框,名称分别为 Text1、Text2,1 个名称为 Command1 的命令按钮,并有以下程序 (分数:70.00)A.京B.北京南京C.南京北京D.没有匹配的项目46.在代码编辑器中,续行符是用来换行书写同一个语句的符号,用以表
18、示续行符的是( )。(分数:70.00)A.123B._nameC.classD.1first47.表达式 5 Mod 3+3/5*2 的值是( )。 (分数:70.00)A.0B.2C.4D.648.资源文件的扩展名是( )。(分数:70.00)A.将在文本框 Text1 输入的数字变为数值B.将在文本框 Text1 输入的数字作为半径,求圆的周长并转换为字符串C.只要 Text1 中的内容一改变,Text2 中显示的圆周长也随之改变D.事件过程中的 Val 函数和 Str 函数使用错误,事件过程不能执行49.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Pri
19、vate Sub Command1_Click() x = -5 If Sgn(x) Then y = Sgn(x 2) Else y = Sgn(x) End If Print y End Sub 程序运行后,单击命令按钮,窗体上显示的是( )。 (分数:70.00)A.-5B.25C.1D.-150.下面的数组声明中,正确的是( )。(分数:70.00)A.k=7 b=14B.k=6 b=6C.k=4 b=8D.k=1 b=751.如果将文本框的 MaxLength 属性设置为 0,则文本框中的字符不能超过( )。(分数:70.00)A.SELECT FROM 教师表 IF(性别=男)B.
20、SELECT 性别 FROM 教师表 IF(性别=男)C.SELECT * FROM 教师表 WHERE(性别=男)D.SELECT * FROM 性别 WHERE(性别=男)52.下列程序的执行结果为( )。 a=10 b=20 If a b Then a=a + b Else b=b-a Print a,b (分数:70.00)A.20 20B.30 20C.30 40D.15 1553.下面可以正确定义 2 个整型变量和 1 个字符串变量的语句是【 】(分数:70.00)A.Dim n,m As Integer,s As StringB.Dim a,b$,c As StringC.Dim
21、 a As Integer,b,c As StringD.Dim x,y As Integer,z As Suing54.在窗体上画一个文本框和一个计时器控件,名称分别为 Text1 和 Timer1,在属性窗口 中把计时器的Interval 属性设置为 1000,Enabled 属性设置为 False。程序运行后,如果单 击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程 序: Private Sub Command1_Click() Timer1._ End Sub Private Sub Timer1_Timer() Text1.Text = Time End
22、Sub 在下划线处应填入的内容是_。(分数:70.00)A.Enabled = TrueB.Enabled = FalseC.Visible = TrueD.Visible = False55.以下叙述中正确的是【 】(分数:70.00)A.窗体的 Name 属性指定窗体的名称,用来标识一个窗体B.窗体的 Name 属性值是显示在窗体标题栏中的文本C.可以在运行期间改变窗体的 Name 属性的值D.窗体的 Name 属性值可以为空56.下列说法错误的是( )。(分数:70.00)A.Caption 为只读属性,运行时对象的名称不能改变B.设置 Height 或 Width 的数值单位为 twi
23、p,是 1 点的 1/20C.Icon 属性用来设置窗体最小化时的图标D.用来激活属性窗口的快捷键是 F4 键57.单击命令按钮时,下列程序的运行结果为( )。 Private Sub Command1_Click() Print MyFund(20,18) End Sub Public Function MyFund(m As Integer,n As Integer)As Integer Do While mn Do While mn:m=m-n:Loop Do While mn:n=n-m:Loop Loop MyFund=m End Function (分数:70.00)A.int a
24、2 = 1,0,1,5,2,3;B.int a 3= 1,2,3,4,5,6;C.int a24= l,2,3,4,5,6 ;D.int a 3= 1,0,1, ,l,1 ;58.有如下程序: Private Sub Form_Click() Dim i As Integer, sum As Integer sum = 0 For i = 2 To 10 If i Mod 2 c Then c = c + 1 End If d = InputBox(“请输入一个整数“) Loop Print c + d End Sub 程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VB62 答案 解析 DOC
