1、国家二级 VB机试（常用标准控件）模拟试卷 25及答案与解析 一、选择题 1 关于水平滚动条，如下叙述中错误的是 （ A）当滚动框的位置改变时，触发 Change事件 （ B）当拖动滚动条中的滚动框时，触发 Scroll事件 （ C） LargeChange属性是滚动条的最大值 （ D） Value是滚动条中滚动框的当前值 2 窗体上有一个名称为 VScroll1的滚动条，当用鼠标拖动滚动条中的滚动块时，触发的事件是 （ A） Click （ B） KeyDown （ C） DragDrop （ D） Scroll 3 以下不能触发滚动条 Change事件的操作是 （ A）拖动滚动框 （ B）
2、单击两端的滚动箭头 （ C）单击滚动框 （ D）单击滚动箭头与滚动框之间的滚动条 4 窗体上市一个名称为 VScroll1的垂直滚动条，要求程序运行时，滚动块的初始位置在最下端，应该使 VScroll1 Value的值等于 （ A） VScroll1 LargeChange （ B） VScroll1 SmallChange （ C） VScroll1 Max （ D） VScroll1 Min 5 窗体上有一个名称为 HScroll1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置 (即刻度值 )。下面能够实现上述操作韵事件过程是 （ A） Private Sub
3、 HScroll1_Change() Print HScroll1 Value 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 6 设窗体上有 1个水平滚动条，已经通过属性窗口把它的 Max属性设置为 1， Min属性设置为
4、 100。下面叙述中正确的是 （ A）程序运行时，若使滚动块向左移动，滚动条的 Value属性值就增加 （ B）程序运行时，若使滚动块向左移动，滚动条的 Value属性值就减少 （ C）由于滚动条的 Max属性值小于 Min属性值，程序会出错 （ D）由于滚动条的 Max属性值小于 Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动 7 设窗体上有一个水平滚动条 HScroll1和一个命令按钮 Command1，及下面的事件过程： Private Sub Form_Load() Private Sub Command1_Click() HScroll1 Min=0 HScroll1
5、 Value=70 HScroll1 Max=100 End SubEnd Sub程序运行时单击命令按钮，则滚动条上滚动块位置的图示是 8 窗体上有一个名称为 VScroll1的垂直滚动 条，为了设定单击滚动条两端箭头时的 Value增量值，应设置的属性是 （ A） LargeChange （ B） SmallChange （ C） Max （ D） Min 9 程序运行时，拖动滚动条上的滚动框，则所触发的事件是 （ A） Move （ B） Scroll （ C） Drag （ D） DragDrop 10 设窗体上有一个 Text1文本框和一个 HScroll1水平滚动条，并有下面的事件过
6、程： Private Sub HScroll1_Change() Text1=HScroll1 End Sub 在程序运行时，当把滚动框移动到最左边时，文本框中显示的是 100；当把滚动框移动到最右边时，文本框中显示的是 1。根据这些信息，下面的判断中错误的是 （ A）滚动条的 Max和 Min属性的值分别是 1和 100 （ B）滚动条的 Max和 Min属性的值分别是 100和 1 （ C）文本框中显示的是滚动条 Value属性的值 （ D）如果把滚动框移动到中间位置，文本框中将显示 50 11 设窗体上有 1个名称为 HScroll1的水平滚动条，其 Max、 Min属性分别设置为100
7、、 1；有 2个名称分别为 Option1、 Option2的单选按钮，其标题分别为 “30”、“50”；还有下面程序代码： Private Sub Option1_Click() Private Sub Option2_Click() HScrolll=Val(Optionl Caption) HScroll1=Val(Option2 Caption) End Sub End Sub 程序运行时，单击 Option2单选按钮，则滚动条上滚动框的位置是 （ A）在 最左边 （ B）在最右边 （ C）在中间 （ D）在中间偏左的位置 12 下列关于水平滚动条的叙述中，错误的是 （ A） Valu
8、e属性值表示单击滚动条两端的箭头时，滚动框向左或向右移动的增量 （ B） Scroll事件在鼠标拖动滚动框时产生 （ C）用鼠标拖动滚动框后，会触发 Change事件 （ D）单击滚动条两端箭头时，会触发 Change事件 13 下列关于滚动条的叙述中，错误的是 （ A）在滚动条内单击滚动框前面或后面的部位时，会触发 Scroll事件 （ B）在滚动条内拖动滚动框时，会触发 Scroll事件 （ C）在滚动条内拖动滚动框后，会触发 Change事件 （ D）单击滚动条两端的箭头时，会触发 Change事件 14 定时器的 Interval属性的值是一个整数，它表示的是 （ A）毫秒数 （ B）
9、秒数 （ C）分钟数 （ D）小时数 15 为了使每秒钟发生一次计时器实践，可以将其 Interval属性设置为 （ A） 1 （ B） 10 （ C） 100 （ D） 1000 16 窗体上有 1个名称为 Text1的文本框， 1个名称为 Timer1的计时器，且己在属性窗口将 Timer1的 Interval属性设置为 2000、 Enabled属性设置为 False。以下程序的功能是，单击窗体，则每隔 2秒钟在 Text1中显示一次当前时间。 Private Sub Form_Click() Private Sub Timer1_Timer() Timer1 _ Text1 Text=
10、Time() End Sub End Sub 为了实现上述功能，应该在横线处填入的内容为 （ A） Enabled=True （ B） Enabled=False （ C） Visible=True （ D） Visible=False 17 设窗体上有一个标签 Labell和一个计时器 Timerl， Timerl的 Interval属性被设置为 1000， Enabled属性被设置为 True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是 （ A） Private Sub Timerl_Timer() Labell Caption=True End Su
11、b （ B） Private Sub Timerl_Timer() Labell Caption=Time End Sub （ C） Private Sub Timer1_Timer() Labell Interval=1 End Sub （ D） Private Sub Timer1_Timer() For k=1 To Timer1 Interval Labell Caption=Timer Next k End Sub 18 窗体上有 1个名称为 Text1的文本框： 1个名称为 Timer1的计时器控件，其Interval属性值为 5000， Enabled属性值是 True。 Tim
12、er1的事件过程如下： Private Sub Timer1_Timer() Static flag As Integer Ifflag=0 Then flag=1： flag= flag End If If flag=1Then Text1 ForeColor=&HFF&HFF&为红色 Else Text1 ForeColor=&HC000&HC000&为绿色 End If End Sub 以下叙述 中正确的是 （ A）每次执行此事件过程时， flag的初始值均为 0 （ B） flag的值只可能取 0或 1 （ C）程序执行后，文本框中的文字每 5秒改变一次颜色 （ D）程序有逻辑错误，
13、Else分支总也不能被执行 19 设窗体上有一个名称为 Timer1的计时器控件，其 Interval属性被设置为 500，Enabled属性被设置为 True；还有一个名称为 Text1的文本框和下面的事件过程： Private Sub Timer1_Timer() Static xAs Long x=x+1： Text1=x End Sub 程序运行一段时间后，文本框中显示的是 100，则表示 （ A）程序已经运行了 100秒 （ B）程序已经运行了 100毫秒 （ C）程序已经运行了 50秒 （ D）文本框到窗体左边框的距离是 100 20 窗体上有一个名称为 Timer1的计时器控件，
14、一个名称为 Shape1的形状控件，其 Shape属性值为 3(Circle)。编写程序如下： Private Sub Form_Load() Private Sub Timer1_Timer() Shapel Top=0： Timer1 Interval=100 Static x As Integer End Sub Shapel Top=Shapel Top+100 x=x+1 If x Mod 10=0 Then Shapel Top=0 End If End Sub 以下关于上述程序的叙述中，错误的是 （ A）每执行一次 Timer1 Timer事件过程过程， x的值都在原有基础上增加
15、 1 （ B） Shapel每移动 10次回到起点，重新开始 （ C）窗体上的 Shapel由下而上移动 （ D） Shapel每次移动 100 21 窗体上有一个名称为 Labell的标签；一个名称为 Timer1的计时器，其 Enabled和 Interval属性分别为 True和 1000。编写如下程序： Dim n As Integer Private Sub Timerl_Timer() ch=Chr(n+Asc(“A“)： Label1 Caption=ch： n=n+1： n=n Mod 4 End Sub 运行程序，将在标签中 （ A）不停地依次显示字符 “A”、 “B”、 “
16、C”、 “D”，直至窗体被关闭 （ B）依次显示字符 “A”、 “B”、 “C”、 “D”各一次 （ C）每隔 1秒显示字符 “A”一次 （ D）每隔 1秒依次显示 26个英文字母中的一个 22 窗体上有一个名称为 Shapel并显示为圆的形状控件 (其 Width和 Height属性值相等 )，一个名称为 Timerl的计时器，并有下面程序代码： Dim r As Single， flag As Integer Private Sub Form_Load0 r=Shapel Width Timerl Enabled=True Timerl Interval=500 End Sub Priva
17、te Sub Timerl_Timer() If flag=0 Then Shapel Width=Shapel Width-10 If Shapel 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 运行程序后产生的结果是 （ A）圆逐渐缩小， 再逐渐增大，然后再逐渐缩小，依此往复 （ B）圆一直在缩小 （ C）圆每隔 0 5秒向右移动一次 （ D）圆每隔 1秒向下移动一次 23 下列针对框架控件的叙述中，错误
18、的是 （ A）框架是一个容器控件 （ B）框架也有 Click和 DblClick事件 （ C）框架也可以接受用户的输入 （ D）使用框架的主要目的是对控件进行分组 24 要使两个单选按钮属于同一个框架，下面三种操作方法中正确的是 先画一个框架，再在框架中画两个单选按钮 先画一个框架，再在框架外画两个单选按钮，然后把单选按钮拖到框架中 先画两 个单选按钮，再画框架将单选按钮框起来 （ A） （ B） （ C） （ D） 和 25 下面哪个属性肯定不是框架控件的属性 （ A） Text （ B） Caption （ C） Left （ D） Enabled 26 如果在框架中画了 2个复选框，且
19、框架的 Enabled属性被设置为 False， 2个复选框的 Enabled属性被设置为 True，则下面叙述中正确的是 （ A） 2个复选框可用 （ B） 2个复选框不可用 （ C） 2个复选框不显示 （ D）上述都不对 27 如果要在窗体上使用 2组单选按钮，每组都可以有一个被选中，则应该做的是 （ A）把 1组单选按钮画在窗体的左边，另 1组画在右边 （ B）先画 2组单选按钮，再画 2个框架控件把 2组单选按钮分别框起来 （ C）先画 2个框架控件，再把 2组单选按钮分别画在不同的框架中 （ D）因为 1个窗体中只有 1个单选按钮可以被选中，所以需要使用 2个窗体 28 以下关于框架
20、的叙述中，错误的是 （ A）框架能够响应 Click事件 （ B）框架是一个容器 （ C）框架的 Enabled属性为 False时，框架内的控件均被屏蔽 （ D）框架可以获得焦点 29 以下可以作为 “容器 ”的控件是 （ A）框架 （ B）图像框 （ C）标签 （ D）命令按钮 30 窗体上有名称为 Commandl的命令按钮和名称为 Textl的文本框 Private Sub Commandl_Click() Textl Text=“程序设计 “ Textl SetFocus End Sub Private Sub Textl_GotFocus0 Textl Text=“等级考试 “ E
21、nd Sub 运行以上程序，单击命令按钮后 （ A）文本框中显示 的是 “程序设计 ”，且焦点在文本框中 （ B）文本框中显示的是 “等级考试 ”，且焦点在文本框中 （ C）文本框中显示的是 “程序设计 ”，且焦点在命令按钮上 （ D）文本框中显示的是 “等级考试 ”，且焦点在命令按钮上 31 以下能够设置控件焦点的方法是 （ A） SetFocus （ B） GotFocus （ C） LostFocus （ D） TabStop 32 设窗体中有一个文本框 Text1，若在程序中执行了 Text1 SetFocus，则触发 （ A） Text1的 SetFocus事件 （ B） Text1
22、的 GotFOCUS事件 （ C） Text1的 LostFOCUS事件 （ D）窗体的 GotFocus事件 33 对于能够获得焦点的控件，若要使其不能接收焦点，应该 （ A）将 TabStop属性值设为 True （ B）将 TabStop属性值设为 False （ C）将 Tablndex属性值设为 0 （ D）将 Enabled属性值设为 False 国家二级 VB机试（常用标准控件）模拟试卷 25答案与解析 一、选择题 1 【正确答案】 C 【试题解析】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输 入的工具。 Value是滚动条中滚动框的当前值，当滚动条的 Vlalue
23、属性值改变时会触发 Changc事件。当拖动滚动条中的滚动框时，触发 Scroll事件。 LargeChange属性用于设置或返回单击滚动条中滚动框前面或后面的部位时， Value属性增加或减小的增量值； Max属性是滚动条的最大值。 【知识模块】 常用标准控件 2 【正确答案】 D 【试题解析】 当滚动条的 Value属性值改变时会触发 Change事件。当拖动滚动条中的滚动框时，触发 ScrolI事件。 【知识模块】 常用标准控 件 3 【正确答案】 C 【试题解析】 滚动条的 Change事件发生在通过以下方式使滚动条上滚动框的位置改变时。这些方式包括：单击滚动条两端的箭头、单击滚动条中
24、滚动框前面或后面的部位、拖动滚动框后释放时以及通过代码改变滚动条的 value属性值。 【知识模块】 常用标准控件 4 【正确答案】 C 【试题解析】 滚动条的 Max属性可返回或设置当滚动框处于垂直滚动条底部或水平滚动条最右位置时 Value属性值； Min属性可返回或设置当滚动框处于垂直滚动条顶部或水平滚动条最左位置时 Value属性值。 【知识模块】 常用标准控件 5 【正确答案】 A 【试题解析】 本题考查的考点是有关滚动条的属性和事件的。单击滚动条的箭头时将触发 Change事件，而滚动块的位置由 Value属性返回。 【知识模块】 常用标准控件 6 【正确答案】 A 【试题解析】
25、滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其 Max属性用于设置或返回滚动条所能表示的最大值， Min属性用于设置或返回滚动条所能表示的最小值。默认情况下， Max的值大于 Min的值，即当滚动块向右移动 时，其 Value属性值增加。如果希望滚动条显示的信息从较大数值向较小数值变化，可将 Min设置成大于 Max的值，此时当滚动块向左移动时，其 Value属性值增加。 【知识模块】 常用标准控件 7 【正确答案】 C 【试题解析】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其 Max属性用于设置或返回滚动条所能表示的最大值， Min属性用于设置
26、或返回滚动条所能表示的最小值。默认情况下， Max的值大于 Min的值，即当滚动块向右移动时，其 Value属性值增加。本题中 Max Min=100，则 Value值为 70的话，滚动块应该位于右侧三分之一处。 【知识模块】 常用标准控件 8 【正确答案】 B 【试题解析】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其 Max属性用于设置或返回滚动条所能表示的最大值， Min属性用于设置或返回滚动条所能表示的最小值。 LargeChange属性用于设置或返回单击滚动条中滚动框前面或后面的部位时， Value属性增加或减小的增量值； SmailChange属性用于设置或
27、返回单击滚动条两端的箭头时， Value属性增加或减小的增 量值。 【知识模块】 常用标准控件 9 【正确答案】 B 【试题解析】 当滚动条的 Value属性值改变时会触发 Change事件。当拖动滚动条中的滚动框时，触发 Scroll事件。 【知识模块】 常用标准控件 10 【正确答案】 B 【试题解析】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其 Max属性用于设置或返回滚动条所能表示的最大值， Min属性用于设置或返回滚动条所能表示的最小值。默认情况下。 Max的值大于 Min的值，即当滚动块向右移动时，其 Value属性值增加。滚动条的默认属性是 Value属
28、性。 【知识模块】 常用标准控件 11 【正确答案】 C 【试题解析】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其 Max属性用于设置或返回滚动条所能表示的最大值， Min属性用于设置或返回滚动条所能表示的最小值。滚动块向右移动时，其 Value属性值增加。Option2单选按钮的单击事件中，将把 Option2的标题即 50赋值给滚动条的 Value属性，使滚动框位于正中间。 【知识模块】 常用标准控件 12 【正确答案】 A 【试题解析】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。 Value是滚动条中滚动框的当前值，当滚动条的 Value
29、属性值改变时会触发 Change事件。当拖动滚动条中的滚动框时，触发 Scroll事件。 【知识模块】 常用标准控件 13 【正确答案】 A 【试题解析】 滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。 Value是滚动条中滚动框的当前值，当滚动条的 Value属性值改变时会触发 Chan-e事件。当拖动滚动条中的滚动框时，触发 Scroll事件。 【知识模块】 常用标准控件 14 【正确答案】 A 【试题解析】 计时器控件用以实现在规则的时间间隔触发其 Timer事件，执行有关事件过程代码，来完成对应功能。 Interval属性用于设置触发计时器的 Timer事件的时间间
30、隔，单位为 ms，值为 0时计时器不启用。 【知识模块】 常用标准控件 15 【正确答案】 D 【试题解析】 计时器控件 (Timer)用来完成有规律性时间间隔执行的任务，Interval属性用于设置计时器事件之间的间隔，以毫秒为单位。 【知识模块 】 常用标准控件 16 【正确答案】 A 【试题解析】 常借助计时器来完成有规律性时间间隔执行的任务， Enabled属性用于控制计时器是否开始启用， True为启用， False为停止。 【知识模块】 常用标准控件 17 【正确答案】 B 【试题解析】 本题考查的考点是有关计时器的。计时器的 Interval属性决定了每隔多长时间触发一次 Tim
31、er事件。本题中。 Interval设置为 1000，即每 1秒触发一次 Timer事件。在事件中把标签的 Caption属性设置成为当前时间，用 Time函数可以得到当前时间。 【知识模块】 常用标准控件 18 【正确答案】 C 【试题解析】 计时器控件 (Timer)用来完成有规律性时间间隔执行的任务，Interval属性用于设置计时器事件之间的间隔，以毫秒为单位。 本题在每 5秒执行一次的 Timer事件过程中，通过静态变量 flag值的交替变换 (即 1和 1之间 )来控制文本框中文字的颜色，值为 1时为绿色，值为 1时为红色。除程序刚启动第一次执行 Timer事件过程时，静态变量 f
32、lag的初始值为 0外，其余各次均为 1或 1。 【知识模块】 常用标准 控件 19 【正确答案】 C 【试题解析】 计时器控件用以实现在规则的时间间隔触发其 Timer事件，执行有关事件过程代码，来完成对应功能。 Interval属性用于设置触发计时器的 Timer事件的时间间隔，单位为 ms，值为 0时计时器不启用。使用 Static关键字定义的是静态局部变量，过程执行结束后仍然保留。所以文本框中显示 100代表计时器事件已经执行了 100次，也就是运行了 50秒。 【知识模块】 常用标准控件 20 【正确答案】 C 【试题解析】 在计时器事件中的变量 x是一个静态变量 ，事件结束后其值仍
33、然会保留，所以每执行一次 Timerl_rimer事件过程， x的值都在原有基础上增加 1；每次 x能被 10整除均令形状的 Top属性为 0，即回到起点；形状控件在计时器事件中每次 Top值均增加 100，即自上而下进行移动，每次 100。 【知识模块】 常用标准控件 21 【正确答案】 A 【试题解析】 本题中的变量 n在窗体的声明段使用 Dim声明，是一个窗体级变量：在计时器的 Timer事件中每次令 n加 1，如果超过了 4则将其除 4取余；即最后循环显示字符 “A”、 “B”、 “C”、 “D”。 【知识模块】 常用标准控件 22 【正确答案】 A 【试题解析】 本题在计时器的 Ti
34、mer事件中，如果 flag为 0，让圆的宽度逐渐减小，一直到 100以下，将 flag置为 1：如果 flag为 1，让圆的宽度逐渐增大，一直到大于原来的宽度 r则将 flag置为 0；则圆逐渐缩小，再逐渐增大，然后再逐渐缩小，依此往复。 【知识模块】 常用标准控件 23 【正确答案】 C 【试题解析】 框架 (Frame)是一个容器控件，用于将屏幕上的对象分组。框架不能接受用户的输入，也没有 Click和 DblClick事件。 【知识模块】 常用标准控件 24 【正确答案】 A 【试题解析】 框架 (Frame)是一个容器控件，用于将屏幕上的对象分组。在容器中添加控件有两种形式： 先画一
35、个容器，再在框架中画控件； 先画一个容器，再在容器外画控件，然后选中控件单击工具栏上的 “剪切 ”按钮，接下来选中容器，单击工具栏上的 “粘贴 ”按钮。 【知识模块】 常用标准控件 25 【正确答案】 A 【试题解析】 框架控件的 Caption属性用来显示说明性的文字， Left属性来指定框架左侧坐标， Enabled属 性用来指定框架是否可用。而 Text属性用于返回或设置文本框中的内容，具有该属性的控件有文本框、列表框、组合框等，不包括框架控件。 【知识模块】 常用标准控件 26 【正确答案】 B 【试题解析】 框架是一个容器控件，若其 Enabled属性被设置为 False，则无论其内
36、部的控件的 Enabled属性被设置为何值，控件都不可用。 【知识模块】 常用标准控件 27 【正确答案】 C 【试题解析】 框架 (Frame)是一个容器控件，用于将屏幕上的对象分组，单选按钮 (OptionButton)组用于提供多个选项间的唯一选择，因此若要使得每组中都有一个按钮被选中，需要将其使用框架分组。 【知识模块】 常用标准控件 28 【正确答案】 D 【试题解析】 框架是一个容器控件，可以响应单击事件和双击事件，但是一般不需编写这两个事件；框架的 Enabled属性为 False时，框架内的控件均被屏蔽：框架不是输入型控件，不能接受焦点。 【知识模块】 常用标准控件 29 【正
37、确答案】 A 【试题解析】 容器控件的特点是内部还能容纳其他的控件，图片框、窗体和框架都可以作为容器。 【知识模块】 常用标准控件 30 【正确答案】 B 【试题解析】 SetFocus方法用于将焦点移到指定的对象上，而当一个对象获得焦点时将触发其 GotFocus事件过程。 【知识模块】 常用标准控件 31 【正确答案】 A 【试题解析】 控件的 SetFocus方法可将焦点移到指定的对象上， GotFocus是失去焦点事件， LostFocus是得到焦点事件。 【知识模块】 常用标准控件 32 【正确答案】 B 【试题解析】 SetFoeus方法用于将焦点移到指定 的对象上，而当一个对象获得焦点时将触发其 GotFocus事件过程。 【知识模块】 常用标准控件 33 【正确答案】 D 【试题解析】 可以获得焦点的控件都有 TabStop属性，当该属性值为 True(默认 )时，表示可以接收焦点停留在该控件上；如果值设为 False，表示焦点不能在该控件上停留，即在用 Tab移动焦点时会跳过该控件，但仍然保持着它在 Tab顺序中的实际位置，鼠标选中控件依然能获得焦点，所以本题的正确选项应该是D)。 【知识模块】 常用标准控件
