单项选择题

假定有如下事件过程:
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
程序运行后,单击窗体,输出结果是( )。

A.81 4
B.56 3
C.28 1
D.243 5