VB程序设计考试题库(9)
一、单选题(每题1分,共50题)
1。以下不属于Visual basic的工作模式的是(  )模式。正确答案:A
A。编译   B。设计   C.运行    D。中断
2。VB集成开发环境有三种工作状态,不属于其中之一的是(  )。正确答案:B
A.设计状态B。写代码状态C.运行状态D。中断状态
3.下列属性中,文本框控件不具有的属性是(  )。 正确答案:B
A.Backcolor B.Caption C。Passwordchar D.Enabled 
4.以下能够触发文本框Change事件的操作是(  )。正确答案:D
A.文本框失去焦点  B。文本框获得焦点
C。设置文本框的焦点  D.改变文本框的内容
5。函数Int(Rnd*6+1)的取值范围是(  )。正确答案:C
A.从1到7共7个整数B。从0到7共8个整数
C。从1到6共6个整数D。从0到6共7个整数
6。可以同时删除字符串前导和尾部空白的函数是(  ) .正确答案:C
A。Ltrim  B。Rtrim  C.Trim  D。Mid
7。有如下程序:
a$=”Flying”:b$=”IS”:c$=”funny!"
Print a$+” "+Lcase$(b$)+” "+Ucase$(c$)
End
运行后,输出结果是(  )。正确答案:B
A.Flying Is funny!        B.Flying is FUNNY!
C。Flying IS FUNNY!        D。FLYING IS FUNNY!
8.表示学习成绩(score)在75分和90分之间的逻辑表达式是(  ).正确答案:A
A.score>=75 And score〈=90 
B.score>=75 0r score〈=90
C.score<=75 And score>=90 
D.score<=75 0r score〉=90
9.表达式4+5 \ 6 * 7 / 8 Mod 9 的值是(  ). 正确答案:B
A。4 B。5 C。6 D.7
10。函数rnd用于产生随机数,其结果范围是(  ) 。正确答案:B
A。 (0,1)  B. [0,1)  C. (0,1]   D。 [0,1]
11.有如下程序:
a=3:b=4
Print b〉a
End
运行后,输出结果是(  ).正确答案:A
A.Ture        B.FALSE        C.4〉3        D.显示出错信息
12.能清除文本框Text1中内容的语句是(  )正确答案:B
A. Text = "” B. Text1.Text = ”" C. Text1。clear D。 Text1.Cls
13.在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim I As Integer,n As Integer
For j=0 To 50
I=I+3
n=n+1
If I〉10 Then Exit For
Next
Text1。Text=Str(n)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是(  )。正确答案:C
A。2        B.3        C.4        D.5
14。下面的程序段运行后,text1 显示的内容是(  )。 正确答案:D
x = 0
 Do While x 〈 10
  x = x + 1 : x = x * x
  Loop
  text1.Text = x
A. 16        B. 19        C. 20        D. 25
15。阅读下面的程序段:
For I=1 To 3
For j=1 To I
For k=j To 3
a=a+1
Next k
Next j
Next I
执行上面的三重循环后,a 的值为(  )。正确答案:C
A.3        B。9        C.14        D.21
16.当用户将焦点移到另一个应用程序时,当前应用程序的活动窗体将 (  ) 。
正确答案:D
A。 发生DeActivate事件
B. 发生LostFocus事件
C. 发生DeActivate和LostFocus事件
D。 DeActivate和LostFocus事件都不发生
17.为了描述x〉y和y>z同时成立,则下述选项中,正确的是(  )。
正确答案:D
A.x〉y 。And。 Y>z        B.x〉y〉z
C。x>y And >z            D.x>y And y〉z
18.InputBox函数返回值的类型为(  ).正确答案:B
A。数值       B。字符串
C。变体       D。数值或字符串(视输入的数据而定)
19.有 如下程序:
Dim a As String,b As String
a=”12345",b="abcde”
For I=1 To 5
c=c+Left(a,I)+Right(b,I)
Next I
Print c
运行后输出的结果是(  ).正确答案:D
A。alb2c3d4e5                            B。la2b3c4de5
C.eld2c4b5ed2c3b4a5                    D。1e12del23cdel234bcdel2345abcde
20.窗体上有文本框Text1和命令按钮Command1,对Command1编写如下事件过程:
Private Sub Command1_Click()
Text1.Text = ”12345”
Text1。SelStart = 1
Text1。SelLength = 3
MsgBox Text1。SelText
End Sub 运行时,单击命令按钮,出现的信息框显示(  )正确答案:B
A. 12345        B. 234        C. 123        D. "345"
21。下面是一个窗体的单击事件过程:
Privme Sub Form_Click()
If Commandl.Enabled Then
Label1。Caption="命令按钮可以使用!”
Else
Label1.Caption=”命令按钮不可以使用!"
End If
End Sub
该窗体事件的功能是(  )。正确答案:B
A.判断命令按钮是否可见,以便在标签上显示不同的信息
B。判断命令按钮是否可用,以便在标签上显示不同的信息
C。判断命令按钮是否设置了默认按钮,以便在标签上显示不同的信息
D。If语句中的条件不合法,事件过程错误,不能执行.
22.下列程序运行时,消息框显示的内容是(  ) 正确答案:A
Private Sub Command1_Click()
MsgBox CStr(123 + 321)
End SubA. 444        B。 123321        C. 123+321        D. 显示出错信息
textbox控件边框设置23.下列关于InputBox函数的叙述,错误的是(  )正确答案:A
A. 可以省略任何参数
B. 可以在屏幕指定位置显示输入框
C。 可以指定默认值
D。 返回值为String类型
24.当文本框的TabStop属性设为False时,下列叙述正确的是(  )正确答案:D
A。 该文本框无法获得焦点
B. 无法在该文本框中输入文本
C. 焦点将始终停留在该文本框上
D。 该文本框无法通过使用Tab键获得焦点
25.阅读程序
  Option Base 1
  Private Sub Form_Click()
  Dim arr, Sum
  Sum = 0
  arr = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)
  For i = 1 To 10
  If arr(i) / 3 = arr(i) \ 3 Then
  Sum = Sum + arr(i)
  End If
  Next i
  Print Sum
  End Sub
程序运行后,单击窗体,输出结果为(  )。正确答案:C
A.13        B.14        C。27        D。15
26。若定义一维数组为:Dim a(N To M),则该数组的元素为(  )个.正确答案:D
A. M—N        B. M-N+1        C. M*N        D。 M+N
27。设有数组声明语句:
Option Base 1
Dim A(2 To 4,3)
以上语句所定义的数组A中共有(  )个元素。正确答案:B
A。 12        B. 9        C。 16        D. 6
28。要分配存放如下方阵的数据,可使用(  )数组声明语句来实现(不能浪费空间)。正确答案:C
A。 Dim x(9) As Single
B. Dim x(3,3) As Single
C. Dim x(—1 to 1, —5 to —3) As Single
D。 Dim x(—3 to —1, 5 to 7) As Integer
29。以下是窗体的Click事件过程Form_Click 的程序代码:
Option Base 1
Private Sub Form_Click()
Dim a As Variant
Dim I As Integer, m As Integer, index As Integer
a=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 Then
m=a(i)
Index=I
End if
Next I
Print m; index
End Sub
在程序运行过程中,单击窗体时,程序的输出结果为(  )。正确答案:B
A。–24 2        B.356 4        C.345 1        D。356 3
30。Dim A(-3 To 0,3)声明的数组有(  )个元素.正确答案:A
A.16        B.9        C.12            D.10
31.在过程中定义的变量,若希望在离开该过程后,还能保存过程中局部变量的值,则应使用(  )关键字在过程中定义局部变量。正确答案:D
A.Dim        B.Private        C.Public        D.Static
32.设有如下过程:
Sub ff(x,y,z)
x=y+z
EndSub
以下所有参数的虚实结合都是传址方式的调用语句是(  ).
正确答案:B
A。Call ff(5,7,z)
B。Call ff(x,y,z)
C。Call ff(3+x,5+y,z)

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。