有如下程序,For j=1 TO 20 :a=a+j\7 :Next运⾏结束时a的值是()。

（20 ）有如下程序段

int i =0, j=1;

int ＆ r=i ; // ①

r =j; // ②

int*p= ＆ i ; // ③

*p= ＆ r ; // ④

基中会产生编译错误的语句是

A ） ④

B ） ③

C ） ②

D ） ①

有如下程序，运行后输出s的值是______。 For j=1 To 20 x=2*j-1 If x Mod 3=0 0r x Mod 7=0 Then s=s+1 Next j Print s

A．5

B．9

C．11

D．15

【题目描述】

（20 ）有以下程序

＃ include ＜ s 七 dio . h ＞

main （）

｛ in i , j , m=1 ;

for （i=1 ; i ＜ 3 ; i++ ）

｛ for （j=3 ; j ＞ O ; j-- ）

{if （i*j ）＞ 3 ） break ;

m=i*j ;

}

}

printf （" m=%d ＼ n ", m ） ;

｝

程序运行后的输出结果是

A ） m=6

B ） m=2

C ） m=4

D ） m=5

答案分析：

【我的疑问】（如下，请求专家帮助解答）

不理解啊

A.2329

B.2923

C.3292

D.9232

有如下程序：

Private Sub Command1_Click()

j =10

For i= -1 To 1 Step 0.3

j =j + 1

Next i

Print j

End Sub

该程序共循环【 】次，程序执行完毕后j的值是【 】。

（22 ）命令按钮 Command1 的单击事件过程的代码如下：

Private Sub Command1_Click()

Dim a(3 , 3)As Integer

For i=1 To 3

For j=1 To 3

a(i , j)=i*j+i

Next j

Next i

Sum=0

For i=1 To 3

Sum=Sum+a(i , 4-i)

Next i

Print Sum

End Sub

运行程序，单击命令按钮，输出结果是（）。

A ） 20

B ） 7

C ） 16

D ） 17

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 0 For m=1 To 10 a = a + 1 b = 0 For j=1 To 10 a = a + 1 b = b + 2 Next j Next m Print a，b End Sub 程序运行时，单击命令按钮Command1后，窗体上显示的结果为

A．10 20

B．20 110

C．110 20

D．200 110

有如下程序，该程序的执行结果是【 】。

Private Sub Command1_lick()

For i= 1 To 4

x= 4

For j =1 To 3

x =3

For k=1 To 2

X= K+5

Next k

Next j

Next i

Print x

End Sub

A.2:4 6 8

B.2:8 6 4

C.3:4 6 8

D.3:8 6 4

有如下程序 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

Private Sub Command1_Click()

Counter=0

For i=1 To 4

For j=6 To 1 Step -2

Counter=Counter+1

Next j

Next i

Label1.Caption=Str(Counter)

End Sub

程序运行后，单击命令按钮，标签中显示的内容是（）。

A）11

B）12

C）16

D）20