1、第九章 控件综合试题一、填空题1. 在图片框上放置的控件称为图片框的(子)对象，而窗体是图片框的(父)对象。2. 窗体的“名称”(Name)属性只能在(属性窗口中)设置。3. 在程序中设置窗体 Form1 的 Caption 属性为主窗体，使用的赋值语句是(Form1.Caption=主窗体)。4. 当窗体的 Enabled 属性为(True)时，指定窗体响应事件。5窗体的 Unload 事件是在 QueryUnload 事件发生之(后)发生。6程序中，把当前窗体移动到屏幕左上角使用的方法为(Move0,0)。7. 在窗体 Form1 中坐标为(1600,800)的位置上输出字符串“Visua
2、l Basic 6.0”使用的语句为(Form1.Currentx=1600)、(Form1.Currenty=800)、和(Form1.Print VisualBasic6.0)。8. 若使文本框有边框，需设置 BorderStyle 属性的值为(1)。9. 在程序运行期间，用户可以用文本框显示信息。文本框接收输入的内容的属性是(Text)。10. 若使文本框内能够接受多行文本，则要设置 Multiline 属性的值为(True)。11要把图形文件“C:samplediannt.jpg”装载到图片框 Picture1 上，使用的语句为(Picturel.Picture=LoadPicture
3、(C:samplediannt.jpg)。12若使图片框自动调整大小以适应装入的图形，则要设置Autosize 属性的值为(True)。13. 除了在程序使用 LoadPicture 函数装载图形外，还可以在设计阶段通过修改 (Picture)属性装载图形。14. 若程序中要把一些文本内容输出到图片框 PictureBox，应使用(Print)方法。 15当单选按钮 OpdonButton 的 Value 属性为(False)时，表示该单选按钮处于未选中状态。16 若 使 命 令 按 钮Command1重 新 生 效 ， 则 使 用 的 赋 值 语 句 为(Command1.Enabled=T
4、rue) 。 17若使命令按钮不能接收和响应任何事件，可以设置Visible 属性的值为(False)。1318. 只有控件对象的 Enabled 和 Visible 属性值都为(True)时，该控件对象才能接受焦点。19. Tab 顺序是由建立控件时的(先后顺序)确定的。20. 设置框架 Frame 上的文本内容需要使用(Caption)属性。21. 在框架上可以设置一组相关控件，这些控件作为框架的(子)控件，它们具有总体的激活/屏蔽特性。22. 若屏蔽框架上的控件对象，则需设置(Enabled)属性的值为 False。23列表框 ListBox 中项目的序号从(0)开始，到(Listcou
5、nt-1)结束。24要显示列表框 List1 中序号为 3 项目内容，语句为(PrintList1.List(3)。25. 向组合框 Combo2 添加序号为 5，内容为“计算机学院”的项目，使用的语句为(Combo2.Addltem计算机学院，5)。26. 要删除组合框 Combo1 序号为 3 的项目，使用的语句为(Combo1.ReMoveltem 3)。27. 使用滚动条 ScrollBar 时，若要设置当用鼠标单击两个滚动箭头之间区域的滚动幅度，需要使用(LargeChange)属性。 28若要设置水平或垂直滚动条的最小值，需要使用(Min)属性。29. 计时器 Timer 每经过一
6、个由 InterVal 属性指定的时间间隔就会触发一次(Timer)事件。30. 若要使计时器每 0.5 钞钟触发一次 Timer，事件，则要把 InterVal 属性值设置为(500)。二、选择题 1窗体标题栏的显示内容由窗体的(b)属性决定。a) Nameb)CaptionC)BackColord)Enabled 2当窗体被装入内存时，系统将自动执行(a,b)事件过程。a)Loadb)ActivateC)Unloadd)QueryUnload 3在标签框上显示的内容由(b)属性来实现。a)Nameb)CaptionC)Textd)ForeColor 4要使标题在标签框内居中显示，Align
7、ment 属性的取值应为(c)。a)0b)1c)2d)3 5若使标签框根据所显示内容自动调整其大小，则可以通过设置( a)属性值为True 来实现。a)AutoSizeb)Alignmentc)Enabledd)Visible 6文本框没有(d)属性。a)BackColorb)Enabledc)Visibled)CaptiOn 7如果设置文本框最多可以接收的字符数，则可以使用(d)属性。a)Lengthb)MultilineC)Maxd)MaxLength 8在文本框中设置垂直滚动条，要使 ScrollBars 的值为(c)。a)0b)1c)2d)3 9在运行程序时，要使文本框获得焦点，则需使
8、用(b)方法。a)Changeb)SetFocusC)GotFocusd)Move 10下列控件中，没有 AutoSize 属性的是(b,d)。a)标签b)文本框c)图片框d)图像框11. 若把图片框 Picture1 中的图形清除，可以使用的语句是(b,c,d)。a) Picture1.Delb)Picture1.Picture=LoadPicture()C)Picture1.Picture=LoadPicture() d)Picture1.Picture=Nothing 12命令按钮上的文本内容由(b)属性来设置。a)Textb)Captionc)Named)Show 13若将命令按钮设置
9、为默认选择命令按钮，可以通过(c)属性来实现a)Valueb)CancelC)Defaultd)Enabled 14要使命令按钮失效，则可以设置(b)属性的值为 False 来实现。a)Valueb)Enabledc)Visibled)Cancel 15若使命令按钮在屏幕不可见，则可以通过修改(c)属性实现。a)Valueb)Enabledc)Visibled)Cancel 16当复选框 Value 属性值为(b)表示该复选框被选中。a)0b)1c)2d)3 17改变控件的 Tab 顺序可以修改(d)属性值。a)Visibleb)Enabledc)TabStopd)Tablndex 18下列控
10、件中(d)不能接收 GotFocus 和 LostFocus 事件。a)命令按钮b)组合框c)复选按钮d) 计 时 器 19要使列表框中的项目垂直滚动，应设置 Columns 属性值为(a)。a)0b)1c)2d)3 20若要得到列表框中项目的数目，可以访问(c)属性。a)Listb)ListlndexC)ListCountd)Text 21设置列表框的选择方式，应使用(b)属性。a)Columnsb)MultiSelectC)Styled)List 22若要清除列表框的所有项目内容，可以使用(c)方法。a)Addltemb)ReMoveC)Cleard)Print 23删除列表框中的某一个项
11、目，需要使用(d)方法。a)Clearb)ReMovec)Moved)ReMoveltem 24在组合框中选择某一项目内容，可以通过(d)属性获得。a)Listb)ListlndexC)ListCountd)Text25. 若要获得滚动条的当前位置，可以通过访问(a)属性实现。a)Valueb)MaxC)Mind)LargeChange26. 当用鼠标拖动滚动块时触发(b,c)事件。a) Moveb)ChangeC)Scrolld)GotFocus 27设置计时器的时间间隔可以通过(d)属性来实现。a)Valueb)TextC)Maxd)InterVal 28暂时关闭计时器，需设置(b)属性。
12、a)Visibleb)Enabledc)Lockd)Cancel 29下列控件中没有 Caption 属性的是 _B 。A）框架B）列表框C）复选框D）单选按钮30. 复选框的 Value 属性为 1 时，表示 B 。A）复选框未被选中 B）复选框被选中 C）复选框内有灰色的勾D）复选框操作有误31. 用来设置斜体字的属性是 A 。A）FontItalicB）FontBoldC）FontNameD）FontSize 32将数据项“China”添加到列表框 List1 中成为第二项应使用 A 语句。A）List1.AddItem “China”,1B）List1.AddItem “ China
13、”, 2C）List1.AddItem 1,“China”D）List1.AddItem 2,“ China ”33引用列表框 List1 最后一个数据项，应使用 _C 语句。A）List1.List(List1.ListCount）B）List1.List(ListCount) C）List1.List(List1.ListCount-1）D）List1.List(ListCount-1) 34假如列表框 List1 有四个数据项，那么把数据项“China”添加到列表框的最后，应使用 D 语句。A）List1.AddItem 3, “ China ”B ）List1.AddItem “ Ch
14、ina ”, List1.ListCount-1C ） List1.AddItem “ China ” , 3D ） List1.AddItem “ China ”， List1.ListCount35执行了下面的程序后，列表框中的数据项有 D 。Private Sub Form_Click()For i = 1 to 6 List1.AddItem iNext iFor i = 1 to 3 List1.RemoveItem iNext i End SubA）1，5，6B）2，4， 6C ）4，5，6D）1，3，5 36如果列表框 List1 中没有选定的项目，则执行List1.Remove
15、Item List1.ListIndex 语句的结果是 D 。A） 移去第一项 B 移去最后一项 C 移去最后加入列表中的一项 D 以上都不对 ( 出错)37. 如果列表框 List1 中只有一个项目被用户选定，则执行 （书上无此属性） Debug.Print List1.Selected(List1.ListIndex）语句的结果是 B 。A）在 Debug 窗口输出被选定的项目的索引值B）在 Debug 窗口输出 True C）在窗体上输出被选定的项目的索引值D）在窗体上输出 True38. 在窗体上画一个名称为 List1 的列表框，一个名称为 Label1 的标签，列表框中显示若干城市
16、的名称。但单击列表框中的某个城市名时，该城市名从列表框中消失，并在标签中显示出来。下列能正确实现上述操作的程序是_C 。A）Private Sub List1_Click()Label1.Caption=List1.ListIndex List1.RemoveItem List1.TextEnd SubB） Private Sub List1_Click()Label1.Name=List1.ListIndex List1.RemoveItem List1.TextEnd SubC） Private Sub List1_Click()Label1.Caption=List1.Text List
17、1.RemoveItem List1.ListIndexEnd SubD） Private Sub List1_Click()Label1.Name=List1.Text List1.RemoveItem List1.ListIndexEnd Sub 39下列说法中正确的是 D 。A）通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上 B）在列表框中不能进行多项选择 C）在列表框中能够将项目按字母从大到小排序 D）框架也有Click 和 DblClick 事件40为了防止用户随意将光标置于控件之上，应将进行 D 设 置 。 A）将控件的 TabIndex 属性设置为 0B）将控件的 T
18、abStop 属性设置为 True C）将控件的 TabStop 属性设置为FalseD）将控件的 Enabled 属性设置为False 41滚动条产生 Change 事件是因为 B 值改变了。A）SmallChangeB）ValueC）MaxD）LargeChange42. 如果要每隔 15s 产生一个 Timer 事件，则 Interval 属性应设置为 C 。A）15B） 900C ）15000D）15043. 列表框的 C 属性是数组。A）List 和 ListIndexB）List 和 ListCount C）List 和 SelectedD） List 和 Sorted44. 用户
19、在使用 ActiveX 控件之前，需要将他们加载到工具箱中，下面 A 操作可进行 ActiveX 控件的加载。A）工程-部件B）视图-工具箱C）工具-选项D）工程-引用45在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：Private Sub Form_Load () List1.AddItem357 List1.AddItem246 List1.AddItem123 List1.AddItem456 Text1.Text=End SubPrivate Sub List1_ DblClick ( ) a =List1.TextPrint a+Text1.Text End Sub程序
20、运行后，在文本框中输入789，然后双击列表框中的456，则输出结果为 B 。A）1245B） 456789C ）789456D）046. 在窗体上画一个列表框，然后编写如下两个事件过程： Private Sub Form_Click()List1.RemoveItem 1List1.RemoveItem 3List1.RemoveItem 2 End SubPrivate Sub Form_Load() List1.AddItem ItemA List1.AddItem ItemB List1.AddItem ltemC List1.AddItem ItemD List1.AddItem It
21、emEEnd Sub运行上面的程序，然后单击窗体，列表框中所显示的项目为 D 。A）ItemA 与 ItemBB）ItemB 与 ItemDC）ItemD 与 ItemED）ItemA与 ItemC47. 在窗体上画一个名称为 Text1 的文本框，然后画一个名称为 HScroll1 的滚动条，其Min 和 Max 属性分别为 0 和 100，程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值。以下能实现上述操作的程序段是 AA） Private Sub HScroll1_Change() Text1.Text = HScroll1.ValueEnd SubB） Private Sub
22、 HScroll1_Click() Text1.Text = HScroll1.ValueEnd SubC） Private Sub HScroll1_Change() Text1.Text = HScroll1.CaptionEnd SubD） Private Sub HScroll1_ Dblclick () Text1.Text = HScroll1.ValueEnd Sub48. 如果只允许在列表框中每次只能选择一个列表项时 ,则应将其 Multiselect 属性设置为： A_。A）0B）1C）2D）349. 要将一个组合框设置为简单组合框(Simple Combo),则应该将其St
23、yle 属性设置为 B 。A）0B）1C）2D）350. 设 Text1 为某一文本框名，下列程序段的输出结果是什么? 结果是：defgh 。 Text1.Text=abcdefghijkText1.selstart=3 Text1.sellength=5 PrintText1.SelText填空：下列程序段是允许用户按 Enter 键将一个组合框(CboComputer)中没有的项目添加到组合框中。Sub CboComputer_Keypress(KeyAscii As Integer) Dim flag As BooleanIf KeyAscii = 13 Then flag = FalseFor i = 0 To CboComputer.ListCount 1 If【1】Thenflag = True Exit forEnd If Next iIf【2】Then【3】ElseMsgBox(“组合框中已有该项目！”) End IfEnd IfEnd Sub【1】CboComputer.Text = CboComputer.List(i) 【2】Not flag=false【3】CboComputer.AddItem CboComputer.Textflag或
