vb里的题：2

来源：百度知道 编辑：UC知道 时间：2024/05/16 23:55:11
2
3 3 3
5 5 5 5 5
8 8 8 8 8 8 8
用vb编程序，谢谢

Private Sub Command1_Click()
Dim s(1 To 4) As String, n As Integer
s(1) = 2
s(2) = 3
For i = 3 To 4
s(i) = Val(s(i - 1)) + Val(s(i - 2))
Next
For i = 1 To 7 Step 2
n = n + 1
Print String(i, s(n))
Next
End Sub

问什么？

估计是数组吧````