从编写到运行一个完整的程序的流程是()。

A.Drawstyle

B.Borderstyle

C.DrawWidth

D.ScaleMode

以下程序的功能是：将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来，要求把A(i)到A(10)依次赋给B(1，1)到B(1，10)，把A(11)到A(20)依次赋给

B(2，1)到B(2，10)，……，把A(91)到A(100)依次赋给B(10，1)到B(10，10)。请填空。

Option Base 1

Private Sub Form_Click()

Dim i As Integer，j As Integer

Dim A(1 To 100)As Integer

Dim B(1 To 10,1 To 10)As Integer

For i=1 To 100

A(i)=Int(Rnd*100)

Next i

For i=1 To【 】

For j＝1 To【 】

B(i,j)＝【 】

Print B(i,j)；

Next j

Print

Next i

End Sub

A.Print Not(3+51 And 32 Or 2>3

D.Print Not(1>2)

A.A*B=0 and A+BO

B.(A=0 or B=0)and(A0 or B0)

C.not(A=0 And B=0)and(A=0 or B=0)

D.A*B=0 and(A=0 or B=0)

执行下面的程序段，x的值为【 】。

Private Sub Command1_Click()

For i=1 To 9

a=a+i

Next

x=Val(i)

MsgBox x

End Sub

下列程序的执行结果是______。

PrivateFunctionP(NASInteger)

Fori=1 To N

SUM=SUM+i

Nexti

P=SUM

End Function

Privte Sub Commandl_Click()

S=P(1)+P(2)+P(3)+P(4)

Print S

End Sub