VB程序设计考试题库(9)

1、.VB 程序设计考试题库（ 9）一、单选题（每题1 分，共 50 题）1.以下不属于 Visual basic的工作模式的是（）模式。 正确答案： AA.编译B.设计C.运行D.中断2.VB 集成开发环境有三种工作状态,不属于其中之一的是（）。正确答案： BA.设计状态 B.写代码状态 C.运行状态 D.中断状态3.下列属性中，文本框控件不具有的属性是（）。 正确答案： BA.Backcolor B.Caption C.Passwordchar D.Enabled4.以下能够触发文本框Change事件的操作是（）。正确答案： DA.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D.改变文

2、本框的内容5.函数 Int(Rnd*6+1) 的取值范围是（）。正确答案： CA.从 1到 7共7个整数 B.从0到 7共8个整数C.从 1到 6共 6个整数 D.从 0到 6共 7个整数6.可以同时删除字符串前导和尾部空白的函数是（） 。 正确答案： CA.Ltrim B.Rtrim C.Trim D.Mid7.有如下程序：a$="Flying"：b$="IS" ：c$="funny!"Print a$+" "+Lcase$(b$)+" "+Ucase$(c$)End运行后，输出结果是（）。正

3、确答案： BA.Flying Is funny!B.Flying is FUNNY!精选范本.C.Flying IS FUNNY!D.FLYING IS FUNNY!8.表示学习成绩 (score)在 75 分和 90 分之间的逻辑表达式是（）。正确答案： AA score>=75 And score<=90Bscore>=75 0r score<=90Cscore<=75 And score>=90D score<=75 0r score>=909.表达式 4+5 6 * 7 / 8 Mod 9的值是（）。 正确答案： BA.4 B.5 C.6

4、 D.710.函数 rnd 用于产生随机数，其结果范围是（） 。正确答案： BA. (0,1) B. 0,1) C. (0,1D. 0,111.有如下程序：a=3： b=4Print b>aEnd运行后，输出结果是（）。正确答案： AA.TureB.FALSEC.4>3D.显示出错信息12.能清除文本框 Text1 中内容的语句是（）正确答案： BA. Text = "" B. Text1.Text = "" C. Text1.clear D. Text1.Cls13.在窗体上画一个名称为Textl 的文本框和一个名称为Commandl 的命

5、令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim I As Integer，n As Integer精选范本.For j=0 To 50I=I+3n=n+1If I>10 Then Exit ForNextText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是（）。正确答案： CA.2B.3C.4D.514.下面的程序段运行后， text1 显示的内容是（）。 正确答案： Dx = 0Do While x < 10x = x + 1 : x = x * xLooptext1.Text = xA. 1

6、6B. 19C. 20D. 2515.阅读下面的程序段：For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next k精选范本.Next jNext I执行上面的三重循环后，a 的值为（）。正确答案： CA.3B.9C.14D.2116.当用户将焦点移到另一个应用程序时，当前应用程序的活动窗体将（ ） 。正确答案： DA. 发生 DeActivate 事件B. 发生 LostFocus事件C. 发生 DeActivate 和 LostFocus事件D. DeActivate 和 LostFocus事件都不发生17.为了描述 x>y 和 y>z 同时成

7、立，则下述选项中，正确的是（）。正确答案： DA.x>y .And. Y>zB.x>y>zC.x>y And >zD.x>y And y>z18.InputBox 函数返回值的类型为（）。正确答案： BA.数值B.字符串C.变体D.数值或字符串 (视输入的数据而定 )19.有 如下程序：Dim a As String， b As Stringa="12345"，b="abcde"For I=1 To 5c=c+Left(a，I)+Right(b ，I)精选范本.Next IPrint c运行后输出的结果是（

8、）。正确答案： DA.alb2c3d4e5B.la2b3c4de5C.eld2c4b5ed2c3b4a5D.1e12del23cdel234bcdel2345abcde20.窗体上有文本框Text1 和命令按钮 Command1，对 Command1编写如下事件过程：Private Sub Command1_Click()Text1.Text = "12345"Text1.SelStart = 1Text1.SelLength = 3MsgBox Text1.SelTextEnd Sub 运行时，单击命令按钮，出现的信息框显示（）正确答案： BA. 12345B. 234C

9、. 123D. "345"21.下面是一个窗体的单击事件过程：Privme Sub Form_Click()If Commandl.Enabled ThenLabel1.Caption="命令按钮可以使用 !"ElseLabel1.Caption="命令按钮不可以使用 !"End If精选范本.End Sub该窗体事件的功能是（）。正确答案： BA.判断命令按钮是否可见，以便在标签上显示不同的信息B.判断命令按钮是否可用，以便在标签上显示不同的信息C.判断命令按钮是否设置了默认按钮，以便在标签上显示不同的信息D.If 语句中的条件不合

10、法，事件过程错误，不能执行。22.下列程序运行时 ,消息框显示的内容是（） 正确答案： APrivate Sub Command1_Click()MsgBox CStr(123 + 321)End SubA. 444B. 123321C. 123+321D. 显示出错信息23.下列关于 InputBox 函数的叙述，错误的是（）正确答案： AA. 可以省略任何参数B. 可以在屏幕指定位置显示输入框C. 可以指定默认值D. 返回值为 String 类型24.当文本框的 TabStop属性设为 False时，下列叙述正确的是（）正确答案： DA. 该文本框无法获得焦点B. 无法在该文本框中输入文本

11、C. 焦点将始终停留在该文本框上D. 该文本框无法通过使用 Tab 键获得焦点25.阅读程序Option Base 1精选范本.Private Sub Form_Click()Dim arr, SumSum = 0arr = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)For i = 1 To 10If arr(i) / 3 = arr(i) 3 ThenSum = Sum + arr(i)End IfNext iPrint SumEnd Sub程序运行后，单击窗体，输出结果为（）。正确答案： CA.13B.14C.27D.1526.若定义一维数组为： Di

12、m a(N To M) ，则该数组的元素为（）个。正确答案：DA. M-NB. M-N+1C. M*ND. M+N27.设有数组声明语句：Option Base 1Dim A(2 To 4,3)以上语句所定义的数组A 中共有（）个元素。 正确答案： BA.12B.9C.16D.6精选范本.28.要分配存放如下方阵的数据， 可使用（ ）数组声明语句来实现 (不能浪费空间 )。正确答案： CA. Dim x(9) As SingleB. Dim x(3,3) As SingleC. Dim x(-1 to 1, -5 to -3) As SingleD. Dim x(-3 to -1, 5 to

13、7) As Integer29.以下是窗体的 Click 事件过程 Form_Click 的程序代码：Option Base 1Private Sub Form_Click()Dim a As VariantDim I As Integer, m As Integer, index As Integera=Array(345,-54,200,356,65,23)m=a(LBound(a)Index=Lbound(a)For I=Lbound(a) To Ubound(a)If a(i)>m Thenm=a(i)Index=IEnd ifNext IPrint m; index精选范本.E

14、nd Sub在程序运行过程中，单击窗体时，程序的输出结果为（）。正确答案： BA. 24 2B.356 4C.345 1D.356 330.Dim A(-3 To 0，3)声明的数组有（）个元素。 正确答案： AA16B9C12D1031.在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用（）关键字在过程中定义局部变量。正确答案： DA.DimB.PrivateC.PublicD.Static32.设有如下过程：Sub ff(x， y， z)x=y+zEndSub以下所有参数的虚实结合都是传址方式的调用语句是（）。正确答案： BA.Call ff(5，7，z)B.C

15、all ff(x， y， z)C.Call ff(3+x，5+y， z)D.Call ff(x+y ，x-y，z)33.关于过程调用正确的是（）。正确答案： DA.过程要用 Call 语句调用B.Sub过程一定要用 Call 语句调用C.过程都可以用赋值语句的形式调用精选范本.D.只要写上过程名并给出实参就能调用过程34.在参数传递过程中，使用关键字（）来修饰参数，可以使之按值传递。正确答案： AA ByValBByRefCValueD reference35.Sub过程与 Function 过程最根本的区别是（）正确答案： DA.Sub 过程名称与 Function 过程名称的格式不统一B.

16、Function 过程可以有参数， Sub过程不可以C.两种过程参数的传递方式不同D.Sub 过程的过程名称不能有返回值，而 Function 过程能通过过程名称得到返回值36.假定有如下的 Sub过程：Sub S(x as Single,y as Single)t = xx =t/yy =t Mod y End SuB.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click ( ) Dim a As Single Dim b As Single a =5 b =4 S a,b Printa,b End Sub 程序运行后，单击命令按钮，输出结果为（

17、）。正确答案： D精选范本.A.5 4B.1 137.组合框中的 Style属性可以设置组合框的样式，Style = 2 时，组合框属于（）样式。正确答案： CA. 下拉式组合框B简单组合框C下拉式列表框D以上全部都可以38.当拖动滚动条中的滚动块时，将触发滚动条的事件是（）。正确答案： CA.MoveB.ChangeC.ScrollD.SetFocus39.下列与 Listl.Text 属性值相同的表达式是（）。正确答案： D40.要使图像框可以自动调整大小以适应图形的大小，则需要设置属性 （ ）。 正确答案： B精选范本.A. AutoSizeB. StretchC. Appearance

18、D. AutoRedraw41.滚动条的（）属性用于返回或设置滚动条的当前值。正确答案： AA.ValueB.MaxC.MinD.Data42.想要不使用【 Shift】键或【 Ctrl】键就能在列表框中同时选择多条项目，则应把该列表框的 MultiLine 属性设置为（）。正确答案： CA.0B.1C.2D.其他43.在用菜单编辑器设计菜单时，必须输入的项有（）。正确答案： DA快捷键B标题C热键D 名称44.为了防止用户随意将光标置于控件之上，应（）。正确答案： DA. 将控件的 TabIndex 属性设置为 0B. 将控件的 TabStop属性设置为 TrueC. 将控件的 TabStop属性设置为 FalseD. 将控件的 Enabled属性设