Visual basic测试题.doc

2010VB69章自测习题说明：此仅为参考之用！知识点覆盖很不全面！!参考答案仅为参考第69章自测习题单选题(每题1分，共50分)1. 下列说法有错误的是_D_。(A) 默认情况下，属性Visible的值为True(B) 如果设置控件的Visible属性为False，则运行时控件会隐藏 (C) Visible的值可设为True或者False (D) 设置Visible属性同设置Enabled属性的功能是相同的，都是使控件处于失效状态2. . Print方法不可以在( D)输出数据。(A)窗体 (B)图片框(C) 立即窗口 (D) 代码窗口 3. 要在Form_Load事件过程中使用Print方法在窗体上输出一定的内容,应（C） (A)设置窗体的Visible属性(B)设置窗体的AutoRedraw属性 (C)调用窗体的Show方法(D)设置窗体的Enabled属性4. .下列语句正确的是_D_。(A) If A =B Then T = A A = B B = T (B) If A B Then T = A; A = B; B = T(C) If A = B Then T = A A = B B = T (D) If A = B Then T = A: A = B: B = T5. . 在VB代码中，将多个语句合并写在一行上的并行符是（B ）(A)撇号() (B) 冒号(:)(C)星号(*) (D) 感叹号(!)6. . 下列程序段的执行结果为()I = 1X = 0Do While I = 5 Print I=; I Print A=; A(A) I = 5 (B)I = 6 (C) I = 7 (D)I = 8A = 7 A = 8 A = 9 A = 11 9. . 以下( )是Visual Basic合法的数组元素。(A) X(I+1) (B)X-4 (C) X9 (D) xI+1 10. . 设有数组声明语句:Option Base 0Dim B(-l To 10,7) As Integer则数组B中共有（）个元素。(A) 37(B) 96 (C) 110 (D) 18011. .以下说法不正确的是（）。(A) 使用ReDim语句可以改变数组的维数 (B) 使用ReDim语句可以改变数组的类型(C) 使用ReDim语句可以改变数组每一维的大小(D) 使用ReDimA语句可以对A数组中的所有元素进行初始化12. . 在窗体上用复制、粘贴的方怯建立了一个命令按钮数组,数组名为M1,个数为3个。设窗体Forml标题为 myforml ,双击控件数组中的第三个按钮,打开代码编辑器,写下如下代码:Private Sub M1_Click(Index As Integer) Forml.Caption = myform2End Sub运行时,单击按钮数组中的第2个按钮,则窗体标题为（） (A) Forml (B) Ml (C) myforml (D) myform213. 在以下的For Each.Next循环中,A只能是（）Dim X(15)For Each A In X Print A;Next A(A)已经声明的静态数组(B)已经声明的动态数组(C)整型变量或字符型变量 (D) Variant类型的变量14. 执行以下Commandl的Click事件过程在窗体上显示( )。Option Base 0Private Sub Command1_Click()Dim aa=Array(a,b,c,d,e,f,g)Print a(1)+a(3)+a(5)End Sub(A)abc (B)bcd (C) bdf (D)ace15. . 下列程序段的执行结果为（）。Dim M(10)For I=0 To 10M(I)=2*INext IPrintf M(M(3)(A) 0(B) 4 (C) 6 (D) 12 16. . 下列程序段的执行结果为( )。Option Base 1Dim A(10,10)For I = 2 To 4For J=4 To 5A(I, J) = I * JNext JNext IPrint A(1,5) +A(3,4) + A(4,5)(A)12 (B) 22 (C) 32 (D)4217. . 设执行以下程序段时依次输入1、2、1, 则执行结果为（）。Dim a（4）As Integer, b(4) As IntegerFor K =0 To 2a(K+1)=Val(InputBox(“请输入数据：”)b(3-K)= a(K+1)Next KPrint b(k)(A)0（B）1 (C) 3 (D) 518. . Sub 过程与Function过程最根本的区别是（）。(A) Sub 过程可以使用Call 语句或直接使用过程名调用,而Function过程不可以(B) Function 过程可以有参数, Sub过程不可以有参数(C) 两种过程参数的传递方式不同(D) Sub过程的过程名不能返回值,而Function 过程能通过过程名返回值19. . 要想在过程调用后返回两个结果,下面的过程定义语句合法的是（）。(A) Sub Proc1(ByVal n, ByVal m) (B) Sub Proc1（n, ByVal m)(C) Sub Proc1(n, m) (D) Sub Proc1(ByVal n, m)20. . 通用过程可以通过执行工具菜单中的（）命令来建立。(A)添加过程(B)通用过程(C)添加窗体(D)添加模块21. .假定已定义了一个过程Sub Add(a As Integer, b As integer),则正确的调用语句是（）。 (A) Add 12, 12 (B) Add(5*x,12)(C) Call Add x, y (D) Call Add(12, 12, x)22. . 在窗体上已经建立了一个文本框Text1和命令按钮Command1，运行程序后单击命令按钮，则在文本框Text1中显示的内容是_。Dim a As Integer 模块级变量Private Sub Command1_Click( )Dim b As Integera=1 : b=2Call MySub(b)Text1.Text=val(a+b)End SubSub MySub(x)x=x Mod 3 + aEnd Sub（A）1 （B）2 （C）3 （D）423. 在窗体上画一个名称为Commandl的命令按钮，再画一个名称为Label1的标签，然后编写如下程序代码： Dim X As Integer Private Sub Command1_Click() X5 Call proc(X) Label1.CaptionX End Sub Private Sub proc(ByVal a As integer) Xa * a End Sub程序运行后，单击命令按钮，则标签中显示的内容是_。(A)5 (B)25 (C)0 (D)出错24. 下列程序的运行结果是_。Dim x,yPrivate Sub Form_click() x=1 y=1 z=1 call abc(5) Print x,y,zEnd SubPrivate Sub abc(m) x=m y=m z=mEnd Sub(A) 1 1 1 (B) 5 5 1 (C) 1 5 1 (D) 5 5 525. .使用Public Const语句声明一个全局的符号常量时,该语句应放在（）。(A)过程中 (B)窗体模块的通用声明段(C)标准模块的通用声明段 (D)窗体模块或标准模块的通用声明段25. . 可以在窗体模块的通用声明段中声明（）。(A)全局变量 (B)全局常量 (C)全局数组 (D)全局用户自定义类型26. 从WhileWend循环中退出，继续执行循环体后面的语句，应使用 。 (A) End While (B) Exit While Wend (C) Exit While (D) Exit27. Visual Basic允许在标准模块中编写一个( )过程, 作为应用程序的入口, 定义应用程序启动次序和方式。(A) Sub main(B)start (C)program (D)public28. . 要判断在某文本框中是否是按下了回车键，可以在文本框的KeyPress事件过程中判断参数（ ）的值。(A) Ascii (B) KeyCode (C) KeyAscii (D) Mouse 29. . 要使控件与框架捆绑在一起，以下操作正确的是（）(A) 在窗体不同位置上分别画一框架和控件，再将控件拖到框架上 (B) 在窗体上画好控件，再画框架将控件框起来(C) 在窗体上画好框架，再在框架中画控件(D) 在窗体上面好框架，再双击工具箱中的控件30. . 如果有三个单选按钮建立在某一框架中，另外还有一个单选按钮建立在窗体上，运行时可以同时选中_个单选按钮。（A）1 （B）2 （C）3 (D) 431. .运行时，要向图片框P1中加载C:WINDOWSClouds .bmp图像文件，应使用语句（ ）(A) Picture1.Picture =C:WINDOWSClouds.bmp(B) Picture1.Picture = LoadPicture(C:WINDOWSClouds.bmp)(C) P1.Picture = LoadPicture(C:WINDOWSClouds .bmp)(D) P1.Picture = LoadPicture(C:WINDOWSClouds .bmp) 32. . 以下说法不正确的是( )（A）图片框控件除了可以显示图形外，还可以作为控件的容器 （B）图像框控件除了可以显示图形外，还可以作为控件的容器（C）图像框控件的大小可以随其中图形大小的改变而自动调整 (D) 图像框控件可以调整其中图形的大小以适应控件的大小33. 函数 Choose(0, 1, 2, 4, 7)的结果为_。 (A) 1 (B) 2 (C) NULL (D) 4 34. 设组合框Combo1有3个项目，则以下能删除最后一项的语句是（ ）(A) Combo1.RemoveItem Text (B) Combo1.RemoveItem 2(C) Combo1.RemoveItem 3 (D) Combo1.RemoveItem Combo1.Listcount 35. . 如果在程序中已使用ReDim a(3,2)对a数组加以说明，现要对a数组重新说明大小，并保留原来的值，下列哪个语句是正确的_。(A)ReDim a(3,4) (B)ReDim Preserve a(3,2 to 5)(C)ReDim Preserve a(4,2) (D)ReDim Preserve a(3,4) 36. 与键盘操作有关的事件有KeyPress、KeyUp和KeyDown事件，当用户按下并且释放一个键后，这三个事件发生的顺序是（ ）(A) KeyDown，KeyPress，KeyUp (B) KeyDown，KeyUp ，KeyPress(C) KeyPress，KeyDown，KeyUp (D) 没有规律37. . 要清除组合框Combo1中的所有内容，可以使用_语句。（A）Combo1.Cls ( B) Combol.Clear (C) Combol.Delete (D) Combol.Remove38. .下列（）程序段能删除列表框List1中的所有项。(A) Private Sub Command1_Click() (B) Private Sub Command1_Click()For I = 0 To Listl.Listcount-1 For I = 0 To List1.Listcount-1 List1.RemoveItem I List1.RemoveItem 0Next I Next IEnd Sub End Sub(C) Private Sub Command1_Click() (D) Private Sub Command1_Click() For I = 0 To Listl.Listcount-1 For I = 0 To List1.ListCount List1.RemoveItem 1 List1.RemoveItem 0Next I Next IEnd Sub End Sub39. . 要使每次单击滚动条两端箭头时变化值为10，应设置滚动条的（ ）属性(A) Minimize (B) Min (C) MinChange (D) SmallChange40. . Timer控件的( )属性决定该控件是否对时间的推移做出响应，将该属性设置为False会关闭Timer控件，设置为True则打开它。(A) Enabled (B) Visible (C) Time (D)Caption41. .表示滚动条控件取值范围最大值的属性是_。(A) Max (B) Value (C) LargeChange (D) Max-Min42. . 当组合框的Style属性设置为0时，其表现形式为（）(A)下拉列表框(B)下拉组合框 (C)简单组合框 (D)文本框43. . 以下关于定时器的说法中，错误的是（）(A)运行时定时器在窗体上不可见(B)可以设置定时器的Visible属性使其在窗体上不可见 (C)定时器只有一个事件，即Timer事件(D)如果定时器的Interval属性为0，则定时器无效44. . 以下不能作为容器控件的是_。（A） 文本框(TextBox) （B）图片框(PictureBox) （C）框架(Frame) （D）窗体45. . 以下关于复选框的说法中，错误的是（）(A)复选框的Value属性用于决定该复选框是否被选中(B)一个容器中的所有复选框一次只能有一个被选中(C)在一个容器中的复选框可以同时有多个被选中(C)(D)无论是在窗体上还是在其他容器中，都可以同时选中多个复选框 46. . 以下说法正