(34)在窗体上画一个名称为Text1的文本框和一个名称为command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer,n As Integer
Fori=0 TO 50
i=i+3
n=n+l
If i>10 Then Exit For
Next
Text1．Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是_________。
A)2　　B)3　　C)4　　D)5
答案：B
评析：每执行一次循环i的值增加4(3+1)，n值增加1；而当i>10时循环退出，故循环只能被执行3次，则n值为O+3。1=3。

(35)在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后
编写如下程序：
Private Sub Command1 Click()
Dim x，y，z As Integer
x=5
y=7
z=0
Text1．Text=＂＂
Call P1(x，y，z)
Text1．Text=Str(z)
End Sub
Sub P1(ByVal a As Integer，ByVal b As Integer，c As Integer)
c=a+b
End Sub
程序运行后，如果单击命令按钮，则在文本框中显示的内容是_________。
A)0　　B)12　　C)Str(z)　　D)没有显示
答案：B
评析：过程Pl的参数c是按地址传递的(By Ref,默认的传递方式)，而P1用语句Call P1(x，y，z)调用后，形参c的值为12，则实参z的值亦为12