单击命令按钮时,下列程序的执行结果是

Private Sub Command1_Click()

B．T 4

E．nd Sub

Private Sub BT(x As Integer)

x=x*2 + 1

If x < 6 Then

C．all BT(x)

E．nd If

x=x  2

Print x;

E．nd Sub

A．15

B．16

C．17

D．18