vb考试复习7章8章习题.docx

1、vb考试复习7章8章习题第7章 Visual Basic常用内部控件一、 选择题1. 以下关于Name属性的说法，错误的是【 】。(A)Name属性必须以一个字母开始(B)Name属性可以在属性窗口修改,也可以在代码中修改(C)所有控件都有Name属性,其值不能为空(D)Form1.frm是一个非法的对象名2. 用于设置粗体字的属性是【 】，用于设置斜体字的属性是【 】，用于设置删除线的属性是【 】,用于设置下划线的属性是【 】。(A)FontName (B)Fontsize (C)FontBold (D)FontItalic(E)FontStrikethru (F)Fontunderline

2、 (G)Font (H)Bdd3. 要使控件与框架捆绑在一起,以下操作正确的是【 】。(A)在窗体不同位置上分别画一框架和控件,再将控件拖到框架上(B)在窗体上画好控件，再画框架将控件框起来(C)在窗体上画好框架，再在框架中画控件(D)在窗体上画好框架，再双击工具箱中的控件4. 设已在窗体上画好一个容器控件(如框架)，要在容器控件中建立一个命令按钮数组，以下操作正确的是【 】。(A)逐次单击工具箱中的命令按钮，再在容器中画出按钮即可(B)在容器上画出按钮，选择按钮，复制，粘贴，并回答创建控件数组,再重复粘贴(C)在容器上画出按钮，选择按钮，复制，再选择容器，粘贴，并回答创建控件数组，再重复粘贴

3、(D)在容器上画出一个按钮，按下ctr1键，同时拖动按钮到容器中的另一个位置5. 要使一个图片框控件能自动地附着在窗体的一条边上，应设置它的【 】属性。(A)Picture (B)Alignment (C)Border (D)Align6. 运行时,要向图片框P1中加载C:WINDOWSClouds.bmp图像文件,应使用语句【 】。(A)Picture1.Picture=C:WINDOWSClouds-bmp(B)Picture1.Picture=LoadPicture(C:WINDOWSClouds.bmp)(C)P1.Picture=LoadPicture(C:WINDOWSClouds

4、.bmp)(D)Pl.Picture=LoadPicture(C:WINDOWSClouds.bmp)7. 运行时,要清除图片框P1中的图像,应使用语句【 】。(A)Picture1.Picture=(B)P1.Picture=LoadPicture()(C)Picture1.Picture=LoadPicture(D)Picture =LoadPicture()8. 运行时,要在图片框P1中打印字符串How Are You，应使用语句【 】。(A)Picture1.Print =How Are You (B)P1.Picture =LoadPicture(How Are You)(C)P1.

5、Print How Are Y011(D)Print How Are You9. 要清除已经在图片框P1中打印的字符串而不清除图片框中的图像,应使用语句【 】。(A)P1.Cls (B)P1.PicaIre=LoadPicture()(C)P1.Print (D)P1.Picture=10. 以下说法正确的是【 】。(多选)(A)图片框控件除了可以显示图形外，还可以作为控件的容器(B)图像框控件除了可以显示图形外，还可以作为控件的容器(C)图片框控件可以延伸图形的大小以适应控件的大小(D)图像框控件的大小可以随图形大小的改变而自动调整(E)图像框控件可以延伸图形的大小以适应控件的大小11. 以

6、下关于选项按钮的说法,正确的是【 】。(A)选项按钮的Enabled属性用于决定该按钮是否被选中(B)选项按钮的Value属性用于决定该按钮是否被选中(C)选项按钮的Checked属性用于决定该按钮是否被选中(D)选项按钮的Visible属性用于决定该按钮是否被选中12. 以下关于选项按钮的说法,正确的是【 】。(A)一个窗体上(包括其他容器中)的所有选项按钮一次只能有一个被选中(B)一个窗体上(不包括其他容器中)的所有选项按钮一次只能有一个被选中(C)一个容器中的选项按钮可以同时有多个被选中(D)所有容器(多于一个)中的选项按钮一次只能有一个被选中13. 如果有三个选项按钮直接画在窗体上,另

7、有四个选项按钮画在框架中,则运行时,可以同时选中【 】个选项按钮。(A)1 (B)2 (C)3 (D)414. 设已经在某个选项按纽Option1的Click事件过程中编写了一些代码,运行时,以下说法正确的是【 】。(多选)(A)任何时候用鼠标单击选项按钮都会执行其Click事件过程(B)任何时候执行语句Option1.Value=True都会执行选项按钮的Click事件过程(C)当选项按钮处于未选择状态时,用鼠标单击选项按钮都会执行其Click事件过程(D)当选项按钮处于未选择状态时,执行语句Option1.Value =True将执行选项按钮的Click事件过程15. 以下关于复选框的说法

8、,正确的是【 】。(A)复选框的Enabled属性用于决定该复选框是否被选中(B)复选框的Value属性用于决定该复选框是否被选中(C)复选框的Checked属性用于决定该复选框是否被选中(D)复选框的Visible属性用于决定该复选框是否被选中16. 以下关于复选框的说法,正确的是【 】。(多选)(A)一个窗体上的所有复选框一次只能有一个被选中(B)一个容器中的所有复选框一次只能有一个被选中(C)在一个容器中的复选框可以同时有多个被选中(D)无论是在窗体中还是在其他容器中,都可以同时选中多个复选框17. 设已经在某个复选框Check1的Click事件过程中编写了一些代码,运行时,以下说法正确

9、的是【 】。(多选)(A)任何时候用鼠标单击复选框都会执行其Click事件过程(B)任何时候执行语句Check1.Value=1都会执行复选框的Click事件过程(C)任何时候执行语句Check1.Value=0都会执行复选框的Click事件过程(D)任何时候在代码中改变复选框的状态时,都会执行复选框的C1ick事件过程18. 用于指定列表框的列数的属性是【 】；要使列表框中的每一个文本项的边上都有一个复选框,需设置【 】属性；返回或设置列表框中当前选择项目的索引的属性是【 】；返回列表部分项目的个数的属性为【 】；指定列表的元素是否自动按字母表顺序排序的属性为【 】。(A)List (B)L

10、istCount (C)ListIndex (D)Text (E)Sorted(F)Selected (G)Columns (H)Count (I)Style (J)Checked19. 下列【 】程序段能删除列表框List1中的所有项。(A) Private Sub Command3_Click() (B)Private Sub Command3_Click()For I=0 To List1.ListCount-1 For I=0 To List1.ListCount-1List1.RemoveItem 1 List1.RemoveItem 0Next I Next IEnd Sub En

11、d Sub(C) Private Sub Command3_Click() (D)Private Sub Command3_click()For I=0 To List1.ListCount-1 For I=0 To List1.ListCountList1.RemoveItem1 List1.RemoveItem 0Next I Next IEnd Sub End Sub20. 要选择列表框List1的第6项，可以使用语句【 】。(多选)(A)List1.Selected(6)=True (B)List1.Selected(5)=True(C)List1.Selected=6 (D)List

12、1.ListIndex=5(E)List1.Selected=5 (F)List1.ListIndex=621. 引用列表框的最后一项应使用【 】。(A)List1.List(List1.ListCount-1) (B)List1.List(List1.ListCount)(C)List1.List(ListCount) (D)List1.List(ListCount-1)22. 将字符串hello添加到列表框的最后，可使用【 】语句。(多选)(A)List1.AddItem hello, List1.ListCount-1(B)List1.AddItem he11o, List1.ListC

13、ount(C)List1.AddItem hello, List1.ListIndex(D)List1.AddItem hello23. 如果没有在列表框中选择项目,且列表框的MultiSelect属性值为默认值(0-None),则执行语句List1.RemoveItem List1.ListIndex的结果是【 】。(A)删除列表框的最后一项 (B)删除列表框的第一项(C)出错 (D)删除列表框中最后添加的一项24. 当组合框的Style属性设置为0时,其表现形式为【 】。当组合框的Style属性设置为1时,其表现形式为【 】。当组合框的Style属性设置为2时,其表现形式为【 】。(A)下

14、拉列表框 (B)下拉组合框 (C)简单组合框 (D)文本框25. 为了添加 ComboBox 控件中的项目,需要使用【 】方法。为了删除 ComboBox 控件中的项目,需要使用【 】方法。(A)Add (B)Remove (C)AddItem (D)RemoveItem26. 要清除组合框 Combo1 中的所有内容,可以使用【 】语句。(A)Combo1.Cls (B)Combo1.Clear (C)Combo1.Delete (D)Combo1.Remove27. Timer控件的【 】属性决定该控件是否对时间的推移做响应。将该属性设置为False会关闭Timer控件,设置为True 则

15、打开它。(A)Enabled (B)Visible (C)Time (D)Capable28. 定时器的Interval属性以【 】为单位指定Timer事件之间的时间间隔。(A)分 (B)秒 (C)毫秒 (D微妙29. 以下关于定时器的说法,错误的是【 】。(多选)(A)运行时定时器在窗体上不可见(B)可以设置定时器的Visible属性使其在窗体上不可见(C)可以根据需要在窗体上设置定时器的大小(高度和宽度)(D)定时器只有一个Timer事件(E)如果定时器的Interval属性为0，则定时器元效(F)如果定时器的Enabled属性为False，则定时器无效(G)如果定时器的Visible属性

16、为False，则定时器无效30. 要使滚动条表示最大值100，应设置其【 】属性。要使滚动条表示最小值10，应设置其【 】属性。要使每次单击滚动条两端箭头时变化值为10，应设置其【 】属性。要使单击滚动条滑块与两端箭头之间的空白区域时变化值为20，应设置其【 】属性。(A)Minmize (B)Min (C)MinChange (D)SmallChange(E)Maxmize (F)Max (G)MaxChange (H)LargeChange31. 下面【 】控件不支持Change事件。(A)TextBox (B)Label (C)PictureBox (D)ListBox32. 下面【 】

17、控件不支持DblClick事件。(A)OptionButton (B)CheckBox (C)Form (D)Image二、 程序填空1. 设某数制转换界面如图7-1所示，请补齐转换按钮Command1的Click事件过程，运行时单击该按钮将输入的十进制数转换成八进制或十六进制。已知八进制转换函数为Oct(Number)，十六进制转换函数为Hex(Number)，其中，Number为要被转换的数。Private Sub Command1_Click()If (1) Then Text2.Text=Oct( (2) )If (3) Then Text2.Text=Hex( (4) )End Su

18、b2. 设某列表框共有10项,按题目要求补齐程序,完成相应的功能。按下命令按钮Command1时将列表框第8项的内容显示在窗体上:Private Sub Command1_Click()List1. (1) (7)=TruePrint List1. (2) End Sub单击列表框某一项时立即将该项打印在窗体上:Private Sub ListL_Click()Print (3) End Sub按下命令按钮Command2时在窗体上删除其第1、3、5、7、9项:Private Sub Command2_Click()For i=1 To 5List1. (4) Next iEnd Sub在列表

19、框的每一项之后插入一个新的项:Private Sub Command3_Click()For i=1 To 1Ox=InputBox(请输入插入的第&i&项内容)List1.AddItem (5) Next iEnd Sub3. 设在窗体Form1上有一个列表框List1，单击窗体用输入框输入数据。如果在输入框中输入了一定内容并按了确定按钮后,则按以下情况进行处理:如果输入的内容在字母a到z之间,且列表框中没有该字母,则将其添加到列表框中,然后继续显示输入框,提示输入下一个字母。如果输入的内容在字母a到z之间,且在列表框中已经存在,则显示一消息框,提示字母已经存在,然后继续显示输入框,提示输入

20、下一个字母。如果输入的内容不在字母a到z之间,则显示一消息框,提示输入数据不在指定范围内,然后继续显示输入框,提示输入下一个字母。如果在输入框中按了取消按钮,或输入内容为空,则停止输入。Private Sub Form_Click()Do While TrueExist =0x=Trim(InputBox(请输入a到z之间的一个字母,)If x=a And x0 ThenFor i=0 To List1.ListCount-1If Text1.Text = Left(List1. (1) ThenList1. (2) (i)=TrueExit ForEnd IfNext iElseList1.

21、ListIndex=-1End IfEnd SubPrivate Sub Command1_Click() 确定If List1.ListIndex=1 Then 如果在列表框中选择了某项Picture1.Print (3) End IfEnd SubPrivate Sub (4) () 双击列表框中的项目picture1.Print (5) End SubPrivate Sub Command1_ Click() 取消 Text1.Text=If List1.ListIndex =0 Then List1.Selected( (6) )= (7) End SubPrivate Sub Tex

22、t1.KeyUp(KeyCode As Integer, Shift As Integer)If KeyCode=13 ThenIf (8) Thenpicture1.Print (9) End IfEnd IfEnd Sub5. 设在窗体上放置了两个定时器Timer1和Timer2，以下程序用于每隔2分钟向窗体上输出当前的系统时间，并打印一个（0,1）之间的随机数。Private Sub Form_Load() Show Print Time(),RndTimer1.Interval=60000Timer2.Interva2= (1) Timer1.Enabled=TrueTimer2.En

23、abled=FalseEnd SubPrivate Sub Timer1_Timer()Timer2.Enabled= (2) Timer1.Enabled= (3) End SubPrivate Sub Timer2_Timer()Print Time(),RndTimer1.Enabled = (4) Timer2.Enabled= (5) End Sub6. 设在界面上放置了一个滚动条HScroll1和一个标签控件Label1，要使每次单击滚动条两端箭头时,或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条的值，补齐以下代码。Private Sub HScroll1_ (

24、1) ()Label1.Caption =HScroll1. (2) End Sub要使拖动滚动条滑块时标签内容能够反映滚动条的值，补齐以下代码:Private Sub HScro111_ (3) ()Label1.Caption =HScroll1. (4) End Sub第8童 数组一、 选择题1. 以下【 】是Visual Basic合法的数组元素。(多选)(A)X9 (B)X9 (C)X(I+1) (D)X(X(5) (E)x6 (F)X(0)2. 下面的数组声明语句中【 】是正确的。(A)Dim A3,4 As Integer (B)Dim A(3,4) As Integer(C)D

25、im A3;4 As Integer (D)Dim A(3:4) AS Integer3. 下面的数组声明语句中【 】是正确的。(多选)(A)Dim MA1:5,1:5 As String (B)Dim MA(5 To 5) As String(C)Dim MA(1 To 5,1 To 5) As String (D)Dim MA(1:5,1:5)AS String(E)Dim MA(1 To 5;1 To 5) As String (F)Dim MA(1 To5,5) As String4. 设有数组声明语句:Option Base 1Dim A(2,-1 To 1)以上语句所定义的数组A为

26、【 】维数组，共有【 】个元素,第一维下标从【 】到【 】，第二维下标从【 】到【 】。(A)-1 (B)1 (C)2 (D)3 (E)4 (F)5 (G)6 (H)95. 设有数组声明语句:Option Base 0Dim B(-1 To 10,2 To 9,20) As Integer则数组B中共有【 】个元素。(A)1800 (B)1848 (C)20161 (D)23106. 使用语句Dim A(1 To 15) As Integer声明数组A之后，以下说法正确的有【 】。(多选)(A)A数组中的所有元素值为0 (B)A数组中的所有元素值不确定(C)A数组中的所有元素值为Empty D

27、)执行Erase A后,A数组中的所有元素值为07. 以下说法正确的有【 】。(多选)(A)使用Redim语句将释放动态数组所占的存储空间(B)使用Redim语句也可以保留动态数组中原有的内容(C)使用Erase语句将释放动态数组所占的存储空间(D)使用Erase语句将释放固定大小数组所占的存储空间8. 以下说法不正确的是【 】。(A)使用ReDim语句可以改变数组的维数 (B)使用ReDim语句可以改变数组的类型(C)使用ReDim语句可以改变数组每一维的大小 (D)使用ReDim语句可以对数组中的所有元素进行初始化9. 设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数

28、组的说法错误的是【 】。(A)命令按钮的所有Caption属性都是Command1(B)在代码中访问任意一个命令按钮只需使用名称Command1(C)命令按钮的大小都相同(D)命令按钮共享相同的事件过程10. 在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为M1。设窗体Form1标题为 myform1，双击控件数组中的第三个按钮，打开代码编辑器,写如下代码：Private Sub M1_Click(Index As Integer)Form1.Caption =myform2End Sub运行时，单击按钮数组中的第一个按钮，窗体标题为【 】。(A)Form1 (B)M1 (C)myform1 D)myform2二、 填空题1. 设某个程序中要用到一个二维数组,要求数组名为A,类型为字符串类型,第一维下标从1到5,第二维下标从-2到6,则相应的数组声明语句为: 2. 设有数组声明语句:Dim A(-l To 2,2) As Integer，则数组A中