下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是______，文本框Text2中显示的内容是______。
Private Sub Command1_Click( )
Dim a(1 To 5) As Integer, i As Integer, s As Integer
a(1)=5
a(2)=10
For i =" 3" To 5
a(i) = a(i-1)-a(i-2)
Next i
Text1.Text = Str(a(5))
s = 0
For i =" 1" To 5
If a(i)>0 then s =" s" + 1
Next i
Text2.Text = Str(s)
End Sub