单项选择题

为计算aⁿ的值，某人编写了函数power如下： Private Function power(a As Integer,n As Integer)As Long Dim p As Long p=a For k=1 Ton p=p*a Next k power=p End Function 在调试时发现是错误的，例如Print power(5,4)的输出应该是625，但实际输出是3125。程序需要修改。下面的修改方案中有3个是正确的，错误的—个是______。

A．把For k=1 To n改为For k=2 To n
B．把p=p*a改为p=p^n
C．把For k=1 To n改为For k=1 To n-1
D．把p=a改为p=1

<上一题目录下一题>

热门试题

单项选择题

在窗体上画—个命令按钮和—个标签，其名称分别为Command1和Label1，然后编写如下事件过程： Private Sub Command1_tlick() Counter=0 For i=1 To 4 For j=6 To 1 Step-2 Counter=Counter+1 Next j Next i Label1.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是______。

A．11
B．12
C．16
D．20

单项选择题

假定有以下函数过程： Function Fun(S As String)As string Dim s1 As String For i=1 To Len(S) s1=LCase(Mid(S,i,1)+s1 Next i Fun=s1 End Function 在窗体上画—个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Str1 As String,Str2 As String Str1=InputBox( 请输入—个字符串 ) Str2=Fun(Str1) Print Str2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为______。

A．ABCDEFG
B．abcdefg
C．GFEDCBA
D．gfedeba

相关试题