电大VB程序设计形成性考核答案.doc

资料内容仅供您学习参考，如有不当或者侵权，请联系改正或者删除。
判断题: ( 共20题 每题2分)
1、 事件过程是由用户或系统事件触发的,因此在程序中不能调用事件过程。
参考答案: 错误
2、 某数组声明为字符型数组, 它们的初始值为False。
参考答案: 错误
3、 标签控件是专门用来显示信息的, 因此不能响应鼠标的单击事件。
参考答案: 错误
4、 窗体的Move方法不光能够移动窗体, 而且能够改变窗体的大小, 同时也会改变窗体的有关属性。
参考答案: 错误

5、 窗体的Enabeled属性为False时, 窗体上的按钮、 文本框等控件就不会对用户的操作作出反应。
参考答案: 正确
6、 使用Dim语句声明了一个变量以后, 还能够使用Redim语句把此变量重新声明为其它的类型。
参考答案: 正确
7、 一个使用Static语句声明的过程级静态变量, 能在该过程的多次调用之间保持它的值, 而且其它的过程也能够使用这个变量的值。
参考答案: 错误
8、 同一个过程中不能声明同名的变量; 在过程中不能声明与同一模块的模块级变量同名的静态过程级变量。
参考答案: 正确
9、 一个变量在刚被声明尚未被赋值之间没有值。
参考答案: 错误
10、 能够声明过程级自定义数据类型。
参考答案: 正确
11、 因为应用程序级和模块级范围不同, 因此能够在同一个窗体模块中声明同名的应用程序级变量和模块级变量。
参考答案: 正确
12、 If与End if必须成正确使用, 有一个if就有一个End if 与之对应。
参考答案: 正确
13、 在For循环的循环语句块中, 能够使用Next关键字提前结束循环。
参考答案: 正确
14、 声明一个过程时有几个形参, 则在调用该过程时就必须提供几个实参。
参考答案: 错误
15、 因为Function过程有返回值, 因此只能用在表示式中, 不能使用Call语句调用。
参考答案: 正确
16、 文本框只能显示单行文本, 要显示多行文本应该使用列表框控件。
参考答案: 错误
17、 标签控件所显示的文本只能在设计时设置, 在运行时不能改变。
参考答案: 错误
18、 当定时器控件的Interval属性值为0时, 会连续不断的发送Timer事件。
参考答案: 错误
19、 滚动条控件也可作为用户输入数据的一种方式。
参考答案: 正确
20、 当定时器控件的Interval属性值设置为0时, 会连续不断地激发Timer事件。
参考答案: 错误
单选题: ( 共30道试题, 每题1分)
1、 要在窗体的标题内显示”myfrm”,使用的语句是(      )

  A．Form1.Print"myfrm" 
  B．Form.Print"myfrm"
  C．Form.caption="myfrm"  
  D．Form1.caption="myfrm"

参考答案: D
2、 无论何种控件, 共同具有的属性是( 　  　)

  A．Text  
  B．Name 
  C．Caption 
  D．ForeColor

参考答案: B
3、 按照变量的作用域可将变量划分为(       )   

  A．公有、 私有、 系统 
  B．全局变量、 模块级变量、 过程级变量
  C．动态、 常数、 静态 
  D．Public、 Private、 Protected

参考答案: B
4、 确定一个控件在窗体上位置的属性是(        )

  A．Width或Height  
  B．Width和Height 
  C．Top或Left 
  D．Top和Left

参考答案: D
5、 下列关于变量的说法不正确的是(      ) 。

  A．局部变量是指那些在过程中用Dim语句或Static语句声明的变量
  B．局部变量的作用域仅限于声明它的过程
  C．静态局部变量是在过程中用Static语句声明的 
  D．局部变量在声明它的过程执行完毕后就被释放了

参考答案: D
6、 要绘制多种形状的图形, 需要设置Shape控件的(       ) 属性

  A．Borderstyle  
  B．Shape 
  C．FillStyle 
  D．Style

参考答案: B
7、 当Winsock控件处于关闭状态时, 其State属性的值是(      )

  A．0
  B．1
  C．2
  D．6

参考答案: A
8、 目录列表框的Path属性的作用是(      )

  A．显示当前驱动器或指定驱动器上的路径 
  B．显示当前驱动器或指定驱动器上的某目录下的文件名
  C．显示根目录下的文件名
  D．只显示当前路径下的文件

参考答案: A
9、 下列数据对象模型中采用OLE DB访问数据库的是( 　  　) 。

  A．DAC　
  B．ADO
  C．RDC
  D．RDC和ADO

参考答案: B
10、 使用ADO数据模型时, 使Recordset和 Connection对象建立连接的属性是( 　 　) 。

  A．CommandType 
  B．ActiveConnection 
  C．Open
  D．Execute

参考答案: B
11、 对于窗体, 保存文件时后缀名为( 　 　)

  A．.frm 
  B．.fm  
  C．.fmr 
  D．.frmm

参考答案: A
12、 以下说法错误的是(      )

  A．Visual Basic是一种可视化编程工具
  B．Visual Basic是面向对象的编程语言
  C．Visual Basic是结构化程序设计语言
  D．Visual Basic采用事件驱动编程机制

参考答案: C

13、 相对于传统编程语言, Visual Basic最突出的特点是( 　 　)

  A．可视化编程工具
  B．面向对象的程序设计
  C．结构化程序设计
  D．事件驱动编程机制

参考答案: B
14、 对于窗体, 下面( 　 　) 属性在程序运行时其属性设置起作用

  A．MaxButton
  B．BorderStyle
  C．Name 
  D．Left

参考答案: D
15、 要使Print方法在Form_load事件中起作用, 要对窗体的( 　 　) 属性进行设置。

  A．BackColor 
  B．ForeColor 
  C．AutoRedraw 
  D．Caption

参考答案: C
16、 若要使标签控件显示时不覆盖其背景内容, 要对( 　 　) 属性设置。

  A．BackColor 
  B．BorderStyle
  C．ForeColor  
  D．BackStyle

参考答案: D
17、 若要使命令按钮不可操作, 要对( 　 　) 属性设置。

  A．Enabled
  B．Visible 
  C．BackColor  
  D．Caption

参考答案: A
18、 文本框没有( 　  　) 属性。

  A．Enabled
  B．Visible   
  C．BackColor 
  D．Caption

参考答案: D
19、 不论何对象, 都具有( 　 　) 属性。

  A．Text   
  B．Name 
  C．ForeColor
  D．Caption

参考答案: B
20、 要使某控件在运行时不可显示, 应对( 　 　) 属性进行设置。

  A．Enabled
  B．Visible 
  C．BackColor 
  D．Caption

参考答案: B
21、 要使窗体在运行时没有最大化按钮, 只要对( 　 　) 属性设置即可。

  A．MaxButton 
  B．BorderStyle  
  C．Width 
  D．MinButton

参考答案: A
22、 当运行程序时　, 系统自动执行启动窗体的( 　 　) 事件过程。

  A．Load  
  B．Click
  C．UnLoad 
  D．MinButton

参考答案: A
23、 改变控件在窗体中的左右位置应修改该控件的( 　 　) 属性。

  A．Top 
  B．Left
  C．Width 
  D．Right

参考答案: B
24、 函数Int(Rnd*100)是在( 　 　) 范围内的整数。

  A．(0,10)  
  B．(1,100) 
  C．0和(0,100 ) 
  D．(1,99)

参考答案: C
25、 如果X是一个正实数, 对X的第3位小数四舍五入的表示式是( 　 　) 。

  A．0.01*Int(X+0.005)   
  B．0.01*Int(100*(X+0.005))
  C．0.01*Int(100*(X+0.05))   
  D．0.01*Int(X+0.05)

参考答案: B
26、 已知变量A、 B、 C中C最小, 则判断A、 B、 C可否构成三角形的逻辑表示式为( 　 　) 。

  A．A>=B And B>=C And C>0  
  B．A+C>B And B+C>A And C>0 
  C．(A+B>C Or A-B<=C) And C>0  
  D．A+B>C And A-B >C And C>0

参考答案: B
27、 下面( 　 　) 是算术运算符。

  A．Imp 
  B．Mod  
  C．Not  
  D．Like

参考答案: B
28、 以下不是VB变量名命名规则的是: (      )

  A．变量名的第一个字符必须是字母、 汉字、 下划线和数字
  B． 变量名不包含小数点
  C．组成变量名的字符数不得超过255个字符
  D．变量名在同一范围内必须是唯一的

参考答案: A
29、 公用变量声明的语句是(        ) 。

  A．Static Count As Boolean  
  B．Dim Count As Integer
  C．Public Count As String * 6  
  D． Option Explicit

参考答案: C
30、 下列哪个语句是错误的VB语句(        )

  A．Text1.Text = "你好! "  
  B．Text1.Text = "你好! " : Text1.BackColor = Red
  C．Text1.Text = "你好! " ; Text1.BackColor = Red  
  D．Option Explicit

参考答案: C
单选题: ( 共6道试题, 每题5分)
1、
阅读程序, 程序运行时单击窗体后, 在窗体中显示c,k的值分别为(   )
Private Sub Form_Click()
Dim c As Integer, j As Integer, k As Integer
k = 0
c = 1
For j = 1 To 6
  If j > 4 Then
    c = c + 5
    Exit For
  Else
    k = k + 1
End If
Next j
Print c, k
End Sub

  A．4,4   
  B．6, 6 
  C．4, 6 
  D．6, 4

参考答案: D
2、 阅读程序, 程序运行时在文本框Text1中显示值为(   )
Private Sub Command1_Click()
Dim s As Double
Dim i As Integer
   s = 5
   i = 1
   Do While i < 9
      i = i + 2
      s = s + i
   Loop
   Text1.Text = s
End Sub

  A．26 
  B．27
  C．28
  D．29

参考答案: D
3、 阅读程序, 写出程序运行时单击窗体后, 窗体Form1上的结果为(   )
Private Sub Form_Click()
    Dim A(1 To 4) As String
    Dim c As Integer
    Dim j As Integer
    A(1) = "2"
    A(2) = "4"
    A(3) = "6"
    A(3) = "8"
    c = 1
    For j = 1 To 4
    c = c + Val(A(j))
    Next j
    Print c
End Sub

  A．16
  B．15
  C．18
  D．20

参考答案: B
4、 阅读程序, 写出程序运行时, 单击Command1后, 文本框Text1、 Text2和 Text3的输出结果为(   )
Private Sub Command1_Click()
  Dim n As Integer, y As Integer, x As Integer
  a = 1
Do While a < 20
    n = n + 1
    b = a + b
    a = a * (a + 1)
  Loop
  Text1.Text = n
  Text2.Text = a
  Text3.Text = b
End Sub

  A．3, 42, 9  
  B．3, 40, 10  
  C．4, 42, 9 
  D．3, 42, 8

参考答案: A
5、 阅读程序, 写出程序运行时, 单击Command1后, 文本框Text1、 Text2的输出结果为(   )
Private Sub Command1_Click()
  Dim A(1 To 5) As Integer
  Dim x As Integer
  For i = 1 To 5
    A(i) = i
  Next i
  i = 1
  Do While x < 3
    A(i) = A(i) * x
    x = x + 2
    i = i + 1
  Loop
  Text1.Text = A(1)
  Text2.Text = A(2)
End Sub

  A．0, 4    
  B．4, 10  
  C．4, 0 
  D．4, 2

参考答案: A
6、
阅读程序, 写出程序运行时, 单击窗体后, Form1上的输出结果为(   )
Private Sub Form_Click()
  Dim i As Integer, k As Integer
    k = 0
    For i = 1 To 4
        If i > 2 Then
k = k + 5
        Else
          k = k + 2
        End If
    Next i
Print i, k
End Sub

  A．5, 4  
  B．5, 14  
  C．4, 5 
  D．5, 10

参考答案: B