2017年9月计算机等考二级VB模拟题及解析(4)

日期:03-01| http://www.59wj.com |VB模拟题|人气:720

2017年9月计算机等考二级VB模拟题及解析(4)

  .

  一 、选择题

  (1) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:

  Private Sub Command1_Click()

  Move 500,500

  End Sub

  程序运行后,单击命令按钮,执行的操作为

  A) 命令按钮移动到距窗体左边界、上边界各500的位置

  B) 窗体移动到距屏幕左边界、上边界各500的位置

  C) 命令按钮向左、上方向各移动500

  D) 窗体向左、上方向各移动500

  正确答案: B

  (2) 在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是

  A) TabStop

  B) Enabled

  C) Visible

  D) TabIndex

  正确答案: D

  (3) 以下定义数组或给数组元素赋值的语句中,正确的是

  A)Dim a As Variant

  a=Array(1,2,3,4,5)

  B)Dim a(10) As Integer

  a=Array(1,2,3,4,5)

  C)Dim a%(10)

  a(1) ="ABCDE"

  D)Dim a(3) ,b(3) As Integer

  a(0) =0

  a(1) =1

  a(2) =2

  b=a

  正确答案: A

  .
        www.59wj.com

  (4) 在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为

  A) For i=0 To List1.ListCount-1

  ……

  Next

  B) For i=0 To List1.Count-1

  ……

  Next

  C)For i=1 To List.ListCount

  ……

  Next

  D)For i=1 To List1.Count

  ……

  Next

  正确答案: A

  (5) 以下Case语句中错误的是

  A) Case 0 To 10

  B) Case Is>10

  C) Case Is>10 And Is<50

  D) Case 3, 5, Is>10

  正确答案: C

  .
        www.59wj.com

  (6) 以下关于图片框控件的说法中,错误的是

  A) 可以通过Print方法在图片框中输出文本

  B) 清空图片框控件中图形的方法之一是加载一个空图形

  C) 图片框控件可以作为容器使用

  D) 用Stretch属性可以自动调整图片框中图形的大小

  正确答案: D

  (7) 执行语句s=Len(Mid("VisualBasic",1,6) ) 后,s的值是

  A) Visual

  B) Basic

  C) 6

  D) 11

  正确答案: C

  (8) 以下叙述中错误的是

  A) 下拉式菜单和弹出式菜单都用菜单编辑器建立

  B) 在多窗体程序中,每个窗体都可以建立自己的菜单系统

  C) 除分隔线外,所有菜单项都能接收Click事件

  D) 如果把一个菜单项的Enabled属性设置为False,则该菜单项不可见

  正确答案: D

  (9) 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:

  Private Sub Command1_Click()

  a=12345

  Print Format$(a,"000.00")

  End Sub

  程序运行后,单击命令按钮,窗体上显示的是

  A) 123.45

  B) 12345.00

  C) 12345

  D) 00123.45

  正确答案: B

  .
        www.59wj.com

  (10) 以下叙述中错误的是

  A) 一个工程可以包括多种类型的文件

  B) Visual Basic应用程序既能以编译方式执行,也能以解释方式执行

  C) 程序运行后,在内存中只能驻留一个窗体

  D) 对于事件驱动型应用程序,每次运行时的执行顺序可以不一样

  正确答案: C

  (11) 以下关于函数过程的叙述中,正确的是

  A) 函数过程形参的类型与函数返回值的类型没有关系

  B) 在函数过程中,过程的返回值可以有多个

  C) 当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递

  D) 如果不指明函数过程参数的类型,则该参数没有数据类型

  正确答案: A

  (12) 以下关于变量作用域的叙述中,正确的是

  A) 窗体中凡被声明为Private的变量只能在某个指定的过程中使用

  B) 全局变量必须在标准模块中声明

  C) 模块级变量只能用Private关键字声明

  D) Static类型变量的作用域是它所在的窗体或模块文件

  正确答案: B

  (13) 确定一个控件在窗体上的位置的属性是

  A) Width和Height

  B) Width或Height

  C) Top和Left

  D) Top或Left

  正确答案: C

  .
        www.59wj.com

  (14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:

  Private Sub Command1_Click()

  Text1.Text="Visual"

  Me.Text1="Basic"

  Text1="Program"

  End Sub

  程序运行后,如果单击命令按钮,则在文本框中显示的是

  A) Visual

  B) Basic

  C) Program

  D) 出错

  正确答案: C

  .
        www.59wj.com

  (15) 以下关系表达式中,其值为False的是

  A) "ABC">"AbC"

  B) "the"<>"they"

  C) "VISUAL"=UCase("Visual")

  D) "Integer">"Int"

  正确答案: A

  (16) 语句Print 5/4*6\5 Mod 2的输出结果是

  A) 0

  B) 1

  C) 2

  D) 3

  正确答案: B

  (17) 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:

  Private Sub Command1_Click()

  strText=InputBox("请输入")

  Text1.Text=strText

  End Sub

  Private Sub Text1_Change()

  Label1.Caption=Right(Trim(Text1.Text) ,3)

  End Sub

  程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是

  A) 空

  B) abcdef

  C) abc

  D) def

  正确答案: D

  .
        www.59wj.com

  (18) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:

  Private Sub Command1_Click()

  x=-5

  If Sgn(x) Then

  y=Sgn(x∧2)

  Else

  y=Sgn(x)

  End If

  Print y

  End Sub

  程序运行后,单击命令按钮,窗体上显示的是

  A) -5

  B) 25

  C) 1

  D) -1

  正确答案: C

  .
        www.59wj.com

  (19) 一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句Public X As Integer,在Model1中有语句Public Y As Integer。则以下叙述中正确的是

  A) 变量X、Y的作用域相同

  B) Y的作用域是Model1

  C) 在Form1中可以直接使用X

  D) 在Form2中可以直接使用X和Y

  正确答案: C

  (20) 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是

  A) Drive1_Change

  B) Drive1_Click

  C) Dir1_Click

  D) Dir1_Change

  正确答案: A

  (21) 在窗体上画一个命令按钮(其Name属性为Command1) ,然后编写如下代码:

  Option Base 1

  Private Sub Command1_Click()

  Dim a

  s=0

  a=Array(1,2,3,4) ; j=1

  For i=4 To 1 Step-1

  s=s+a(i) *j

  j=j*10

  Next i

  Print s

  End Sub

  运行上面的程序,单击命令按钮,其输出结果是

  A) 4321

  B) 1234

  C) 34

  D) 12

  正确答案: B

  .
        www.59wj.com

  (22) 在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是A) Private Sub Text1_KeyPress(KeyAscii As Integer)

  If KeyAscii<65 Or KeyAscii>90 Then

  MsgBox"请输入大写字母"

  KeyAscii=0

  End If

  End Sub

  B) Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

  If KeyCode<65 Or KeyCode>90 Then

  MsgBox"请输入大写字母"

  KeyCode=0

  End If

  End Sub

  C) 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 Then

  MsgBox"请输入大写字母"

  End If

  End Sub

  D) Private Sub Text1_Change()

  If Asc(Text1.Text) >64 And Asc(Text1.Text) <91 Then

  MsgBox"请输入大写字母"

  End If

  End Sub

  正确答案: A

  .
        www.59wj.com

  (23) 假定在窗体(名称为Form1) 的代码窗口中定义如下记录类型:

  Private Type animal

  animalName As String *20

  aColor As String *10

  End Type

  在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:

  Private Sub Command1_Click()

  Dim rec As animal

  Open "c:\vbTest.dat"For Random As #1 Len=Len(reC)

  rec.animalName="Cat"

  rec.aColor="White"

  Put #1,,rec

  Close #1

  End Sub

  则以下叙述中正确的是

  A) 记录类型animal不能在Form1中定义,必须在标准模块中定义

  B) 如果文件c:\vbTest.dat不存在,则Open命令执行失败

  C) 由于Put命令中没有指明记录号,因此每次都把记录写在文件的末尾

  D) 语句"Put #1,,rec"将animal类型的两个数据元素写到文件中

  正确答案: D

  .
如果觉得《2017年9月计算机等考二级VB模拟题及解析(4)》VB模拟题,jsj不错,可以推荐给好友哦。
本文Tags: 计算机等级考试 - 模拟试题 - 计算机二级模拟试题 - VB模拟题,jsj,
在百度中搜索相关文章:2017年9月计算机等考二级VB模拟题及解析(4)
在谷歌中搜索相关文章:2017年9月计算机等考二级VB模拟题及解析(4)
在soso中搜索相关文章:2017年9月计算机等考二级VB模拟题及解析(4)
在搜狗中搜索相关文章:2017年9月计算机等考二级VB模拟题及解析(4)
相关分类导航|
热门推荐|