单击命令按钮后，下列程序代码的执行结果是______。 Public Sub fun (Byval a () As Integer) Static n As Integer Do a(n) = a (n) + a(n + 1) n = n + 1 Loop

admin2013-04-11 57

问题单击命令按钮后，下列程序代码的执行结果是______。
Public Sub fun (Byval a () As Integer)
Static n As Integer
Do
a(n) = a (n) + a(n + 1)
n = n + 1
Loop While n ＜ 3
End Sub
Private Sub command1_ click()
Dim m As Integer, n As Integer, a(10) As Integer
For n = 0 To 2: a(n) = n + 1: Next n
For n = 1 To 2: Call fun(a): Next n
For n = 0 To 3: Print a(n): Next n
End Sub

选项

答案编译错误

解析

转载请注明原文地址:https://kaotiyun.com/show/u6Qp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类