[單項選擇題] 在窗體上畫兩個名稱分別為Text1、Text2的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：

Private Sub Command1 Click()

Dim x As Integer， n As Integer

x = 1

n = 0

Do While x ＜ 20

x = x * 3

n = n + 1

Loop

Text1．Text = Str(x)

Text2．Text = Str(n)

End Sub

程序運行后，單擊命令按鈕，在兩個文本框中顯示的值分別是

A．15和1

B．27和3

C．195和3

D．600和4

B解析：[分析]： Do While循環(huán)是先判斷再執(zhí)行循環(huán)。程序執(zhí)行后x=1，首先判斷x是否小于20，條件為真，則將x乘以3再賦給x，n加1賦給n，再次進入循環(huán)重復(fù)進行以上操作，當?shù)?次循環(huán)以后x=27，n=3。此時x不符合循環(huán)條件x＜20，退出循環(huán)。