单选题 假定有如下事件过程：
Privte Sub Form_Click0
　　Dim x As Integer,n As Integer
　　x=1
　　n=0
　　Do While x＜28
　　　　x=x*3
　　　　n=n+1
Loop
Print x,n
End Sub
程序运行后，单击窗体，输出结果是( )。