下列VB程序运行时,单击命令按钮Command1后,文本框Text1中显示的内容是______，文本框Text2中显示的内容是_______。
Private Sub Command1_click( )
Dim a(1 to 3) as integer,k as integer,t as integer,s as integer
a(1)="15:" a(2)="36:" a(3)=7
s=0
For k="2" to 3
if a(k)>a(1) then
t=a(1):a(1)=a(k):a(k)=t
s=s+1
End if
Next k
text1.text=str(a(1))
text2.text=str(s)
End sub