二级VB考前模拟题与答案解析-等级考试
外语考试 | 资格考试 | 计算机考试 | 学历考试 | 工程考试
证券金融论文 | 经济学论文 | 会计审计论文 | 工商管理论文 | 财政税收论文 | 管理论文
文化类论文 | 艺术学论文 | 社会学论文 | 教育学论文 | 工科论文 | 计算机论文 | 文学论文 哲学论文 | 政治论文 | 医学论文 | 法律论文 | 应用范文
·您现在的位置: 就学网 >> 考试中心 >> 计算机考试 >> 等级考试 >> 试题正文
二级VB考前模拟题与答案解析
文章来源:本站整理 浏览人数: 更新时间:2007-4-20

(17) 在Visual Basic中,要强制用户对所用的变量进行显式声明,这可以在哪里设置?
  A) "属性"对话框   
  B) "程序代码"窗口
  C) "选项"对话框   
  D) 对象浏览器

  答案:C

(18) 下列语句中,获得列表框List1中项目个数的语句是
  A) x=List1.ListCount   
  B) x=ListCount
  C) x=List1.ListIndex   
  D) x=ListIndex

  答案:A

(19) 要获得当前驱动器应使用驱动器列表框的属性是
  A) Path      
  B) Drive
  C) Dir      
  D) Pattern

  答案:B

(20) 如果将文本框的MaxLength属性设置为0,则文本框中的字符不能超过
  A) 8K      
  B) 16K
  C) 32K      
  D) 64K

  答案:C
(21) 当在滚动条内拖动滚动块时触发
  A) KeyUp事件    
  B) KeyPress事件
  C) Scroll事件     
  D) Change事件

  答案:C

(22) 设有声明语句
Dim b(-1 To 10, 2 To 9, 20) As Integer
则数组b中全部元素的个数
  A) 2310      
  B) 2016
  C) 1500      
  D) 1658

  答案:B

(23) 设在窗体上有个文本框,然后编写如下的事件过程:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
   Const Alt=4
   Const Key_F2=&H71
   altdown%=(Shift And Alt) > 0
   f2down%=(KeyCode=Key_F2)
   If altdown% And f2down% Then
     Text1.Text="BBBBB"
   End If
End Sub
上述程序运行后,如果按 【Shift+F2】 ,则在文本框中显示得是
  A) Alt+F2     
  B) BBBBB
  C) 随机出几个数    
  D) 文本框平均内容无变化

  答案:D

(24) 设已经在"菜单编辑器"中设计了窗体的快捷菜单,其顶级菜单为Bs,取消其"可见"属性,运行时,在以下事件过程中,可以使快捷菜单响应鼠标右键菜单的是
  A) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
         X As Single, Y As Single)
     If Button=2 Then PopupMenu Bs, 2
   End Sub
  B) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
         X As Single, Y As Single)
     PopupMenu Bs
   End Sub
  C) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
         X As Single, Y As Single)
     PopupMenu Bs,0
   End Sub
  D) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
         X As Single, Y As Single)
     If (Button=vbLeftButton) Or (Button=vbRightButton) Then PopupMenu Bs
   End Sub

  答案:A

(25) 下列程序的功能是调用字体对话框来设置文本框字体,单击按钮弹出对话框后,按Cancel键退出对话框,则
Private Sub Command1_Click()
   CommonDialog1.CancelError=True
   CommonDialog1.Flags=cdlCFEffects Or cdlDFBoth
   CommonDialog1.Action=4
   CommonDialog1.ShowFont
   Text1.Font.Name=CommonDialog1.FontName
   Text1.Font.Size=CommonDialog1.FontSize
   Text1.Font.Bold=CommonDialog1.FontBold
   Text1.Font.Italic=CommonDialog1.FontItalic
   Text1.Font.Underline=CommonDialog1.FontUnderline
   Text1.FontStrikethru=CommonDialog1.FontStrikethru
   Text1.ForeColor=CommonDialog1.Color
End Sub
  A) Text1的字体不发生变化  
  B) Text1的字体发生变化
  C) Text1的字体和颜色发生变化 
  D) 程序出错!

  答案:D

(26) 要将名为MyForm的窗体显示出来,正确的使用方法是
  A) MyForm.Show    
  B) Show.MyForm
  C) MyForm Load    
  D) MyForm Show

  答案:A

(27) 下列程序段的执行结果为
  a=5
  For k=1 To 0
    a=a + k
  Next k
  Print k; a
  A) -1 6      
  B) -1 16
  C) 1 5      
  D) 11 21

  答案:C

(28) 下列程序段的执行结果为
  a=3
  b=1
  For I=1 To 3
   f=a + b
   a=b
   b=f
   Print f
 Next I
  A) 4 3 6      
  B) 4 5 9
  C) 6 3 4      
  D) 7 2 8

  答案:B

(29) 下列程序段的执行结果为
  I=9
  x=5
  Do
   I=I + 1
   x=x + 2
  Loop Until I >=7
  Print "I="; I
  Print "x="; x
  A) I=4x=5     
  B) I=7x=15
  C) I=6x=8     
  D) I=10x=7

  答案:D

(30) 以下程序段运行时从键盘上输入字符"-",则输出结果为
  op$=InputBox("op=")
  If op$="+" Then a=a + 2
  If op$="-" Then a=a - 2
  Print a
  A) 2       
  B) -2
  C) 0       
  D) +2

  答案:B

(31) 以下程序段的输出结果为
  Dim l, a(10) , p(3)
  k=5
  For i=0 To 10
     a(i) =i
  Next i
  For i=0 To 2
     p(i) =a(i  (i + 1) )
  Next i
  For i=0 To 2
    k=k + p(i)  2
  Next i
  Print k
  A) 20      
  B) 21
  C) 56      
  D) 32

  答案:B

(32) 下列程序的执行结果为
  Private Sub Command1_Click()
   Dim x As Integer, y As Integer
   x=12: y=20
   Call Value(x, y)
   Print x; y
  End Sub
  Private Sub Value(ByVal m As Integer, ByVal n As Integer)
   m=m * 2: n=n - 5
   Print m; n
  End Sub
  A) 20  12     
     20  15
  B) 12  20     
     12  25
  C) 24  15     
     12  20
  D) 24  12       
     12  15

  答案:C

(33) 在窗体上画一个命令按钮,然后编写下列程序
  Private Sub Command3_Click()
   Tcl 2
   Tcl 3
   Tcl 4
  End Sub
  Sub Tcl(a As Integer)
   Static x As Integer
   x=x + a
   Print x;
  End Sub
程序运行后,单击命令按钮,输出结果为
  A) 2  3  4     
  B) 2  5  9
  C) 3  5  4     
  D) 2  4  3

  答案:B

(34) 下面程序段,运行后的结果是Private Sub Command1_Click()
   Dim b%(1 To 4) , i%, t#
   For i=1 To 4
      b(i) =i
   Next i
   t=Tof(b() )
   Print "t="; t,
  End Sub
  Function Tof(a() As Integer)
   Dim t#, i%
   t=1
   For i=2 To UBound(A)
      t=t * a(i)
   Next i
   Tof=t
  End Function
  A) t=18      
  B) t=24
  C) t=30      
  D) t=32
 
  答案:B

(35) 单击按钮时,以下程序运行后的输出结果是
 Private Sub Command1_Click()
   Dim x As Integer, y As Integer, z As Integer
   x=1: y=2: z=3
   Call God(x, x, z)
   Print x; x; z
   Call God(x, y, y)
   Print x; y; y
 End Sub
 Private Sub God(x As Integer, y As Integer, z As Integer)
   x=3 * z + 1
   y=2 * z
   z=x + y
 End Sub
   A) 6  6  12     
      7  11  11
   B) 8  5  10      
      5  11  11
   C) 9  6  12     
      9  10  15
   D) 8  10  10        
      5  9   10

  答案:A
填空题:

(1) 在树结构中,树根结点没有 【1】 。

    答案:前件
    解析: 在树结构中,每一个结点只有一个前件,称为父结点,没有前件的结点只有一个,称为树的根结点;每一个结点可以有多个后件,它们都称为该结点的子结点。没有后件的结点称为叶子结点。

(2) Jackson结构化程序设计方法是英国的M.Jackson提出的,它是一种面向 【2】 的设计方法。
 
    答案:数据结构
    解析: 结构化分析方法主要包括:面向数据流的结构化分析方法(SA-Structured analysis),面向数据结构的Jackson方法(JSD-Jackson system development method) 和面向数据结构的结构化数据系统开发方法(DSSD-Data structured system development method)。

(3) 面向对象的模型中,最基本的概念是对象和 【3】 。

    答案:类
    解析: 面向对象模型中,最基本的概念是对象和类。对象是现实世界中实体的模型化;将属性集和方法集相同的所有对象组合在一起,可以构成一个类。

(4) 软件设计模块化的目的是 【4】 。

    答案:降低复杂性
    解析: 模块化是指解决一个复杂问题时自顶向下逐层把软件系统划分成若干模块的过程,由此分解来降低复杂性。

(5) 数据模型按不同应用层次分成3种类型,它们是概念数据模型、 【5】 和物理数据模型。

   答案:逻辑数据模型
   解析:数据模型按不同层次分成概念数据模型、逻辑数据模型和物理数据模型三类。

上一页  [1] [2] [3] 下一页  



查看关于二级VB考前模拟题与答案解析的更多信息
  • 上一套试题:
  • 下一套试题:
  • :查看相关:
  • 二级JAVA考前模拟题与答案解析

  • 二级VF考前模拟题与答案解析二

  • 二级VF考前模拟题与答案解析一

  • 2007年报关员模拟考试习题与答案解析

  • 2007年教育学专业基础综合统考真题参考答案(部分)

  • 就学网 版权所有
    声明:就学网不享有[二级VB考前模拟题与答案解析]的版权