[填空题] 下列程序中有一个按钮Command1，一个文本框Text1，其属性MultiLine=True。当单击按钮后，文本框显示 【10】 行数据，其中第2行和第3行的数据分别是 【11】 和 【

[填空题] 下列程序中有一个按钮Command1，一个文本框Text1，其属性MultiLine=True。当单击按钮后，文本框显示 【10】 行数据，其中第2行和第3行的数据分别是 【11】 和 【12】 。

Option Base 1

Private Sub Command1_Click()

Dim a， s As String，i As Integer

a=Array(1，3，5，7，2，4，6，8)

s=" "

For i=1 To Ubound(A)

s=s + Str(a(i)+i)+ vbCrLf

Next i

Text1.Text=s

End Sub