第七章测试1.
下列不能作为“容器”（即可以在其中放置其他控件）的是________。
A:图片框 B:组合框
C:窗体 D:框架
答案:B
2.
下列叙述中错误的是________。
A:文本框控件支持Change事件
B:由于直线控件没有Move方法，所以直线控件在运行阶段不能移动
C:可以使用Print方法在图片框上输出文字
D:图片框可以作为控件的容器
3.
用于设置计时器事件产生间隔的属性是________。
A:Index
B:Value
C:Interval D:Tag
4.
设形状控件的Width与Height属性的值相等。下面叙述中正确的是________。
A:呈现的图形一定不是矩形
B:呈现的图形一定是圆 C:呈现的图形一定是矩形 D:呈现的图形一定是正方形
5.
设窗体上有2个框架，每个框架中有若干个单选按钮，下面叙述中正确的是________。
A:每个框架中都有一个单选按钮可以被选中 B:如果某个框架的Enabled属性为True，则里面单选按钮的Enabled属性也都为True C:窗体上所有单选按钮中只有1个可以被选中
D:如果某个框架的Enabled属性为False，则里面的单选按钮一定都是未选中状态 6.
在计时器控件中，Interval属性的作用是________。
A:决定计时器事件产生的次数 B:决定是否响应用户的操作
C:设置产生计时器事件的间隔 D:设置计时器与窗体上边界之间的距离
7.决定对象拖放模式的属性是________。
A:DragOver B:DragDrop C:DragMode D:DragIcon 8.
下列关于键盘事件的说法中，正确的是________。
A:大键盘上"4"键的上档字符是"$"，当同时按下Shift和大键盘上的"4" 键时，KeyPress事件过程的 B:按下键盘上的任意一个键，都会引发KeyPress事件
C:KeyDown和KeyUp的事件过程中有KeyAscii参数 D:大键盘上的"1" 键和数字键盘上的"1"键的KeyCode码相同 9.
在刚建立的EXE工程中，工具箱窗口中没有的控件是________。
A:通用对话框 B:驱动器列表框 C:图像框 D:形状 10.
下面说法中错误的是________。
A:在设计阶段，把已复制到剪贴板上的图像粘贴到图片框或图像框中，可以将该图片装入图片框或图像框 B:为使名称为Timer1的计时器控件能每隔2秒触发一次Timer事件，则在程序代码中应写的语句是Timer1.Interval = 2000 C:为使显示到图像框中的图像能根据图像框的大小自动缩放，则应将图像框的Stretch属性值设置为True D:可以将计时器控件的Enabled属性设置为False，使其不能触发Timer事件 11.
要使图片框P1中显示当前路径下的图片文件img1.jpg，则应使用的语句是________。
A:P1.Image="img1.jpg"
B:LoadPicture("img1.jpg") C:P1.Picture="img1.jpg"
D:P1.Picture=LoadPicture("img1.jpg")
12.
窗体上有1个名称为List1、含有3个项目的列表框，1个名称为Text1的文本框，以及1个Interval属性值为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
运行程序，发现有错误。以下正确的修改是________。
A:将If语句的条件修改为 i <= List1.ListCount
B:将Interval属性值改为100 C:将语句Dim i As Integer修改为Static i As Integer
D:将语句Text1.Text = List1.List(i)与i = i + 1交换位置
13.
在窗体上有一个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
关于这个程序运行时，下面叙述中正确的是________。
A:第一次单击图片框，会清空图片框，再单击图片框，则在其中显示一个图片 B:第一次单击窗体，会在图片框中显示一个图片，再单击窗体，则删除图片 C:第一次单击窗体，会清空图片框，再单击窗体，则在图片框中显示一个图片
D:第一次单击图片框，会在其中显示一个图片，再单击图片框，则删除图片 14.
以下叙述中错误的是________。
A:下拉式菜单和弹出式菜单都用菜单编辑器建立 B:在菜单标题中，由"&"所引导的字母指明了该菜单项的访问键 C:如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见 D:如果要在菜单中添加一条分隔线，则应将该菜单项的Caption属性设置为"-" 15.
窗体上有Text1、Text2两个文本框，并有以下过程：
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中显示的是________。
A:f B:D C:F
D:d 16.
设窗体上有一个标签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
程序运行后的效果是________。
A:当按下鼠标左键时，鼠标的位置坐标会同步显示在标签中 B:当按下鼠标左键并移动鼠标时，鼠标的位置坐标会同步显示在标签中 C:当移动鼠标时，鼠标的位置坐标会同步显示在标签中 D:当按下鼠标右键并移动鼠标时，鼠标的位置坐标会同步显示在标签中 17.
程序运行时，当用鼠标点击滚动条两端的箭头按钮时，不会产生的结果是________。
A:滚动框移动
B:激活Scroll事件
C:改变Value属性的值 D:激活Change事件 18.
当复选框的Value属性值为1时，表示________。
A:选中该复选框
B:没有选中该复选框
C:该复选框不可见
D:该复选框不可用 19.
以下关于图片框控件的说法中，正确的是________。
A:为使图像能自动适应图片框的大小，应将图片框的Stretch属性设置为False B:清空图片框控件中图形的方法之一是将其Picture属性的值设置为Null C:可以通过调用图片框的Print方法在图片框中输出文本 D:用cls方法可以清除图片框中装入的图片 20.
当复选框控件被选中（即复选框控件内显示"√"标记）时，其Value属性的值为________。
A:0 B:False
C:1 D:True
21.
设有一名称为mnuBold的下拉菜单项，程序运行时，希望达到如下效果：当第一次单击该菜单项时，其标题左侧显示"√"，当第二次单击该菜单项时，其标题左侧的"√"消失，依此交替进行，...... 。则应在mnuBold_Click事件过程中书写的语句是________。
A:mnuBold.Checked = IIf(mnuBold.Checked, True, False)
B:mnuBold.Checked = False C:mnuBold.Checked = True D:mnuBold.Checked = Not mnuBold.Checked
22.
下列与鼠标拖放操作无关的是________。
A:Drag方法 B:DragDrop事件 C:DragOver事件
D:KeyPress事件 23.
在窗体上画一个名称为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内所有的文本，则在横线处应填入的表达式是________。
A:KeyCode = "A" And Shift = "Ctrl" B:Text1.KeyCode = 65 And Text1.Shift = 2 C:Text1.KeyCode = "A" And Text1.Shift = "Ctrl" D:KeyCode = 65 And Shift = 2 24.
程序运行时若单击水平滚动条上滚动块右边的空白处，则其Value属性值的变化量为________。
A:LargeChange属性的值 B:Max属性的值
C:SmallChange属性的值 D:Min属性的值
25.
下列叙述中，正确的是________。
A:组合框是组合文本框和列表框的特性而成的控件，所以它具有二者的全部属性
B:标签中显示的文本在运行阶段不能改变
C:框架控件的标题不能在程序运行过程中修改
D:文本框可以显示多行文本 26.
对于通用对话框控件，下列说法中错误的是________。
A:用打开文件对话框可以指定一个文件，由程序使用 B:DefaultEXT和DialogTitle属性只用于打开对话框，不能用于保存对话框 C:用保存文件对话框可以指定一个文件，由程序使用
D:用通用对话框控件可以建立打开文件对话框，也可以建立保存文件对话框 27.
为了在程序运行时弹出一个菜单，程序中应使用________。
A:窗体的ShowMenu方法
B:窗体的PopupMenu方法
C:窗体的Show方法
D:所单击控件的PopupMenu方法 28.
下列叙述中错误的是__________。
A:图片框可以作为控件的容器 B:文本框控件支持Change事件 C:由于直线控件没有Move方法，所以直线控件在运行阶段不能移动
D:可以使用Print方法在图片框上输出文字 29.
用于设置计时器事件产生间隔的属性是__________。
A:Interval
B:Index
C:Tag
D:Value
30.
设窗体上有2个框架，每个框架中有若干个单选按钮，下面叙述中正确的是__________。
A:每个框架中都有一个单选按钮可以被选中
B:如果某个框架的Enabled属性为False，则里面的单选按钮一定都是未选中状态
C:窗体上所有单选按钮中只有一个可以被选中 D:如果某个框架的Enabled属性为True，则里面单选按钮的Enabled属性也都为True
31.
在计时器控件中，Interval属性的作用是__________。
A:决定是否响应用户的操作 B:设置产生计时器事件的间隔
C:设置计时器与窗体上边界之间的距离 D:决定计时器事件产生的次数
32.
下列关于键盘事件的说法中，正确的是__________。
A:按下键盘上的任意一个键，都会引发KeyPress事件
B:主键盘上"4"键的上档字符是"$"，当同时按下Shift和主键盘上的"4" 键时，KeyPress事件过程的KeyAscii参数值是"$"的ASCII值
C:主键盘上的"1" 键和数字键盘上的"1"键的KeyCode码相同 D:KeyDown和KeyUp的事件过程中有KeyAscii参数
