单项选择题

下面程序的执行结果是（）。
Private Sub Command1_Click()
a=0
k=1
Do While k＜4
x=k^k^a
k=k+1
Print x；
Loop
End Sub

A．1 4 27
B．1 1 1
C．1 4 9
D．0 0 0

<上一题目录下一题>

热门试题

单项选择题

窗体上的3个命令按钮构成名称为Command1的控件数组，如图所示。程序如下： Private Sub Command1_Click(Index As Integer) If Index=1 Then Print 计算机等级考试 End If If Index=2 Then Print Command1(2)．Caption End If End Sub 运行程序，单击“命令按钮2”，则如下叙述中正确的是（）。

A．Print Command1(2).Caption语句有错
B．在窗体上显示“命令按钮2”
C．在窗体上显示“命令按钮3”
D．在窗体上显示“计算机等级考试”

单项选择题

某人为计算n!(0＜n＜=12)编写了下面的函数过程： Private Function fun(n As Integer)As Long Dim P As Long p=1 For k=n-1 To 2 Step-1 p=p*k Next k fun=P End Function 在调试时发现该函数过程产生的结果是错误的，程序需要修改。下面的修改方案中有3种是正确的，错误的方案是（）。

A．把P=1改为P=n
B．把For k=n-1 To 2 Step-1改为For k=1 To n-1
C．把For k=n-1 To 2 Step-1改为For k=1 To n
D．把For k=n-1 To 2 Step-1改为For k=2 To n

相关试题