有以下程序:
Sub subp(b()As Integer)
For i=1To4
b(i)=2-i
Nexti
End Sub
Private Sub Command1_Click()
Dim a (1 To 4)As Integer
a(1)=5
a(2)=6
a(3)=7
a(4)=8
subpa()
For i=1 To4
Print a (i)
Next i
End Sub
运行上面的程序,单击命令按钮,输出结果为 ( ) 。
发布于 2022-05-11 10:19:04
登录后免费查看答案
关注者
0
被浏览
16