有以下程序：

Sub subP(b()As Integer)

For i=1 To 4

b(i)＝2*i

Next i

End Sub

Private Sub Command1_Click()

Dim a(1 To 4)As Integer

a(i)＝5

a(2)＝6

a(3)＝7

a(4)＝8

subP a()

For i＝1 To 4

Print a(i)

Next i

End Sub

运行上面的程序，单击命令按钮，输出结果为（）。

A．2 4 6 8

B．5 6 7 8

C．10 12 14 6

D．出错

阅读下列程序，则运行结果为
#include"stdio.h"
fun()
static int x=5；
x++；
return x；
main()
int i，x；
for(i=0；i＜3；i++)
x=fun()；
printf("%d\n"，x)；

A) 5
B) 6
C) 7
D) 8