122.循环结构for i=1 to 10 step 1.5的执行次数是_____。 a) 6 b) 7 c) 9
d) 10 答案:B
123.下列变量名中不合法的是_____。 a) strname b) 3abc c) A_one
d) vaone 答案:B
124.如果ABC的值为100,下列表达式中,_____的值为False。 a) ABC
b) 12345<>12345 & ABC c) Not 2*5=10
d) 4=4 and 5>2+2 答案:C
125.文件列表框中用于设置或返回所选文件的文件名的属性是_____。 a) File b) FilePath c) Path
d) FileName 答案:D
126.要使循环体至少执行一次,应使用_____循环。 a) For-next b) While-wend
c) Do--Loop while|until
d) do[while|until]-loop 答案:C
127.要改变Label控件中文字的颜色,可以设置Label控件的_____属性。 a) FontColor b) FillColor c) ForeColor
d) BackColor 答案:C
128.如果将布尔常量值True赋给一个整型变量,则整型变量的值为______。 a) 0 b) -1 c) TRUE
d) FALSE 答案:B
129.若要使某命令按钮获得控制焦点,可使用的方法是_____。 a) lostfocus b) setfocus c) point
d) value 答案:B
130.以下哪个是合法的变量名_______。 a) Len
b) Test@qw c) 6cost_1
d) count2s 答案:D
131.下列类型的变量中占用字节数最小的是_____。 a) Integer b) Single c) Date
d) Byte 答案:D
二、填空题
132.设有数组声明语句:Option base 1 dim A(3,-2 to 1),则数组A中有_____个元素。 答案:12
133.执行inputbox函数后,会产生一个对话框,对话框上通常有两个按纽, 它们是_____按纽和取消按钮。 答案:确定
134.下列程序的执行结果是_____。 M1 = 1:m2 = 1 Do While m2<>6 m1 = m1*m2 : m2 = m2+1 Loop
Print m1 答案:120
135.下面程序段的输出结果是______。 For X=1.5 To 5 Step 5 Print X;
Next X 答案:1.5
136.表达式Fix(-32.68)+Int(-23.02)的值为______。 答案:-56
137.执行下面的程序段后,b的值为_____。 a=300:b=20
a=a+b:b=a-b:a=a-b 答案:
138.滚动条响应的重要事件有_______和_______(提示:该题只填写英文,如Click事件,只写Click即可)。 答案:CHANGE#SCROLL
139.Visual Basie 提供了列表框控件, 当列表框中的项目较多、超过了列表框的长度时, 系统会自动在列表框边上加一个______。 答案:滚动条
140.下列程序用来将变量X,Y的值互换,请补充完程序(提示:该题答案中不要出现空格)。
T=Y:______:X=T 答案:Y=X
141.在VB中,最主要的两种对象是 (3) 和 (4) 。 窗体(form) 控件
142.下面程序段执行后的结果是_____。 X=10
For I=6.3 to 4.9 Step -0.3 x=x-1 Next
Print x 答案:5
143.表达式:5\\2*3的值是______。 答案:0
整除\\的运算级别小于乘*除/
144.设置窗体的 属性,可在窗体上显示图片。答案:Picture
145.表达式:Mid(\的值是______。 答案:HAI
146.在VB中,修改窗体的 (11)和 (12) 属性值,可改变窗体的大小。 高度(Height)宽度(Width)
147.以下程序段的输出结果是____。 Num=0
While num<=2 num=num+1
Wend
Print num 答案:3
148.方法是VB提供的一种 ,用来完成一定的操作。答案:特殊子程序
149.一组具有相同名称,不同下标的下标变量称为______。 答案:数组
150.下列程序段的执行后输出的结果为_____。 I=4:A=5 Do
I=I+1:A=A+2 Loop Until I>=7
Print \答案:A=11
151.表达式3/6*5的值是_______。 答案:2.5
152.在Select case 结构中应至少包含一个______子句。 答案:CASE
153.窗体的属性可在属性窗口中设置,也可在程序中用______语句动态设置。 答案:赋值
154.有如下Sub过程: Sub ind(a As Integer) Static x As Integer x = x+a Print x; End Sub
以下是调用它的事件过程,程序运行后,单击命令按钮Command1,输出结果为______。 Private Sub Command1_Click() Ind(2)
End Sub 答案:2
155.逻辑常量值为TRUE或_______。 答案:FALSE
156.______属性用来设置窗体的标题。它确定和改变显示在窗体的标题栏中的文本。 答案:CAPTION
157.下列程序的执行结果是____。 T = O : m = 1 : Sum = 0 Do
t = t + m : Sum = Sum + t : m = m + 2 Loop While m <= 9 Print Sum 答案:55
158.一个程序最多可以有________窗体。 答案:255
159.表达式3>4 and 7=5的值是______。 答案:FALSE
160.下列程序段的执行时,共循环____次。 For a=0 To 1 For b=1 To 2 For c=1 To 3 I=I+1 Next c Next b
next a 答案:12
161.以下程序计算2到50间所有偶数的和,请补充完该程序 Sub mult()
Dim Sum As Integer Sum=0
Dim I as integer For___to 50
If I MOD 2=___Then___ Next I Print sum
End Sub 答案:I=2 0 SUM=SUM+I
162.下列循环语句,要求和数达到10既停止累加,退出循环,请补充完程序。 For j=1 to 10 s=s+j
If s>=10 then______。 Next j 答案:EXIT FOR
163.下列程序段的运行结果是: Sub sele()
Dim n as Integer I=21:n=3 Do While I>n I=I-n Loop Print I