有下列两个过程：

Sub S1(ByVal x As Integer,ByVal y As Integer)

Dim t As Integer

t=x

x=y

y=t

End Sub

Sub S2(x As Integer,y As Integer)

Dim t As Integer

t=x

x=y

y=t

End Sub

则下列叙述中正确的是( )。

单项选择题在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果是( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i, * ) Print x Next i End Sub Private Sub Command1_Click() p1(3) End Sub

单项选择题编写下列事件过程和函数过程： Private Sub Commandl Click() Dim num(1 To 6)As Single num(1)=103:num(2)=190:num(3)=0 num(4)=32:num(5)=-56:num(6)=100 Print Print p2(6,num()) End Sub Private Function p2(ByVal n As Integer,number()As Single)As Integer p2=number(1) For j=2 To n If number(j)＜p2 Then p2=number(j) Next j End Function 程序运行后，在窗体上输出( )。