Private Sub Command1_Click()
  x = 1: n = 0
  Do While x < 100
    x = x * 10
    n = n + 1
  Loop
  Text1.Text = Str(n)
  Text2.Text = Str(x)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（  ）。
A、10   0 B、2   100
C、3   50 D、4   168