单项选择题

下列程序的运行结果是( )。
Private Sub Form_Click()
Dim k As Integer
n=5
m=1
k=1
Do
m=m+2
k=k+1
Loop Until k＞n
Print m
End Sub

A) 1
B) 12
C) 11
D) 32
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_ Change事件过程中应使用的语句是______ 。
A) Dirve1.Drive=Dir1.Path
B) Dir1.Path=Drive1.Drive
C) Dir1.Path=File1.Path
D) File1.Path=Dir1.Path
单项选择题
为计算an的值，某人编写了函数power如下： Private Function power(a As Integer, n As Integer) As Long Dim p As Long p=a For k=1 To n 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^nC)把For k=1 To n改为For k=1 To n-1 D)把p=a改为p=1
相关试题