单击命令按钮时,下列程序的执行结果是Private Sub Command1_Click()BT 4End SubPrivate Sub BT(x As Integer)x=x * 2 + 1If x 6 ThenCall BT(x)End Ifx=x * 2Print x;End Sub( )。A.15B.16C.17D.18

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

Private Sub Command1_Click()

BT 4

End Sub

Private Sub BT(x As Integer)

x=x * 2 + 1

If x < 6 Then

Call BT(x)

End If

x=x * 2

Print x;

End Sub( )。

A.15

B.16

C.17

D.18


相关考题:

单击命令按钮,下列程序的执行结果为Private Sub Command1_Click()Dim x As Integer, y As Integerx=32: y=42Call PCS(x, y)Print x; yEnd SubPublic Sub PCS(Byval n As Integer, ByVal m As Integer)n=n Mod 10+1m=m Mod 10+1End Sub ( )。A.32 42B.2 32C.2 3D.12 3

单击命令按钮时,下列的执行结果为Private Sub Command1_Click()Dim x As Integer, y As Integerx=86: y=29Call Proc(x, y)Print x; yEnd SubPublic Sub Proc(n As Integer, ByVal m As Integer)n=n Mod 10m=m Mod 10End Sub( )。A.12 32B.6 29C.2 3D.12 3

单击命令按钮时,下列程序的执行结果为Private Sub Command1_Click()Dim x As Integer, y As Integerx=12: y=32Call PCS(x, y)Print x; yEnd SubPublic Sub PCS(ByVal n As Integer, ByVal m As Integer)n=n Mod 10m=m Mod 10End Sub( )。A.12 32B.2 32C.2 3D.12 3

单击命令按钮时,下列程序的执行结果是Private Sub Command1_Click()BT 4End SubPrivate Sub BT(x As Integer)x=x*2+1If x<6 ThenCall BT(x)End Ifx=x*2Print x;End SubA.15B.16C.17D.18

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim Y as StringX=5Y=X Space(3) XPrint X;Print Trim(Y);Len(Trim(Y))End Sub该程序的执行结果是【 】。

在窗体上画一个命令按钮,然后编写如下程序:Dim x As IntegerSub inc(a As Integer)x=x+aEnd SubPrivate Sub Command1_Click()inc 2inc 3inc 4Msgbox x;End Sub程序执行后,单击Command1命令按钮,消息框显示结果是【 】。

单击命令按钮时,下列程序的执行结果是Private Sub Command1_Click()BT 4End SubPrivate Sub BT(x As Integer)x=x*2 + 1If x 6 ThenCall BT(x)End Ifx=x  2Print x;End SubA.15B.16C.17D.18

单击命令按钮时,下列程序的执行结果是 Private Sub Command1_Click() BT4 End Sub Private Sub BT(x As Integer) x=x * 2 + 1 If x<6 Then Call BT(x) End If x=X * 2 Print x; End SubA.15B.16C.17D.18

在窗体上画一个名为Command1的 命令按钮,然后编写以下程序 Private Sub Command1_Click() Dim a(10) as integer For k=10 to 1 Step -1 a(k)=20-2*k Next k k=k+7 Print a(k-a(k)) End Sub 运行程序后,单击命令按钮,输出结果是 。A.18B.12C.8D.6