当前位置：文档库 › 国家二级VB机试(常用标准控件)模拟试卷21

国家二级VB机试(常用标准控件)模拟试卷21

国家二级VB机试（常用标准控件）模拟试卷21

(总分：58.00，做题时间：90分钟)

一、选择题(总题数：29，分数：58.00)

1.窗体上有一个名称为HScroll1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是

（分数：2.00）

A.Private Sub HScroll1_Change() Print HScroll1．Vahe End Sub √

B.Private Sub HScroll1_Change() Print HScroll1．SmallChange End Sub

C.Private Sub HScroll1_Scroll() Print HScroll1．Value End Sub

D.Private Sub HScroll1_Scroll() Print HScroll1．SmallChange End Sub

解析：解析：本题考查的考点是有关滚动条的属性和事件的。单击滚动条的箭头时将触发Change事件，而滚动块的位置由Value属性返回。

2.设窗体上有1个水平滚动条，己经通过属性窗口把它的Max属性设置为1，Min属性设置为100。下面叙述中正确的是

（分数：2.00）

A.程序运行时，若使滚动块向左移动，滚动条的Value属性值就增加√

B.程序运行时，若使滚动块向左移动，滚动条的Value属性值就减少

C.由于滚动条的Max属性值小于Min属性值，程序会出错

D.由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动

解析：解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其Max属性用于设置或返回滚动条所能表示的最大值，Min属性用于设置或返回滚动条所能表示的最小值。默认情况下，Max的值大于Min的值，即当滚动块向右移动时，其Value属性值增加。如果希望滚动条显示的信息从较大数值向较小数值变化，可将Min设置成大于Max的值，此时当滚动块向左移动时，其Value属性值增加。

3.设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1，及下面的事件过程： Private Sub Form_Load() Private Sub Command1_Click() HScroll1．Min=0 HScroll1．Value=70 HScroll1．Max=100

End Sub End Sub

（分数：2.00）

C. √

解析：解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其Max属性用于设置或返回滚动条所能表示的最大值，Min属性用于设置或返回滚动条所能表示的最小值。默认情况下，Max的值大于Min的值，即当滚动块向右移动时，其Value属性值增加。本题中Max-Min=100，则Value值为70的话，滚动块应该位于右侧三分之一处。

4.窗体上有一个名称为VScroll1的垂直滚动条，为了设定单击滚动条两端箭头时的Value增量值，应设置的属性是

（分数：2.00）

https://www.wendangku.net/doc/5f1830095.html,rgeChange

B.SmallChange √

C.Max

D.Min

解析：解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其Max属性用于设置或返回滚动条所能表示的最大值，Min属性用于设置或返回滚动条所能表示的最小值。LargeChange属性用于设置或返回单击滚动条中滚动框前面或后面的部位时，Value属性增加或减小的增量值；SmallChange 属性用于设置或返回单击滚动条两端的箭头时，Value属性增加或减小的增量值。

5.程序运行时，拖动滚动条上的滚动框，则所触发的事件是

（分数：2.00）

A.Move

B.Scroll √

C.Drag

D.DragDrop

解析：解析：当滚动条的Value属性值改变时会触发Change事件。当拖动滚动条中的滚动框时，触发Scroll 事件。

6.设窗体上有一个Text1文本框和一个HScroll1水平滚动条，并有下面的事件过程： Private Sub HScroll1_Change() Text1=HScroll1 End Sub 在程序运行时，当把滚动框移动到最左边时，文本框中显示的是100；当把滚动框移动到最右边时，文本框中显示的是1。根据这些信息，下面的判断中错误的是（分数：2.00）

A.滚动条的Max和Min属性的值分别是1和100

B.滚动条的Max和Min属性的值分别是100和1 √

C.文本框中显示的是滚动条Value属性的值

D.如果把滚动框移动到中间位置，文本框中将显示50

解析：解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其Max属性用于设置或返回滚动条所能表示的最大值，Min属性用于设置或返回滚动条所能表示的最小值。默认情况下，Max的值大于Min的值，即当滚动块向右移动时，其Value属性值增加。滚动条的默认属性是Value属性。

7.设窗体上有1个名称为HScroll1的水平滚动条，其Max、Min属性分别设置为100、1：有2个名称分别为Option1、Option2的单选按钮，其标题分别为“30”、“50”；还有下面程序代码： Private Sub Optionl_Click() Private Sub Option2_Click() HScroll1=Val(Optionl．Caption)

HScroll1=Val(Option2．Caption) End Sub End Sub 程序运行时，单击Option2单选按钮，则滚动条上滚动框的位置是

（分数：2.00）

A.在最左边

B.在最右边

C.在中间√

D.在中间偏左的位置

解析：解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其Max属性用于设置或返回滚动条所能表示的最大值，Min属性用于设置或返回滚动条所能表示的最小值。滚动块向右移动时，其Value属性值增加。Optiort2单选按钮的单击事件中，将把Option2的标题即50赋值给滚动条的Value属性，使滚动框位于正中间。

8.下列关于水平滚动条的叙述中，错误的是

（分数：2.00）

A.Value属性值表示单击滚动条两端的箭头时，滚动框向左或向右移动的增量√

B.Scroll事件在鼠标拖动滚动框时产生

C.用鼠标拖动滚动框后，会触发Change事件

D.单击滚动条两端箭头时，会触发Change事件

解析：解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。Value是滚动条中滚动框的当前值，当滚动条的Value属性值改变时会触发Change事件。当拖动滚动条中的滚动框时，触发Scroll事件。

9.下列关于滚动条的叙述中，错误的是

（分数：2.00）

A.在滚动条内单击滚动框前面或后面的部位时，会触发Scroll事件√

B.在滚动条内拖动滚动框时，会触发Scroll事件

C.在滚动条内拖动滚动框后，会触发Change事件

D.单击滚动条两端的箭头时，会触发Change事件

10.定时器的Interval属性的值是一个整数，它表示的是

（分数：2.00）

A.毫秒数√

B.秒数

C.分钟数

D.小时数

解析：解析：计时器控件用以实现在规则的时间间隔触发其Timer事件，执行有关事件过程代码，来完成对应功能。Interval属性用于设置触发计时器的Timer事件的时间间隔，单位为ms，值为O时计时器不启用。

11.为了使每秒钟发生一次计时器事件，可以将其Interval属性设置为

（分数：2.00）

A.l

B.10

C.100

D.1000 √

解析：解析：计时器控件(Timer)用来完成有规律性时间间隔执行的任务，Interval属性用于设置计时器事件之间的间隔，以毫秒为单位。

12.窗体上有1个名称为Text1的文本框，1个名称为Timer1的计时器，且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是，单击窗体，则每隔2秒钟在Text1中显示一次当前时间。Private Sub Form_Click() Private Sub Timer1_Timer() Timer1．________ Text1．Text=Time() End Sub End Sub 为了实现上述功能，应该在横线处填入的内容为

（分数：2.00）

A.Enabled=True √

B.Enabled=False

C.Visible=True

D.Visible=False

解析：解析：常借助计时器来完成有规律性时间间隔执行的任务，Enabled属性用于控制计时器是否开始启用，True为启用，False为停止。

13.设窗体上有一个标签Label1和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled 属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是

（分数：2.00）

A.Private Sub Timer1_Timer() Label1．Caption=True End Sub

B.Private Sub Timer1_Timer() Label1．Caption=TimeS End Sub √

C.Private Sub Timer1_Timer() Label1．Interval=1 End Sub

D.Private Sub Timer1_Timer() For k=1 To Timer1．Interval Label 1．Caption=Timer Next k End Sub 解析：解析：本题考查的考点是有关计时器的。计时器的Interval属性决定了每隔多长时间触发一次Timer。事件。本题中Interval设置为1000，即每1秒触发一次Timer事件。在事件中把标签的Caption属性设置成为当前时间，用Time函数可以得到当前时间。

14.窗体上有1个名称为Text1的文本框；1个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：Private Sub Timer1_Timer() Static flag As Integer Ifflag=0 Then flag=l：flag=-flag End If If flag=l Then Text1．ForeColor=＆HFF＆'＆HFF＆为红色Else Text1．ForeColor=＆HC000＆'＆HC000＆为绿色 End If End Sub 以下叙述中正确的是

（分数：2.00）

A.每次执行此事件过程时，flag的初始值均为0

B.flag的值只可能取0或1

C.程序执行后，文本框中的文字每5秒改变一次颜色√

D.程序有逻辑错误，Else分支总也不能被执行

解析：解析：计时器控件(Timer)用来完成有规律性时问间隔执行的任务，Interval属性用于设置计时器事件之间的间隔，以毫秒为单位。本题在每5秒执行一次的Timer事件过程中，通过静态变量flag值的交替变换(即-1和1之间)来控制文本框中文字的颜色，值为-1时为绿色，值为l时为红色。除程序刚启动第一次执行Timer事件过程时，静态变量flag的初始值为0外，其余各次均为-1或1。

15.设窗体上有一个名称为Timer1的计时器控件，其Interval属性被设置为500，Enabled属性被设置为True；还有一个名称为Text1的文本框和下面的事件过程：Private Sub Timer1_Timer() Static x As Long x=x+1：Text1=x End Sub 程序运行一段时间后，文本框中显示的是100，则表示

（分数：2.00）

A.程序已经运行了100秒

B.程序已经运行了100毫秒

C.程序已经运行了50秒√

D.文本框到窗体左边框的距离是100

解析：解析：计时器控件用以实现在规则的时间间隔触发其Timer事件，执行有关事件过程代码，来完成对应功能。Interval属性用于设置触发计时器的Timer事件的时间间隔，单位为ms，值为0时计时器不启用。使用Static关键字定义的是静态局部变量，过程执行结束后仍然保留。所以文本框中显示100代表计时器事件已经执行了100次，也就是运行了50秒。

16.窗体上有一个名称为Timer1的计时器控件，一个名称为Shapel的形状控件，其Shape属性值为

3(Circle)。编写程序如下： Private Sub Form Load() Private Sub Timer1 Timer(') Shapel．Top=0：Timer1．Interval=100 Static X As Integer End Sub Shape1．Top=Shape1．Top+100 x=x+1 If x Mod 10=0 Then Shapel．Top=0 End If End Sub 以下关于上述程序的叙述中，错误的是

（分数：2.00）

A.每执行一次Timer1 Timer事件过程，x的值都在原有基础上增加1

B.Shapel每移动10次回到起点，重新开始

C.窗体上的Shapel由下而上移动√

D.Shapel每次移动100

解析：解析：在计时器事件中的变量x是一个静态变量，事件结束后其值仍然会保留，所以每执行一次Timei1-Timer。事件过程，x的值都在原有基础上增加1；每次x能被10整除均令形状的Top属性为0，即回到起点：形状控件在计时器事件中每次Top值均增加100，即自上而下进行移动，每次100。

17.窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为True和1000。编写如下程序：Dim n As Integer Private Sub Timer1_Timer() ch=Chr(n+Asc("A"))：Label1．Caption=ch：n=n+1=n=n Mod 4 End Sub 运行程序，将在标签中

（分数：2.00）

A.不停地依次显示字符“A”、“B”、“C”、“D”，直至窗体被关闭√

B.依次显示字符“A”、“B”、“C”、“D”各一次

C.每隔1秒显示字符“A”一次

D.每隔1秒依次显示26个英文字母中的一个

解析：解析：本题中的变量n在窗体的声明段使用Dim声明，是一个窗体级变量；在计时器的Timer事件中每次令n加1，如果超过了4则将其除4取余；即最后循

18.窗体上有一个名称为Shapel并显示为圆的形状控件(其width和Height属性值相等)，一个名称为Timer1的计时器，并有下面程序代码： Dim r As Single，flag As Integer Private Sub Form Load() r=Shapel．Width Timer1．Enabled=True Timer1．Interval=500 End Sub Private Sub Timer1_Timer() Ifflag=0 Then Shapel．Width=Shapel．Width-10 IfShapel．Width<=100 Then flag=1 End If Else Shapel、Width=Shapel．Width+10 If Shapel．Width>=r Then flag=0 End If End If End Sub 运行程序后产生的结果是

（分数：2.00）

A.圆逐渐缩小，再逐渐增大，然后再逐渐缩小，依此往复√

B.圆一直在缩小

C.圆每隔0．5秒向右移动一次

D.圆每隔1秒向下移动一次

解析：解析：本题在计时器的Timer事件中，如果flag为0，让圆的宽度逐渐减小，一直到100以下，将flag置为1；如果flag为1，让圆的宽度逐渐增大，一直到大于原来的宽度r则将flag置为0：则圆逐渐缩小，再逐渐增大，然后再逐渐缩小，依此往复。

19.下列针对框架控件的叙述中，错误的是

（分数：2.00）

A.框架是一个容器控件

B.框架也有Click和DblClick事件

C.框架也可以接受用户的输入√

D.使用框架的主要目的是对控件进行分组

解析：解析：框架(Frame)是一个容器控件，用于将屏幕上的对象分组。框架不能接受用户的输入，也没有Click和DblClick事件。

20.要使两个单选按钮属于同一个框架，下面三种操作方法中正确的是①先画一个框架，再在框架中画两个单选按钮②先画一个框架，再在框架外画两个单选按钮，然后把单选按钮拖到框架中③先画两个单选按钮，再画框架将单选按钮框起来

（分数：2.00）

A.①√

B.②

C.⑨

D.②和③

解析：解析：框架(Frame)是一个容器控件，用于将屏幕上的对象分组。在容器中添加控件有两种形式：①先画一个容器，再在框架中画控件；②先画一个容器，再在容器外画控件，然后选中控件单击工具栏上的“剪切”按钮，接下来选中容器，单击工具栏上的“粘贴”按钮。

21.下面哪个属性肯定不是框架控件的属性

（分数：2.00）

A.Text √

B.Caption

C.Left

D.Enabled

解析：解析：框架控件的Caption属性用来显示说明性的文字，Left属性来指定框架左侧坐标，Enabled 属性用来指定框架是否可用。而Text属性用于返回或设置文本框中的内容，具有该属性的控件有文本框、列表框、组合框等，不包括框架控件。

22.如果在框架中画了2个复选框，且框架的Enabled属性被设置为False，2个复选框的Enabled属性被设置为True，则下面叙述中正确的是

（分数：2.00）

A.2个复选框可用

B.2个复选框不可用√

C.2个复选框不显示

D.上述都不对

解析：解析：框架是一个容器控件，若其Enabled属性被设置为False，则无论其内部的控件的Enabled 属性被设置为何值，控件都不可用。

23.如果要在窗体上使用2组单选按钮，每组都可以有一个被选中，则应该做的是

（分数：2.00）

A.把1组单选按钮画在窗体的左边，另l组画在右边

B.先画2组单选按钮，再画2个框架控件把2组单选按钮分别框起来

C.先画2个框架控件，再把2组单选按钮分别画在不同的框架中√

D.因为1个窗体中只有1个单选按钮可以被选中，所以需要使用2个窗体

解析：解析：框架(Frame)是一个容器控件，用于将屏幕上的对象分组，单选按钮(OptionButton)组用于提供多个选项间的唯一选择，因此若要使得每组中部有一个按钮被选中，需要将其使用框架分组。

24.以下关于框架的叙述中，错误的是

（分数：2.00）

A.框架能够响应Click事件

B.框架是一个容器

C.框架的Enabled属性为False时，框架内的控件均被屏蔽

D.框架可以获得焦点√

解析：解析：框架是一个容器控件，可以响应单击事件和双击事件，但是一般不需编写这两个事件：框架的．Enabled属性为False时，框架内的控件均被屏蔽：框架不是输入型控件，不能接受焦点。

25.以下可以作为“容器”的控件是

（分数：2.00）

A.框架√

B.图像框

C.标签

D.命令按钮

解析：解析：容器控件的特点是内部还能容纳其他的控件，图片框、窗体和框架都可以作为容器。

26.窗体上有名称为Command1的命令按钮和名称为Text1的文本框 Private Sub Command1_Click() Text1．Text="程序设计" Text1．SetFocus End Sub Private Sub Text1_GotFocus() Text1．Text="等级考试" End Sub 运行以上程序，单击命令按钮后

（分数：2.00）

A.文本框中显示的是“程序设计”，且焦点在文本框中

B.文本框中显示的是“等级考试”，且焦点在文本框中√

C.文本框中显示的是“程序设计”，且焦点在命令按钮上

D.文本框中显示的是“等级考试”，且焦点在命令按钮上

解析：解析：SetFocus方法用于将焦点移到指定的对象上，而当一个对象获得焦点时将触发其GotFocus 事件过程。

27.以下能够设置控件焦点的方法是

（分数：2.00）

A.SetFocus √

B.GotFocus

C.LostFocus

D.TabStop

解析：解析：控件的SetFocus方法可将焦点移到指定的对象上，GotFocus是失去焦点事件，LostFocus是得到焦点事件。

28.设窗体中有一个文本框Text1，若在程序中执行了Text1．SetFocus，则触发

（分数：2.00）

A.Text1的SetFocus事件

B.Text1的GotFOCUS事件√

C.Text1的LostFOCUS事件

D.窗体的GotFOCUS事件

解析：解析：SetFocus方法用于将焦点移到指定的对象上，而当一个对象获得焦点时将触发其GotFocus 事件过程。

29.对于能够获得焦点的控件，若要使其不能接收焦点，应该

（分数：2.00）

A.将TabStop属性值设为True

B.将TabStop属性值设为False

C.将TabIndex属性值设为0

D.将Enabled属性值设为False √

解析：解析：可以获得焦点的控件都有TabStop属性，当该属性值为True(默认)时，表示可以接收焦点停留在该控件上；如果值设为False，表示焦点不能在该控件上停留，即在用＜Tab＞移动焦点时会跳过该控件，但仍然保持着它在Tab顺序中的实际位置，鼠标选中控件依然能获得焦点，所以本题的正确选项应该是D)。