假定有以下循环结构：
Do Until条件表达式
循环体
Loop
则下列描述正确的是( )

单项选择题某人为计算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种是正确的，错误的方案是( )

单项选择题在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明： Private Type Person name As String*8 major As String*20 End Type Dim P AS Person 设文本框中的数据已正确地赋值给Person类型的变量P，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是( )