Private Sub Command1_Click()
Dim s As String, i As Integer
s = ""
For i = 1 To 10 Step 2
s = Str(i) + s
Next i
Text1.Text = s
End Sub
运行程序,单击命令按钮Command1后,在文本框Text1中显示的内容为( )