精选最新版2020VisualBasic程序设计期末完整考试题库288题(含答案)

b) 整数15 c) 字符串5

d) 整数5 答案：A

126．如下有一段不完整的程序段，如果要求该程序执行3次循环，则应在程序中的括号里输入______。 X=1 do

x=x+3 print x

loop until(___) a) x>=8 b) x<=8 c) x>=7

d) x<=7 答案：A

127．设有如下语句： str1=inputbox(\输入\练习\

从键盘上输入字符串“示例”后，str1的值是___。 a) “输入” b) “” c) “练习”

d) “示例” 答案：D

128．下列程序的运行后s的值是_____。 S=0

For x=99 to 1 Step -2 s=s+x Next x Print s a) 100 b) 500 c) 2500

d) 5000 答案：C

129．下列程序的执行结果是____。 K=0

For I=1 To 3 a=I^I^K print a; Next I a) 1 1 1

b) 1 2 3 c) 0 0 0

d) 1 4 9 答案：A

130．下列程序的执行结果为_____。 Dim S As Integer,n As Integer S=0:n=1

Do While n<=100 S=S+n n=n+1 Loop Print S a) 5050 b) 2500 c) 3000

d) 4000 答案：A

131．RGB函数通过红、绿、蓝三基色混合产生某种颜色，其语法为RGB（红，绿，蓝)， 括号中红、绿、蓝三基色的成分使用0-255之间的整数。若使用3个滚动条分别输入3种基色，

为保证输入数值有效，则应设置_____属性。 a) Max和Min

b) SmallChange和LargeChange c) Scroll和Change d) Value 答案：A

132．下列程序的执行结果为________。 Dim intsum As Integer Dim I As Integer intsum=0

For I=0 To 50 Step 10 intsum=intsum+I Next I

Print intsum a) 150 b) 200 c) 50

d) 0 答案：A

133．Visual Basic主要用于______。 a) 图像处理 b) 文字处理

c) 制作视频文件

d) 开发应用程序 答案：D

134．有如下程序段，该程序执行后，变量a的值为______。 For I=1 To 2 For J=I To 2 For K=1 To J a=a+2 Next K Next J Next I a) 2 b) 8 c) 10

d) 20 答案：C

135．执行下列程序后，变量a的值为____。 Dim I as integer dim a as integer a=0

for I=0 to 100 step 2 a=a+1 next I a) 1 b) 10 c) 51

d) 100 答案：C

136．执行下列程序后，X的值为______。 X=3 y=6

Do While y<=6 x=x*y y=y+1 Loop a) 3 b) 6 c) 18

d) 20 答案：C

137．有如下语句，执行后该段语句的循环次数是_____。 Dim s,I,j as integer

For I =1 to 3

For j=3 To 1 Step-1 S=I*j Next j Next I a) 9 b) 10 c) 3

d) 4 答案：A

138．以下程序输出1到1000之间所有的偶数之和，请补充完该程序。 Private Sub Command_Click() Dim x As Double For I=0 To 1000 If ____ Then x=x+I End If Next I Print x End Sub

a) i Mod 2 = 0 b) x Mod 2 = 0 c) I Mod 2 <> 0

d) x Mod 2 <> 0 答案：A

139．下列运算结果中，值最大的是 ______。 a) 3\\4 b) 3/4 c) 4 mod 3

d) 3 mod 4 答案：D

140．以下不属控件的一项是_____。 a) 文本框 b) 标签框 c) 列表框

d) 消息框 答案：D

141．17 mod 3的运算结果是_____。 a) 0.5 b) 1 c) 1.5

d) 2 答案：D