第七章单元测试
  1. 下列不能作为容器”(即可以在其中放置其他控件的是________


  2. A:窗体 B:框架 C:组合框
    D:图片框
    答案:组合框

  3. 下列叙述中错误的是________


  4. A:文本框控件支持Change事件
    B:图片框可以作为控件的容器
    C:可以使用Print方法在图片框上输出文字
    D:由于直线控件没有Move方法,所以直线控件在运行阶段不能移动
  5. 用于设置计时器事件产生间隔的属性是________


  6. A:Index
    B:Value
    C:Interval D:Tag
  7. 设形状控件的WidthHeight属性的值相等。下面叙述中正确的是________


  8. A:呈现的图形一定是圆 B:呈现的图形一定是正方形
    C:呈现的图形一定是矩形 D:呈现的图形一定不是矩形
  9. 设窗体上有2个框架,每个框架中有若干个单选按钮,下面叙述中正确的是________


  10. A:窗体上所有单选按钮中只有1个可以被选中
    B:每个框架中都有一个单选按钮可以被选中 C:如果某个框架的Enabled属性为True,则里面单选按钮的Enabled属性也都为True D:如果某个框架的Enabled属性为False,则里面的单选按钮一定都是未选中状态
  11. 在计时器控件中Interval属性的作用是________


  12. A:决定是否响应用户的操作
    B:设置计时器与窗体上边界之间的距离
    C:设置产生计时器事件的间隔 D:决定计时器事件产生的次数
  13. 决定对象拖放模式的属性是________

  14. A:DragIcon B:DragMode C:DragOver D:DragDrop
  15. 下列关于键盘事件的说法中正确的是________


  16. A:大键盘上的"1" 键和数字键盘上的"1"键的KeyCode码相同 B:按下键盘上的任意一个键都会引发KeyPress事件
    C:KeyDownKeyUp的事件过程中有KeyAscii参数 D:大键盘上"4"键的上档字符是"$",当同时按下Shift和大键盘上的"4" 键时,KeyPress事件过程的
  17. 在刚建立的EXE工程中,工具箱窗口中没有的控件是________


  18. A:形状 B:通用对话框 C:驱动器列表框 D:图像框
  19. 下面说法中错误的是________


  20. A:在设计阶段,把已复制到剪贴板上的图像粘贴到图片框或图像框中,可以将该图片装入图片框或图像框 B:为使名称为Timer1的计时器控件能每隔2秒触发一次Timer事件则在程序代码中应写的语句是Timer1.Interval = 2000 C:为使显示到图像框中的图像能根据图像框的大小自动缩放,则应将图像框的Stretch属性值设置为True D:可以将计时器控件的Enabled属性设置为False,使其不能触发Timer事件
  21. 要使图片框P1中显示当前路径下的图片文件img1.jpg则应使用的语句是________


  22. A:P1.Picture="img1.jpg"
    B:P1.Picture=LoadPicture("img1.jpg")
    C:LoadPicture("img1.jpg") D:P1.Image="img1.jpg"
  23. 窗体上有1个名称为List1、含有3个项目的列表框1个名称为Text1的文本框以及1Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒, List1中的3个项目能够依次在Text1中循环显示。

       Private Sub Timer1_Timer()

       Dim i As Integer

       Text1.Text = List1.List(i)

       i = i + 1

       If i = List1.ListCount Then

          i = 0

       End If

    End Sub

    运行程序发现有错误。以下正确的修改是________



  24. A:If语句的条件修改为 i <= List1.ListCount
    B:将语句Text1.Text = List1.List(i)i = i + 1交换位置
    C:Interval属性值改为100 D:将语句Dim i As Integer修改为Static i As Integer
  25. 在窗体上有一个Picture1图片框没有加载图片在当前文件夹下有一个位图文件pic02.bmp并有下面的程序代码

    Dim HasPic As Boolean

    Private Sub Picture1_Click()

        If HasPic Then

            Picture1.Picture = LoadPicture("")

        Else

            Picture1.Picture = LoadPicture("pic02.bmp")

        End If

        HasPic = Not HasPic

    End Sub

    关于这个程序运行时,下面叙述中正确的是________



  26. A:第一次单击图片框,会清空图片框,再单击图片框,则在其中显示一个图片 B:第一次单击窗体,会在图片框中显示一个图片,再单击窗体,则删除图片 C:第一次单击窗体,会清空图片框,再单击窗体,则在图片框中显示一个图片
    D:第一次单击图片框,会在其中显示一个图片,再单击图片框,则删除图片
  27. 以下叙述中错误的是________


  28. A:如果把一个菜单项的Enabled属性设置为False则该菜单项不可见 B:如果要在菜单中添加一条分隔线,则应将该菜单项的Caption属性设置为"-" C:在菜单标题中,由"&"所引导的字母指明了该菜单项的访问键 D:下拉式菜单和弹出式菜单都用菜单编辑器建立
  29. 窗体上有Text1Text2两个文本框并有以下过程

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

        Dim ch As String

        ch = LCase(Chr(KeyCode))

        Text2.Text = Chr(Asc(ch) + 2)

    End Sub

    程序运行时Text1中输入了字母"D"Text2中显示的是________



  30. A:D B:d C:f D:F
  31. 设窗体上有一个标签Label1并编写了下面的过程

    Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

      If Button = 1 Then

        Label1 = "X=" & X & "   Y=" & Y

      End If

    End Sub

    程序运行后的效果是________



  32. A:当移动鼠标时,鼠标的位置坐标会同步显示在标签中 B:当按下鼠标左键时,鼠标的位置坐标会同步显示在标签中 C:当按下鼠标右键并移动鼠标时,鼠标的位置坐标会同步显示在标签中 D:当按下鼠标左键并移动鼠标时鼠标的位置坐标会同步显示在标签中
  33. 程序运行时,当用鼠标点击滚动条两端的箭头按钮时,不会产生的结果是________


  34. A:激活Scroll事件
    B:改变Value属性的值 C:激活Change事件 D:滚动框移动
  35. 当复选框的Value属性值为1时,表示________



  36. A:该复选框不可用 B:选中该复选框
    C:没有选中该复选框
    D:该复选框不可见
  37. 以下关于图片框控件的说法中,正确的是________


  38. A:cls方法可以清除图片框中装入的图片 B:为使图像能自动适应图片框的大小,应将图片框的Stretch属性设置为False C:可以通过调用图片框的Print方法在图片框中输出文本 D:清空图片框控件中图形的方法之一是将其Picture属性的值设置为Null
  39. 当复选框控件被选中(即复选框控件内显示"√"标记)时,其Value属性的值为________


  40. A:True
    B:False
    C:1 D:0
  41. 设有一名称为mnuBold的下拉菜单项,程序运行时,希望达到如下效果:当第一次单击该菜单项时,其标题左侧显示"√",当第二次单击该菜单项时,其标题左侧的"√"消失,依此交替进行,...... 。则应在mnuBold_Click事件过程中书写的语句是________



  42. A:mnuBold.Checked = False B:mnuBold.Checked = IIf(mnuBold.Checked, True, False)
    C:mnuBold.Checked = True D:mnuBold.Checked = Not mnuBold.Checked
  43. 下列与鼠标拖放操作无关的是________


  44. A:Drag方法 B:DragDrop事件 C:KeyPress事件 D:DragOver事件
  45. 在窗体上画一个名称为Text1的文本框,然后编写以下事件过程:

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

      If _________________ Then

          Text1.SelStart = 0

          Text1.SelLength = Len(Text1.Text)

      End If

    End Sub

    要求程序运行时若输入焦点在Text1按下组合键Ctrl+A可以选取Text1内所有的文本则在横线处应填入的表达式是________



  46. A:Text1.KeyCode = 65 And Text1.Shift = 2 B:Text1.KeyCode = "A" And Text1.Shift = "Ctrl" C:KeyCode = 65 And Shift = 2 D:KeyCode = "A" And Shift = "Ctrl"
  47. 程序运行时若单击水平滚动条上滚动块右边的空白处,则其Value属性值的变化量为________


  48. A:Min属性的值
    B:LargeChange属性的值 C:SmallChange属性的值 D:Max属性的值
  49. 下列叙述中,正确的是________


  50. A:组合框是组合文本框和列表框的特性而成的控件,所以它具有二者的全部属性
    B:框架控件的标题不能在程序运行过程中修改
    C:文本框可以显示多行文本 D:标签中显示的文本在运行阶段不能改变
  51. 对于通用对话框控件,下列说法中错误的是________


  52. A:用保存文件对话框可以指定一个文件,由程序使用
    B:DefaultEXTDialogTitle属性只用于打开对话框,不能用于保存对话框 C:用打开文件对话框可以指定一个文件,由程序使用 D:用通用对话框控件可以建立打开文件对话框,也可以建立保存文件对话框
  53. 为了在程序运行时弹出一个菜单程序中应使用________


  54. A:所单击控件的PopupMenu方法 B:窗体的PopupMenu方法
    C:窗体的Show方法
    D:窗体的ShowMenu方法
  55. 下列叙述中错误的是__________


  56. A:文本框控件支持Change事件 B:由于直线控件没有Move方法,所以直线控件在运行阶段不能移动
    C:可以使用Print方法在图片框上输出文字 D:图片框可以作为控件的容器
  57. 用于设置计时器事件产生间隔的属性是__________


  58. A:Value
    B:Index
    C:Tag
    D:Interval
  59. 设窗体上有2个框架,每个框架中有若干个单选按钮,下面叙述中正确的是__________


  60. A:每个框架中都有一个单选按钮可以被选中
    B:窗体上所有单选按钮中只有一个可以被选中 C:如果某个框架的Enabled属性为False,则里面的单选按钮一定都是未选中状态
    D:如果某个框架的Enabled属性为True,则里面单选按钮的Enabled属性也都为True
  61. 在计时器控件中,Interval属性的作用是__________


  62. A:设置计时器与窗体上边界之间的距离 B:设置产生计时器事件的间隔
    C:决定是否响应用户的操作 D:决定计时器事件产生的次数
  63. 下列关于键盘事件的说法中正确的是__________


  64. A:按下键盘上的任意一个键都会引发KeyPress事件
    B:主键盘上"4"键的上档字符是"$",当同时按下Shift和主键盘上的"4" 键时,KeyPress事件过程的KeyAscii参数值是"$"的ASCII值
    C:KeyDownKeyUp的事件过程中有KeyAscii参数 D:主键盘上的"1" 键和数字键盘上的"1"键的KeyCode码相同

温馨提示支付 ¥3.00 元后可查看付费内容,请先翻页预览!
点赞(4) dxwkbang
返回
顶部