【单选题】下列程序段的执行结果为()。Private Sub Command1_Click()Dim a(1 To 10) As IntegerDim n%, s&For i = 1 To 10a(i) = iNext in = 1s = 1Do While n s = s * a(n)n = n + 1LoopPrint sEnd Sub
【单选题】单击一次命令按钮之后,下列程序段的执行结果为( )。 Pubic Sub Proc(a()As Integer) Static i As Integer Do a(i)=a(i)+a(i+1) i=i+1 Loop While i<2 End Sub Private Sub Command1_Click() Dim m As Integer,i As Integer,x(10)As Integer...