Option Base 1 Private Sub Command1_Click() Dim n(5) As Integer, k As Integer Dim i As Integer k = 2
OptionBase1PrivateSubCommand1_Click()Dimn(5)AsInteger,kAsIntegerDimiAsIntegerk=2Fori=...
Option Base 1
Private Sub Command1_Click()
Dim n(5) As Integer, k As Integer
Dim i As Integer
k = 2
For i = 1 To k
n(i) = n(i) + 1
Next i
Print n(i) 展开
Private Sub Command1_Click()
Dim n(5) As Integer, k As Integer
Dim i As Integer
k = 2
For i = 1 To k
n(i) = n(i) + 1
Next i
Print n(i) 展开
3个回答
展开全部
最后答案是0
i运行到最后是3
而n(3)=初始值是0，因而显示0
i运行到最后是3
而n(3)=初始值是0，因而显示0
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
