a) 25 b) 10 c) 11
d) 因为Y的初值不知道，所以不确定 答案：C
22)写列程序段的执行结果____。 A=\ for I=6 to 2 step -2 x=mid(a,I,I) y=left(a,I) z=right(a,I) z=x & y & z next I
print Ucase(z) a) ABA
b) AABAAB c) BBABBA d) ABBABA 答案：C
23)以下语句输出结果是（在立即窗口中）_____。 A=\ b=\ Print a;b
a) Beijing ShangHai b) Abeijing ShangHai c) BeijingShangHai d) Abeijing 答案：C
24)有如下程序： For I=1 To 3
For j=5 To 1 Step-1 Print I+j Next j,I
其循环执行的次数为______。 a) 12 b) 13 c) 14 d) 15 答案：D
25)有如下程序段，该程序执行后，变量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
记录 21 到 25 (总共 351 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库 单项选择题判断题填空题编程题
16)下列程序的执行结果为_____。 A=100:b=50 If a>b Then a=a-b Else
b=b+a End if Print a a) 50 b) 100 c) 200 d) 10 答案：A
17)下列程序的执行结果为________。 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
18)下面程序执行后，X的结果为_____。 X=0
For I =1 to 5 For j=I to 5 X=X+1 Next j Next I Print X a) 5 b) 10
c) 15 d) 20 答案：C
19)下面程序执行的结果是____。 Private Sub Form_Click() A$=\ C=Val(A$)+Val(B$) Print C\\100 End Sub a) 123 b) 3 c) 5 d) 579 答案：C
20)下列循环语句将执行______次。 A=100 Do
Print a a=a+1
Loop until a<=10 a) 1 b) 10 c) 100 d) 死循环 答案：D
记录 16 到 20 (总共 351 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库 单项选择题判断题填空题编程题
11)下列程序的运行后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
12)下列程序的执行结果是____。 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
13)下列程序的执行结果是_____。 Dim a(5) As String Dim b As Integer Dim I As Integer For I =0 To 5 a(I)=I+1 Print a(I) Next I
a) 123456 b) 6
c) 654321 d) 0 答案：A
14)下列程序的执行结果为_____。 Dim intsum As Integer Dim I As Integer intsum=0
For I=20.2 To 5 Step -4.7 intsum=intsum +I Next I
Print intsum a) 150 b) 200 c) 50 d) 0 答案：C
15)下列程序的执行结果为_____。 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
记录 11 到 15 (总共 351 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库
相关推荐：
loading