1、国家二级 VB机试（常用标准控件）-试卷 6及答案解析(总分：50.00，做题时间：90 分钟)一、选择题(总题数：25，分数：50.00)1.设 Label1、Command1、Text1、Check1 分别为标签、命令按钮、文本框、复选框的名称，则以下属性设置语句中，运行时不会出错的是（分数：2.00）A.Label1BackStyle=2B.Command1Style=1C.Text1ScroUBars=4D.Check1Value=22.如果把文本框的 Enabled属性设置为 False并运行程序，则以下叙述中正确的是（分数：2.00）A.文本框中的文本变为灰色，且不能将光标置于文本
2、框上B.文本框中的文本变为灰色，可以将光标置于文本框上，但不能改变文本框中的内容C.文本框中的文本变为灰色，可以改变文本框中的内容D.文本框中的文本正常显示，可以将光标置于文本框上，但不能改变文本框中的内容3.为了使文本框显示滚动条，除要设置 ScrollBars外，还必须设置的属性是（分数：2.00）A.AutoSizeB.AlignmentC.MultilineD.MaxLength4.文本框的 Locked属性被设置为 True后产生的效果是（分数：2.00）A.光标不能进入文本框B.不能使文本框中的文本左右滚动C.不能修改文本框中的文本D.在程序中不能引用文本框的内容5.以下关于图片框
3、、图像框的叙述中，正确的是（分数：2.00）A.图像框可以作为容器B.图片框的 Stretch属性用来自动调整图片框中图形内容的大小C.图片框可以通过 Print方法显示文本D.使用绘图方法能够在图像框上绘制图形6.下列描述中，错误的是（分数：2.00）A.图片框控件和图像框控件都支持 Print方法B.设计阶段，可以通过 Picture属性把图形文件装入图片框C.运行期间，可以用 LoadPicture函数把图形文件装入图片框D.运行期间，可以用 LoadPicture函数删除图片框中的图形7.要使图像框(Image)中的图像能随着图像框的大小伸缩，应该设置的属性及值是（分数：2.00）A.
4、AutoSize值为 TrueB.AutoRedraw值为 TrueC.Stretch值为 TrueD.BorderStyle值为 08.以下不属于 VB控件的是（分数：2.00）A.框架B.点C.直线D.形状9.下列控件中，不响应 Click事件的是（分数：2.00）A.框架B.标签C.图像框D.形状10.下列说法中，错误的是（分数：2.00）A.将焦点移至命令按钮上，按 Enter键，则引发命令按钮的 Click事件B.单击命令按钮，将引发命令按钮的 Click事件C.命令按钮没有 Picture属性D.命令按钮不支持 DblClick事件11.如果将命令按钮的访问键设置为“D”，以下不会
5、触发命令按钮 Click事件的操作是（分数：2.00）A.在命令按钮上单击鼠标左键B.在命令按钮上单击鼠标右键C.将焦点移至命令按钮上，并按 Enter键D.按组合键“Alt+D”12.要将单选按钮 Opt1设为被选中，应设置的属性是（分数：2.00）A.ValueB.SelectedC.EnabledD.SetFocus13.窗体上有名称为 List1的列表框。以下能够将列表框当前选定的列表项替换为字符串“Basic”的语句是（分数：2.00）A.List1AddItem“Basic“B.List1List(List1ListIndex)=“Basic“C.List1Text=“Basic“
6、D.以上都可以14.设窗体上有 1个名称为 List1的列表框，程序运行时，如果选中了第 3个列表项(最上面的列表项为第0个列表项)，则下面不成立的是（分数：2.00）A.List1Selected(List1ListIndex)的值为 TrueB.List1Selected(3)的值为 TrueC.List1List(3)的值为 TrueD.List1Listlndex 的值为 315.窗体上有 1个名称为 Command1的命令按钮；1 个名称为 List1、没有列表项的列表框。编写如下程序：Private Sub Command1_Click()Dim x As String，s As
7、String，temp As StringDim i As IntegerX=InputBox(“输入字符串“，“输入“)If x “ThenFor i=Len(x)To 1 Step-1S=Mid(x，i，1)If s “Thentemp=S+tempElseList1AddItem temps=“temp=“End IfNextList1AddItem tempElseMsgBox“输入内容为空!“End IfEnd Sub 程序运行后，单击命令按钮 Command1，并输入“Happy new year”，则在 List1中显示的内容为（分数：2.00）A.year New HappyB
8、.Happy new yearC.raey wen yppaHD.yppaH wen raey16.列表框中被选中的数据项的位置可以通过一个属性获得，这个属性是（分数：2.00）A.ListB.ListIndexC.TextD.IAstCount17.要使得文件列表框 Filel中只显示文件扩展名为 jpg的图片文件，则下列正确的语句是（分数：2.00）A.File1Pattem=“*jpg“B.File1Parent=“*jpg“C.File1Path=“*jpg“D.File1PaRem=“图片文件|*jpg“18.已知列表框控件 List1中已放入若干表项，下列关于 List1的叙述中错
9、误的是（分数：2.00）A.第一个表项的序号为 0B.没有选中任何一个表项时，Listlndex 属性的值为-1C.最后一个表项的序号为 ListCountD.可用 MultiSelect属性设置是否可多选19.窗体上有一个名称为 Combo1的组合框，一个名称为 Commandl的命令按钮。要求编写程序，在组合框中输入一个字符串，当单击命令按钮时，将该字符串逐项与组合框中原有列表项进行比较，若有相同列表项，则将其删除；若没有相同列表项，则将其添加到组合框中。现有人编写如下程序，以期实现上述功能：Private Sub Command1_Click()str1=Trim(Combo1Text)
10、flag=OIf str1 “ThenFor i=0 To Combo1ListCount-1If str1=Combo1List(i) ThenCombo1RemoveItem iCombo1Text=“flag=1End IfNextIf flag=1 Then Combo1AddhemCombo1TextEnd IfEnd Sub 程序中存在问题，以下关于程序问题的叙述中，正确的是（分数：2.00）A.For循环的循环初值 i应该从 1开始B.语句 Combo1Removeltem i 有错误C.语句 Combo1Addltem Combo1Text 有错，Combo1Text 的内容已
11、存在于组合框中D.应把程序倒数第 3行中的 If flag=1改为 If flag=020.设窗体上有 1个名称为 HScmll1的水平滚动条，其 Max、Min 属性分别设置为 100、1；有 2个名称分别为 Option1、Option2 的单选按钮，其标题分别为“30“、“50“；还有下面程序代码：Private Sub Option1_Click()HScmll1=Val(Option1Caption)End SubPrivate Sub Option2_Click()HScroll1=Val(Option2Caption)End Sub 程序运行时，单击 Option2单选按钮，则滚
12、动条上滚动框的位置是（分数：2.00）A.在最左边B.在最右边C.在中间D.在中间偏左的位置21.程序运行时，拖动滚动条上的滚动框，则所触发的事件是（分数：2.00）A.MoveB.ScrollC.DragD.DragDrop22.为了暂时关闭计时器，应把它的一个属性设置为 False。这个属性是（分数：2.00）A.VisibleB.TimerC.EnabledD.Interval23.窗体上有 1个 Timer1计时器，1 个 Shape1形状控件，还有下面程序代码：Dim flag As BooleanPrivate Sub Form_Load()flag=TrueTimer1Enabl
13、ed=TrueTimer1Interva1=1000End SubPrivate Sub Timer1 Timer()If flag ThenShape1Height=Shape1Height*2Shape1Width=Shape1Width*2ElseShape1Height=Shape1Height*05Shape1Width=Shape1Width*05End Ifflag=Not flagEnd Sub 执行程序所产生的效果是（分数：2.00）A.Shape1形状的尺寸在缩小到原来一半和恢复原状这 2种状态间切换，每秒切换一次B.Shape1形状的尺寸在扩大到原来 2倍后恢复原状这 2
14、种状态问切换，每秒切换一次C.Shape1形状的尺寸在缩小到原来一半和扩大到原来 2倍这 2种状态间切换，每秒切换一次D.Shape1形状的尺寸会不断扩大24.如果在框架中画了 2个复选框，且框架的 Enabled属性被设置为 False，2 个复选框的 Enabled属性被设置为 True，则下面叙述中正确的是（分数：2.00）A.2个复选框可用B.2个复选框不可用C.2个复选框不显示D.上述都不对25.对于能够获得焦点的控件，若要使其不能接收焦点，应该（分数：2.00）A.将 Tabstop属性值设为 TrueB.将 TabStop属性值设为 FalseC.将 TabIndex属性值设为
15、0D.将 Enabled属性值设为 False国家二级 VB机试（常用标准控件）-试卷 6答案解析(总分：50.00，做题时间：90 分钟)一、选择题(总题数：25，分数：50.00)1.设 Label1、Command1、Text1、Check1 分别为标签、命令按钮、文本框、复选框的名称，则以下属性设置语句中，运行时不会出错的是（分数：2.00）A.Label1BackStyle=2B.Command1Style=1C.Text1ScroUBars=4D.Check1Value=2 解析：解析：标签的 BackStyle属性只有 0、1 两个属性值；命令按钮的 Style属性是只读属性，必
16、须在属性窗口设置；文本框的 ScrollBars属性只有 0、1、2、3 四个属性值，并且必须在属性窗口设置。2.如果把文本框的 Enabled属性设置为 False并运行程序，则以下叙述中正确的是（分数：2.00）A.文本框中的文本变为灰色，且不能将光标置于文本框上 B.文本框中的文本变为灰色，可以将光标置于文本框上，但不能改变文本框中的内容C.文本框中的文本变为灰色，可以改变文本框中的内容D.文本框中的文本正常显示，可以将光标置于文本框上，但不能改变文本框中的内容解析：解析：Enabled 是用来设置控件是否可用。如果把文本框的 Enabled属性设置为 False并运行程序，文本框中的文
17、本变为灰色，且不能将光标置于文本框上。3.为了使文本框显示滚动条，除要设置 ScrollBars外，还必须设置的属性是（分数：2.00）A.AutoSizeB.AlignmentC.Multiline D.MaxLength解析：解析：为了使文本框显示滚动条，要将 ScrollBars的值设置为非 0的 1、2 或 3，还要设置Multiline属性为 True。4.文本框的 Locked属性被设置为 True后产生的效果是（分数：2.00）A.光标不能进入文本框B.不能使文本框中的文本左右滚动C.不能修改文本框中的文本 D.在程序中不能引用文本框的内容解析：解析：文本框控件 Locked属性
18、用于设置是否锁定，如设置为 True，则不能编辑该文本框。5.以下关于图片框、图像框的叙述中，正确的是（分数：2.00）A.图像框可以作为容器B.图片框的 Stretch属性用来自动调整图片框中图形内容的大小C.图片框可以通过 Print方法显示文本 D.使用绘图方法能够在图像框上绘制图形解析：解析：窗体控件、框架控件和图片框控件可以作为其他控件的容器，选项 A错误；图像框控件Stretch属性返回或设置一个值，该值用来指定一个图形是否要调整大小，以适应图像框控件的大小，选项 B错误；使用绘图方法能够在图片框上绘制图形，选项 D错误。6.下列描述中，错误的是（分数：2.00）A.图片框控件和图
19、像框控件都支持 Print方法 B.设计阶段，可以通过 Picture属性把图形文件装入图片框C.运行期间，可以用 LoadPicture函数把图形文件装入图片框D.运行期间，可以用 LoadPicture函数删除图片框中的图形解析：解析：图片框控件可以作为其他控件的容器，可以使用 Prim方法在其中显示文本，而图像框不具有这些功能。选 A。7.要使图像框(Image)中的图像能随着图像框的大小伸缩，应该设置的属性及值是（分数：2.00）A.AutoSize值为 TrueB.AutoRedraw值为 TrueC.Stretch值为 True D.BorderStyle值为 0解析：解析：图像框
20、控件的 Stretch属性用来调整图像框中图形内容的大小。它既可以通过属性窗口设置，也可通过程序设置。该属性的取值为 True或 Flase。当其属性值为 False时，将自动放大或缩小图像框中的图形以与图像框的大小相适应。8.以下不属于 VB控件的是（分数：2.00）A.框架B.点 C.直线D.形状解析：解析：形状控件(Shape)提供了显示一些规则图形的简易方法，通过设置形状控件 Shape属性值，可显示 6种图形：0-矩形、1-正方形、2-椭圆、3-圆、4-圆角矩形、5-圆角正方形。9.下列控件中，不响应 Click事件的是（分数：2.00）A.框架B.标签C.图像框D.形状 解析：解析
21、：形状控件不响应 Click事件。10.下列说法中，错误的是（分数：2.00）A.将焦点移至命令按钮上，按 Enter键，则引发命令按钮的 Click事件B.单击命令按钮，将引发命令按钮的 Click事件C.命令按钮没有 Picture属性 D.命令按钮不支持 DblClick事件解析：解析：按钮的 Picture属性可以给命令按钮指定一个图形，为了使用这个属性，必须把 Style属性设置为 1。单击命令按钮或将焦点移至命令按钮上，按 Enter键，都会引发命令按钮的 Click事件。命令按钮不支持 DblClick事件。11.如果将命令按钮的访问键设置为“D”，以下不会触发命令按钮 Clic
22、k事件的操作是（分数：2.00）A.在命令按钮上单击鼠标左键B.在命令按钮上单击鼠标右键 C.将焦点移至命令按钮上，并按 Enter键D.按组合键“Alt+D”解析：解析：命令按钮获取焦点的方法可以通过按 Tab键，鼠标单击对象或使用 Seffocus方法。A，C，D 都让命令按钮获得焦点并触发 Click事件。选 B。12.要将单选按钮 Opt1设为被选中，应设置的属性是（分数：2.00）A.Value B.SelectedC.EnabledD.SetFocus解析：解析：单选按钮 Opt1要设为选中，可通过设置 Value属性。设置单选按钮在执行时的两种状态：True表示选中。运行时该单选
23、按钮的圆圈中出现一个黑点。False(默认值)表示未选中。13.窗体上有名称为 List1的列表框。以下能够将列表框当前选定的列表项替换为字符串“Basic”的语句是（分数：2.00）A.List1AddItem“Basic“B.List1List(List1ListIndex)=“Basic“ C.List1Text=“Basic“D.以上都可以解析：解析：AddItem 用于将列表项添加到列表框。Text 属性是被选定的选项的文本内容。列表框的List属性用来列出表项的内容，也可以改变数组中的已有值，属性 ListIndex 用于返回当前选择的列表项的索引号。选项 B正确。14.设窗体上有
24、 1个名称为 List1的列表框，程序运行时，如果选中了第 3个列表项(最上面的列表项为第0个列表项)，则下面不成立的是（分数：2.00）A.List1Selected(List1ListIndex)的值为 TrueB.List1Selected(3)的值为 TrueC.List1List(3)的值为 True D.List1Listlndex 的值为 3解析：解析：List1Selected()返回的是一个项目的选择状态，返回的是布尔值；List1Listlndex 返回的是列表框 List1中当前选择项目的索引号码；List 属性的作用是罗列或设置表项中的内容。15.窗体上有 1个名称为
25、Command1的命令按钮；1 个名称为 List1、没有列表项的列表框。编写如下程序：Private Sub Command1_Click()Dim x As String，s As String，temp As StringDim i As IntegerX=InputBox(“输入字符串“，“输入“)If x “ThenFor i=Len(x)To 1 Step-1S=Mid(x，i，1)If s “Thentemp=S+tempElseList1AddItem temps=“temp=“End IfNextList1AddItem tempElseMsgBox“输入内容为空!“End
26、IfEnd Sub 程序运行后，单击命令按钮 Command1，并输入“Happy new year”，则在 List1中显示的内容为（分数：2.00）A.year New Happy B.Happy new yearC.raey wen yppaHD.yppaH wen raey解析：解析：List1AddItem 可以为列表框添加列表项。For 循环中通过 Mid函数从字符串中倒序取出字符，碰到空格时添加新列表项。选 A。16.列表框中被选中的数据项的位置可以通过一个属性获得，这个属性是（分数：2.00）A.ListB.ListIndex C.TextD.IAstCount解析：解析：列表
27、框控件的 ListIndex属性值是已选中的表项的位置。表项位置由索引值指定，第一项的索引值为 0，第二项为 1，以此类推。如果没有任何项被选中，ListIndex 的值将设置为-1。17.要使得文件列表框 Filel中只显示文件扩展名为 jpg的图片文件，则下列正确的语句是（分数：2.00）A.File1Pattem=“*jpg“ B.File1Parent=“*jpg“C.File1Path=“*jpg“D.File1PaRem=“图片文件|*jpg“解析：解析：PaRern 属性用来指定在文件列表框中显示文件的类型；Parent 属性可访问一个对象的父亲的属性、方法或控件；Path 属性
28、用来指定和返回当前目录。18.已知列表框控件 List1中已放入若干表项，下列关于 List1的叙述中错误的是（分数：2.00）A.第一个表项的序号为 0B.没有选中任何一个表项时，Listlndex 属性的值为-1C.最后一个表项的序号为 ListCount D.可用 MultiSelect属性设置是否可多选解析：解析：列表框控件 List1的序号从 0开始计算，最后一项的序号是 ListCount-1，因此答案选 C。19.窗体上有一个名称为 Combo1的组合框，一个名称为 Commandl的命令按钮。要求编写程序，在组合框中输入一个字符串，当单击命令按钮时，将该字符串逐项与组合框中原有
29、列表项进行比较，若有相同列表项，则将其删除；若没有相同列表项，则将其添加到组合框中。现有人编写如下程序，以期实现上述功能：Private Sub Command1_Click()str1=Trim(Combo1Text)flag=OIf str1 “ThenFor i=0 To Combo1ListCount-1If str1=Combo1List(i) ThenCombo1RemoveItem iCombo1Text=“flag=1End IfNextIf flag=1 Then Combo1AddhemCombo1TextEnd IfEnd Sub 程序中存在问题，以下关于程序问题的叙述中
30、，正确的是（分数：2.00）A.For循环的循环初值 i应该从 1开始B.语句 Combo1Removeltem i 有错误C.语句 Combo1Addltem Combo1Text 有错，Combo1Text 的内容已存在于组合框中D.应把程序倒数第 3行中的 If flag=1改为 If flag=0 解析：解析：组合框的 LastCount从 0开始；RemoveItem 和 AddItem后面跟的是索引。根据题意，在没有相同列表项时需要添加，所以语句应该为 flag=0。选 D。20.设窗体上有 1个名称为 HScmll1的水平滚动条，其 Max、Min 属性分别设置为 100、1；有
31、 2个名称分别为 Option1、Option2 的单选按钮，其标题分别为“30“、“50“；还有下面程序代码：Private Sub Option1_Click()HScmll1=Val(Option1Caption)End SubPrivate Sub Option2_Click()HScroll1=Val(Option2Caption)End Sub 程序运行时，单击 Option2单选按钮，则滚动条上滚动框的位置是（分数：2.00）A.在最左边B.在最右边C.在中间 D.在中间偏左的位置解析：解析：滚动条的 Value属性用于设置滚动滑块所处的位置。Max 和 Min属性分别设置滚动条
32、的最大值和最小值，水平滚动条的最左端为 Min，最右端为 Max，Max 的值减去 Min的值得到当前滚动条的刻度个数。单击 Option2单选按钮，滚动滑块的位置设置为 50，正好在整个滚动条的中间位置。因此，答案为 C。21.程序运行时，拖动滚动条上的滚动框，则所触发的事件是（分数：2.00）A.MoveB.Scroll C.DragD.DragDrop解析：解析：在滚动条内拖动滚动框时，触发产生 Scroll事件。22.为了暂时关闭计时器，应把它的一个属性设置为 False。这个属性是（分数：2.00）A.VisibleB.TimerC.Enabled D.Interval解析：解析：E
33、nabled 是用来设置控件是否可用，而 Visible是用来设置控件是否可见。计时器控件的Enabled属性设置为 False，则停止计数；设置为 True，则开始计数。23.窗体上有 1个 Timer1计时器，1 个 Shape1形状控件，还有下面程序代码：Dim flag As BooleanPrivate Sub Form_Load()flag=TrueTimer1Enabled=TrueTimer1Interva1=1000End SubPrivate Sub Timer1 Timer()If flag ThenShape1Height=Shape1Height*2Shape1Wid
34、th=Shape1Width*2ElseShape1Height=Shape1Height*05Shape1Width=Shape1Width*05End Ifflag=Not flagEnd Sub 执行程序所产生的效果是（分数：2.00）A.Shape1形状的尺寸在缩小到原来一半和恢复原状这 2种状态间切换，每秒切换一次B.Shape1形状的尺寸在扩大到原来 2倍后恢复原状这 2种状态问切换，每秒切换一次 C.Shape1形状的尺寸在缩小到原来一半和扩大到原来 2倍这 2种状态间切换，每秒切换一次D.Shape1形状的尺寸会不断扩大解析：解析：Form_Load 过程中设定 timer事件
35、定时触发，定时时间为 1秒；在 Timer1_Timer过程中，Shape1形状的尺寸在扩大到原来 2倍后恢复原状，然后退出。下一次 timer事件触发时继续这个过程。因此，选 B。24.如果在框架中画了 2个复选框，且框架的 Enabled属性被设置为 False，2 个复选框的 Enabled属性被设置为 True，则下面叙述中正确的是（分数：2.00）A.2个复选框可用B.2个复选框不可用 C.2个复选框不显示D.上述都不对解析：解析：对于框架来说，通常把 Enable属性设置为 True，这样才能保证框架内的对象是“活动”的。如果把框架的 Enable属性设置为 False，则其标题变
36、灰，其中的所有对象，包括文本框、命令按钮、复选框等其他对象都会被屏蔽，虽然显示但不可用。25.对于能够获得焦点的控件，若要使其不能接收焦点，应该（分数：2.00）A.将 Tabstop属性值设为 TrueB.将 TabStop属性值设为 FalseC.将 TabIndex属性值设为 0D.将 Enabled属性值设为 False 解析：解析：TabStop 属性是用来设置是否允许用户使用 Tab键将焦点移到该控件上，默认情况下是允许的。若其值为 True时，允许使用 Tab键将焦点移到该控件；否则，就不允许。 Tablndex 属性则是用来设置该控件的跳表顺序的，取值是一个整数，从 0开始依次类推，该属性的值小的将先获取焦点。 Enabled是用来设置控件是否可用。 根据题意，选项 D正确。
