求VB大神给个答案，谢谢 5
PrivateSubCommand1_Click()DimA(1To8)AsIntegerDimbAsIntegerForb=1To8A(b)=b*4NextbText1...
Private Sub Command1_Click()
Dim A(1 To 8) As Integer
Dim b As Integer
For b = 1 To 8
A(b) = b * 4
Next b
Text1.Text = A(b - 3)
End Sub
点击Command1后，文本框Text1的结果是( )。 展开
Dim A(1 To 8) As Integer
Dim b As Integer
For b = 1 To 8
A(b) = b * 4
Next b
Text1.Text = A(b - 3)
End Sub
点击Command1后，文本框Text1的结果是( )。 展开
1个回答
展开全部
代码验证：结果是24
这题考你的关键点是，做完循环后，b的值是多少？
b应该是8+1=9
所以Text1.Text = A(b - 3)，其实是Text1.Text = A(9 - 3)，即Text1.Text = A(6)
然后根据循环中的计算：A(6)=6*4=24
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
